U prilogu je obrazložen problem. Hvala.
Potpis
Snić
promena koda za funkciju find
Zaključano
Zakačeno
Cells.find(What:=ActiveWorkbook.Sheets(1).Cells(1, 1), After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
To je ono što mi je bilo potrebno. Hvala za pomoć odnosno za poklonjeno znanje . Pozdrav.
Potpis
Snić