Treba mi sledece verovatno je mnogo prosto ali ne mogu da ga provalim. Napravim button i u taj buton mi treba code koje ce da izvrsava sumiranje jedne kolone u wordovoj tabeli.
potom ga obeleži, i pritisni CTRL+F9: uneta formula će dobiti vitičaste zagrade. Sad pritisni F9 da vidiš rezultat. Ovo, sa F9, ćeš morati da ponavljaš pri izmenama da bi se osvežio prikaz rezultata.
Isto to, bez kucanja, možeš i preko Insert / Field / Formula.. (izabereš f-ju).
Potpis
Have you found helpful examples, solutions or ideas-in-work, please consider the
following:
• Citation of *actual page* you are going to using is welcome.
• Have you saw "Value Added" examples you are going to incorporate to your
profitable blog, daily job or any money making venture: How about online donation? ↗Ana & Vlade Divac Foundation
Hvala!
Ako resenje trazis bas pomocu VBA kao sto je i naslovljeno, mislim da ce ti od pomoci biti sledeci primer:
Code:
Sub saberi()
Dim wdtable As Table
Dim wdcell As Cell
Dim zbir As Single
Dim l As Long
z = 0
Set wdtable = Tables(1)
For l = 1 To wdtable.Rows.Count
Set wdcell = wdtable.Cell(l, wdtable.Columns.Count)
zbir = zbir + Val(wdcell.Range)
Next l
MsgBox z
End Sub
Ovaj kod prikazuje zbir krajnje desne kolone u prvoj tabeli u dokumentu.
Ime I Prezime JMBG Adresa Datum necega Iznos troskova
Marko Minic 1010986720048 Svetolika Janjica 12.12.2007 220.110,00
i sad u koloni "Iznos troskova" imam 10 redova, treba mi jedan button koji ce da sabere te troskove. E sad moram imati na kraju kolone moram imati celiju gde ce izbaciti ukupan zbir. Da li je dobro staviti txtBox, odnosno da li je taj txtBox printable ili kako vec...
Hvala vam unapred na pomoci
Ujedno ima li negde dobar prirucnik za VBA posto ga je dobro imati jer mnogo lako automatizuje mnogo stvari, i da li je u officu 2007 integrisana neka druga programska platforma ili ... s obzirom da ja ucim .net i nikad nisam ucio proceduralno programiranje
Mnogo jednostavnije je da to uradiš u Excelu, a ako krajnja tabela mora da bude u wordu onda kad sve izrčunaš samo copy/paste u word i malo podesiš tabelu ako je potrebno.
Ili da direktno u wordu umesto obične ubaciš excel tabelu.
Potpis
Možda je tačno da je sve već rečeno, samo nisu svi sve čuli i razumeli ...