Dali se može u wordu?

ovo mi se cini kao neki VBA...

bez programiranja nista...

mislim da ne, jer on ima neku ugovor koji na raznim mjestima u tekstu ima neki detalj...

e sada taj detalj moze biti polje koje ce se popuniti sa neke lokacije... samo je pitanje kako tu lokaciju definirati???

ili sam ja krivo nesto sebi poslozio u glavi?

nemam toliko iskustva u tome zasad, ali meni se čini da tebi treba neki DBMS sustav, jer pomorce kategoriziraš, i radiš od njih baze podataka, tj. ugovorom ih stavljaš u neki međuodnos...

dakle, pomoću microsoft accessa je najlakše izgraditi formu, a za nešto naprednije tu su clarion(), i oracle XE, kojeg toplo preporučam, stoga jer je moćan, ali i besplatan...

kod formi je najbolja stvar što možeš njih više napraviti, pa ispunjavaš one koje želiš... a kod izrada aplikacija, što su kompleksnije, to ćeš biti sretniji...

možda da probaš prvo s accessom, a onda da prijeđeš na oracle... access je puno lakši i "ljepše" izgleda... oracle je moćan, ali uz tu moć ide i znanje, ipak se zahtijeva neko znanje... samo ti javi kako ti ide...

ili to mozes i u Excelu.

slozis tablicu da izgleda onako kako zelis na printu, a pomocu obrazaca (koji postoje i koje mozes definirati) unosis podatke....

ili mozda kombinacija infopatha (koji je dobar za lijep i jednostavan dizajn) i accessa u kojem bi se cuvali podaci?

Možeš s pomoću ovog makroa:

Converting Numbers to Text

Sub BigCardText()
  Dim sDigits As String
  Dim sBigStuff As String

  sBigStuff = ""

  ' Select the full number in which the insertion point is located
  Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdMove
  Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend

  ' Store the digits in a variable
  sDigits = Trim(Selection.Text)

  If Val(sDigits) > 999999 Then
  If Val(sDigits) <= 999999999 Then
  sBigStuff = Trim(Int(Str(Val(sDigits) / 1000000)))
  ' Create a field containing the big digits and
  ' the cardtext format flag
  Selection.Fields.Add Range:=Selection.Range, _
  Type:=wdFieldEmpty, Text:="= " + sBigStuff + " \* CardText", _
  PreserveFormatting:=True

  ' Select the field and copy it
  Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdExtend
  sBigStuff = Selection.Text & " milijun "
  sDigits = Right(sDigits, 6)
  End If
  End If
  If Val(sDigits) <= 999999 Then
  ' Create a field containing the digits and the cardtext format flag
  Selection.Fields.Add Range:=Selection.Range, _
  Type:=wdFieldEmpty, Text:="= " + sDigits + " \* CardText", _
  PreserveFormatting:=True

  ' Select the field and copy it
  Selection.MoveLeft Unit:=wdWord, Count:=1, Extend:=wdExtend
  sDigits = sBigStuff & Selection.Text

  ' Now put the words in the document
  Selection.TypeText Text:=sDigits
  Selection.TypeText Text:=" "
  Else
  MsgBox "Number too large", vbOKOnly
  End If
End Sub

mozes u svim office alatima koristenjem text boxa... njega mozes rotirati