Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
524to528
524to528
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spaltennummer bestimmen

Forumthread: Spaltennummer bestimmen

Spaltennummer bestimmen
02.12.2004 08:32:49
Gregor
Hallo
In Zeile 1 will ich die Spaltennummer finden in der zB. das Wort "Länge" steht, damit ich diese in einer VBA-Prozedur als Variable eingeben kann.
zB. Cells(4, Spalte_Länge).Select
Sollte eigentliche einfach sein, habe aber im im Forum nichts gefunden.
Gruss Gregor
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spaltennummer bestimmen
Jürg
Hallo Gregor
Mein Lösungsvorschlag:
Dim x As Integer
For x = 1 To 256
If Cells(1, x).Value = "Länge" Then
MsgBox "Das Wort Länge steht in der " & x & ". Spalte"
Exit For
End If
Next x
Gruss
Jürg
AW: Spaltennummer bestimmen
Gregor
Jürg
Vielen Dank
Gregor
Anzeige
AW: Spaltennummer bestimmen
u_ 

Sub Spalte_suchen()
Dim Spalte As Byte
Spalte = Rows(1).Find(what:="Länge").Column
MsgBox Spalte
End Sub

AW: Spaltennummer bestimmen
02.12.2004 09:07:57
Harald
Hallo,
bei mir funzt das nur so.

Sub Spalte_suchen()
Dim Spalte As Byte
Spalte = Cells.Find(what:="Länge").Column
Cells(1, Spalte).Select
End Sub

Gruß
Harald
Anzeige
AW: Spaltennummer bestimmen
Gregor
Harald, u_
Herzlichen Dank für eure nützlichen Inputs, es funktioniert.
Gregor
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige