Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1228to1232
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Spalten-No eruieren

Spalten-No eruieren
Gregor
Hallo zusammen
Mit folgendem Code eruiere ich die Spaltennummer:
With Worksheets("Tabelle1")
Spalte_X = .Application.Match("Bemerkung 1", Rows(1), False)
Spalte_Y = .Application.Match("Bemerkungen 2", Rows(1), False)
End With
Muss das Blatt bei dieser Funktion aktiviert sein oder kann ich das umgehen?
Analog zu diesem Code versuchte ich bei einer Spalte folgenden Code, erhalte aber eine Fehlermeldung:
Spalte_X = Worksheets("Tabelle1").Application.Match("Bemerkung 1", Rows(1), False)
Wieso das?
Danke und Gruss
Gregor

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Spalten-No eruieren
13.09.2011 17:46:52
Hajo_Zi
Hallo Gregor,
Nein.
in Deinem Code fehlen Punkte vor Rows.

AW: Spalten-No eruieren
14.09.2011 07:57:04
Gregor
Hallo Hajo
Danke für die Info. Ich habe meine Code nun mit Punkt ergänzt,
Spalte_X = Worksheets("Tabelle1").Application.Match("Bemerkung 1", .Rows(1), False)
erhalte aber nach wie vor folgende Fehlermeldung:
"Unzulässiger oder nicht ausreichend definierter Bereich"
Was ist denn noch falsch?
Gruss Gregor
AW: Spalten-No eruieren
14.09.2011 18:20:13
Beverly
Hi Gregor,
versuche es mal so:

With Worksheets("Tabelle1")
Spalte_X = Application.Match("Bemerkung 1", .Rows(1), False)
Spalte_Y = Application.Match("Bemerkungen 2", .Rows(1), False)
End With



Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige