|
Hallo Leute,
habe ein kleines VBA Dilemma,
Ich arbeite an einem großem Makro, welches im speziellen Daten aus Tabellensheets, in ein anderes kopiert.
Nun zu meinem Problem. Ich kann mit der Range Methode keine Spalten angeben, da diese Variabel sind.
In etwa so:
'Alte Version, letzteZeile sucht letzte Zeile in test1
test1.Range("B:B" & letzteZeile).Copy Destination:=BUKR.Range("B2")
BUKR.Range("B:B").RemoveDuplicates Columns:=1, Header:=xlYes
'neue Version:
Dim spalte As String
spalte = Eingabefenster.TextBox1.Value
test1.Range(spalte & letzteZeile).Copy Destination:=BUKR.Range("B2")
BUKR.Range("B:B").RemoveDuplicates Columns:=1, Header:=xlYes
So, habe im Eingabefenster, welches als Pop-Up fungiert, eine TextBox, welche mit die Spaltenbelegung regelt.
Kann mir jemand sagen, wie die Zuweisung im Range dazu heißt, wenn ich die komplette SPalte kopieren will?
Gruß Sepp
PS: Eine Zusatzvariable mit Range(..).EntireColumn.Select geht nicht.
|