Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
320to324
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
320to324
320to324
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spaltenname statt Spaltennummer im Code

Spaltenname statt Spaltennummer im Code
13.10.2003 15:13:05
Rainer Quaas
Hallo Excel-User,

normalerweise lautet meine funktionierende Codezeile folgendermaßen:

Variable 2 = Worksheets("Tabelle5").Cells(Variable1, 11).Value

Da Tabell5 aber im Aufbau ist und weitere Spalten vor und nach Spalte K (11. Spalte) eingefügt werden, dachte ich mir, ich gebe der Spalte den Namen „Typ“, um den Code unabhängig von der Spaltennummer zu gestalten.

Leider weiß ich nun nicht die genaue Syntax für meine Codezeile.

Variable 2 = Worksheets("Tabelle5").Cells(Variable1, ???-SpaltenName???).Value

Wäre schön, wenn mir jemand die Lösung schicken würde.

Rainer Quaas

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

Betreff
Datum
Anwender
Anzeige
AW: Spaltenname statt Spaltennummer im Code
13.10.2003 15:14:57
Michael Scheffler
Häh,

Du hast doch shon eine Variable - was willst Du denn noch?

Gruß

Micha
AW: Spaltenname statt Spaltennummer im Code
13.10.2003 15:45:21
Rainer Quaas
Hallo Micha,

die Lösung lautet Dank Hajo folgendermaßen:

Dim Spalte As Integer
Spalte = Range("TyP").Column

Variable 2 = Worksheets("Tabelle5").Cells(Variable1, Spalte).Value

Jetzt kann ich vor Spalte11 "beliebig" viele Spalten einfügen und der Code funktioniert immer noch. Dies wäre nicht der Fall, wenn ich die Spaltennummer angegeben hätte.

Gruß Rainer
AW: Spaltenname statt Spaltennummer im Code
13.10.2003 16:17:43
Michael Scheffler
Hallo Rainer,

dank Hajos Antwort ist mir die Frage klar geworden.

Gruß

Micha
Anzeige
AW: Spaltenname statt Spaltennummer im Code
13.10.2003 15:16:31
Hajo_Zi
Hallo Rainer


Sub T()
Dim Spalte As Integer
Spalte = Range("TyP").Column
End Sub


Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

Anzeige
AW: Spaltenname statt Spaltennummer im Code
13.10.2003 15:40:16
Rainer Quaas
Hallo Hajo,

danke für die schnelle Lösung.

Gruß Rainer

p.s.: -> OffTopic: Ich finde es toll von Dir, daß Du so vielen Fragestellern hilfst, aber besonders erwähnenswert finde ich, daß Du nochmal auf die Forums-Umgangsform hinweist, wie sie eigentlich selbstverständlich sein sollte.

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige