Puno pitanja odjednom za početnika ;-)

Nisi rekao koji je Excel u pitanju. Toolbar "Forms" na sebi sadrži ikonu za kreiranje buttona kojega možeš povezati sa Makronaredbom. Design View (na toolbaru za kontrole) ikona služi za prebacivanje u mod za editiranje. Inače desni klik na button i mijenjaš mu naziv, u propertisima ima toga još.
Tebi treba knjiga za početnike Osnove Makronaredbi u Excelu osim ako se ne nađe netko tko će ti sve što tražiš detaljno pojasniti u podužem postu.
Neću ti baš puno pomoći ali i to je nešto za početak, od mene evo malo osnova Izvođenje makronaredbe

btw: pretraži detaljnije ovaj forum

Pa ako je baš bitno koji je excel u pitanju evo neka bude recimo 2003 mada koristim paralelno i 2010 ali mi se office 2003 više sviđa jer sam navikao na njega.
Pa kada sam rekao početnik nisam baš početnik razumeme se ponešto u neke stvari. Od nedavno sam se počeo malo ozbiljnije udubljivati u temu office pa sam sada došao do excella kojeg veoma cenim. VB nije problem ako znaš sintaksu šta se i kako piše u određenom programu.
Kao što sam naveo i u postu sa onom petljom koja bi mi radila posao samo me zanimaju detalji tj kako se i šta piše.
Mislim da sam sa onom petljom pogodio u suštinu mada može i sa loop da odradi ali ja sam nekako navikao na for I
Ok nadao sam se da ni ovakav odgovor neću dobiti uzgred hvala bar na ovome. A sada ko zna da mi tačno odgovori na pitanje ili da me bar uputi na mesto gde to mogu da pročitam bio bih mu zahvalan.

Ako si raspoložen da čitaš, evo jednog malog priručnika sa Googl-a

Nadam se da je ovo resenje tvog 1 i 3 pitanja

Hvala svima na odgovorima aposebno za onaj post gde su osnove programiranja.
Uz put sam našao i sajt tutoriali.org na kome megu da se skinu gomila tutoriala.
Takođe nađoh sajt www.ic.ims.hr gde je jako lepo objašnjeno sa sve slikama kako se radi sa makroima i komandama za sve office aplikacije. ko nije video neka pogleda ima baš detaljno o svemu.
hvala svima na pomoći napravio sam ono što sam želeo uz vašu pomoć.
Ovaj forum je za svaku pohvalu.
Svaka čast svima još jednom

Još samo jedno me muči.

Sub er()
For i = 2 To 200
If InStr(Worksheets(i).Range("C10"), "-54-") Then
j = j + 1
Worksheets(1).Cells(1, j) = Worksheets(i).Range("G20")
End If
Next i
End Sub

znači proverava sve čelije C10 u sheetovima od 2 do 200 da li imaju broj -54- i dodeljuju sad nekoj ćeliji 1,j vrednost iz workshheta u kome je nađen broj -54- ćelije G20
E sada mene muči kako da napravim u ovoj petlji automatsku sumu tj da sve nađene vrednosti autoatski sabira i ispiše samo njihovu sumu nakom polju u sheetu 1 bez pisanja njihovih vrednosti kako sam i napravio u petlji.
pitanje br. 2
Imam recimo 5 sheets. sheets od 1-4 imaju u polju A1 neke brojeve recimo: 1,2,3,4
U sheet-u 1 imam u koloni A formulu koja povlači te brojeve.
recimo A1 je sada 1, A2 je sada 2, A3 je sada 3 i a4 je sada 5
Imama sada problem kako da kada traži neki broj u sheet-u a recimo broj 3 koji se sada nalazi u A3 da tu ćeliju posmatra kao vrednost a ne kao formulu koja se u njoj nalazi.
Znači ako formula daje neki rezultat u nekoj ćeliji kako da taj rezultat traži kao broj.
Jer ako ovako zadam komandu If InStr(Worksheets(1).Range("A1:A4"), "3") Then .... onda nće ništa naši jer su u tim poljima formule ane brojevi.
znam da se to ručno u formatiranju ćelije može uraditi ali mene zanima kako da to uradim za samu pretragu a da ništa ne menjam pri tome. odnosno koja je komanda za look in values ili kako se to kaže već.




_{[Ovu poruku je menjao orion92 dana 21.06.2010. u 23:01 GMT+1]}

Pitanje 1.

Sub er()
For i = 2 To 200
If InStr(Worksheets(i).Range("C10"), "-54-") Then
Zbir = Zbir + Worksheets(i).Range("G20")
End If
Next i
Worksheets(1).Range("A1") = Zbir
End Sub

Pitanje 2.

Ono kako si ti pokusao naravno da nece da radi iako nisu koriscene formule u tim celijama, jer si mu zadao da proverava opseg ("A1:A4") a ne celiju, evo ti kod koji bi ti to sve odradio.

Sub pr()
'ova petlja u svakom ciklusu dodeljuje vrednost jedne celije
'unutar opsega ("A1:A4")
For Each a In Worksheets(1).Range("A1:A4")
If InStr(1, a.Value, "3") Then
'procedura koju treba izvrsiti ako je uslov ispunjen
End If
Next a
End Sub

hvala puno na odgovoru sve je sada jasno