Spaltennummer statt Spaltenbuchstabe
10.04.2009 11:36:27
Werner
Hallo Freunde,
in einer Tabelle sind für die Spalten Namen vergeben. Eine Spaltennummer kann ich dann wie folgt
angeben (WsTabelle is der als Objektvariable definierte Tabellenname):
WsTabelle.Range("Spaltenname").Column
Wenn ich jetzt, z.B. für die VBA-Anweisung "Find", einen Bereich innerhalb einer Spalte angeben muss und
mit "Range" arbeite, muss ich unter anderem den Spaltenbuchstaben angeben, z.B.
WsTabelle.Range("A2:A1000").Find(What:= ...)
Wenn ich nun aus dem Spaltennamen den Spaltenbuchstaben ermitteln will, ist das nicht ganz leicht
(geht offenbar nur über eine Funktion).
Aus einem Thread dieses Monats (Rudi zu Christoph) entnehme ich die Angabe, dass ein Range auch über Spaltennummern definiert werden kann, z.B.
Range(Columns(7), Columns(27)).Hidden = True
Geht etwas Analoges auch für die Bereichsangabe bei oben genannter Find-Anweisung, d.h. dort
Angabe der Spalten- und Zeilennummern statt der Spaltenbuchstaben und der Zeilennummern?
Besten Dank im voraus! Werner R.