Selektovanje i kopiranje od prve do zadnje popunjene celije uz....Imam problem sa selektovanjem i kopiranjem opsega. u koloni A su podaci koje treba selektovati pa potom kopirati od prve pa sve do zadnje popunjene celije s tim što u tom opsegu ima i praznih celija koje i treba da budu prazne i kao takve da se selektuju i kopiraju.
Nasao sam makro
Code:
Sub KOPIRANJE()
Dim LastRow As Long
Dim i As Long
Dim Range As Range
With Sheets("OSNOVA").Activate
LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
Range("A1:A" & LastRow).Select
Selection.Copy
End With
End Sub
Sub KOPIRANJE()
Dim LastRow As Long
Dim i As Long
Dim Range As Range
With Sheets("OSNOVA").Activate
LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
Range("A1:A" & LastRow).Select
Selection.Copy
End With
End Sub
ali ima debug koji nisam u stanju da otklonim.
Znaci kao da sam odradio SELECT - COPY, a potom peske treba da idem gde mi treba da odradim CTRL+V
Znali neko kako ovo da odradim.
Hvala unapred
sve ce ovo jednom proci
