letzte Spalte - nicht die Nummer,sondern Buchstabe
09.02.2005 09:07:34
Edwin
Hallo,
mit folgendem Code
lgLetzteSpalte = .Cells(1, Columns.Count).End(xlToLeft).Column MsgBox lgLetzteSpalte
komme ich ja zur letzten Spalte.
Ich sollte aber als Ergebnis nicht z.B. Spalte "7" sondern "G" erhalten.
Wie geht das? Gruß Edwin
AW: letzte Spalte - nicht die Nummer,sondern Buchstabe
bst
Hallo Edwin,
versuch Mal sowas:
Dim LetzteSpalte As Range Set LetzteSpalte = .Cells(1, Columns.Count).End(xlToLeft) MsgBox Left(LetzteSpalte.Address(False, False), IIf(LetzteSpalte.Column > 26, 2, 1))
Gruß, Bernd
Danke
Edwin
Hallo Bernd, super, vielen Dank. Gruß Edwin
AW: letzte Spalte - nicht die Nummer,sondern Buchstabe
Boris
Hi Edwin,
wozu brauchst du denn die Spaltenbezeichnung?
Grüße Boris
AW: letzte Spalte - nicht die Nummer,sondern Buchstabe
Edwin
Hallo Boris, ich brauche den Spaltennamen für folgenden Befehl:
cboSparte.List = .Range("A6:" & LetzteSpalteNamen & LetzteZeile).Value 'Liste wird gefüllt
Gruß Edwin
Hab ich mir gedacht...
Boris
Hi Edwin,
...und daher auch nachgefragt. Dafür gibt es die Cells-Eigenschaft:
cboSparte.List = .Range(Cells(6,1), Cells(letzteZeile, letzteSpalte)).Value
Da brauchst du keine Spaltenbezeichnung.
Grüße Boris