Kopiraj raspon i postavi u drugi list u istu kolonu (prvo prazno mesto) kao text

Odgovori Nova tema

2 odgovora
1.980 pregleda

Kopiraj raspon i postavi u drugi list u istu kolonu (prvo prazno mesto) kao text 17.03.2013. u 13:36 · pre 165 meseci #1

Pozdrav,

Pokušavam da sa otvorene (userform) pritiskom na (komandno dugme):
iskopiram raspon($A$3:$Q$3) iz (sheet1)
na (sheet2) u isti raspon ($A3:$Q3) s'tim da se pronađe prva slobodna ćelija kolone "A"
vrednost nalepiti kao (text)!!!
poenta je da izbegnem korišćenje iskaza (Activesheet)!!!

Re: Kopiraj raspon i postavi u drugi list u istu kolonu (prvo prazno mesto) kao text 17.03.2013. u 22:30 · pre 165 meseci #2

Za listove jednostavno koristi nazive umesto ActiveSheet. Prilikom kopiranja nije neophodno da se menja selektovani opseg. O pronalaženju poslednje popunjene ćelije već je bilo reči više puta pa možeš da potražiš objašnjenje na forumu a kod je u nastavku

Code:
Sub Kopiraj()
' Kopiranje bez selekcije
' P. Jovanovic za elitesecurity.org
'
ThisWorkbook.Sheets("Sheet1").Range("A3:Q3").Copy
ThisWorkbook.Sheets("Sheet2").Range("A65536").End(xlUp).Offset(1).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

Potpis

Nije to loše Rembrante, samo što ne bi dodao još malo boje?

Re: Kopiraj raspon i postavi u drugi list u istu kolonu (prvo prazno mesto) kao text 21.03.2013. u 19:47 · pre 165 meseci #3

hvala Peco!

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme