Bereich "A2:E" & UsedRange ?
06.11.2005 18:31:20
Korl
ich habe mich mal wieder fest gelaufen bei folgenden Problem.
In der Regel ist bei meinem Kopiervorgang die Spalte "A" die Bezugsspalte für die letzte Zeile und es wird von "A2:E & End(xlUp).Row" alles kopiert.
Hier mal mein Codeschnimpsel.
lLetzteBK = IIf(wbBK.Range("A65536") "", 65536, wbBK.Range("A65536").End(xlUp).Row)
lLetzteAK = IIf(wksK.Range("A65536") "", 65536, wksK.Range("A65536").End(xlUp).Row)
wbBK.Range("A2:E" & lLetzteBK).Copy
wksK.Range("A" & lLetzteAK + 1).PasteSpecial Paste:=xlValues
In einer Situation ist nur Spalte "E" gefüllt und mein Code kopiert dann leider ab "A1:E & End(xlUp).Row"
Wie kann ich erreichen, dass ich stets den Bereich "A2:E" UsedRange erfassen kann?
Gruß Korl