Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
928to932
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
928to932
928to932
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

erste leere Spalte

erste leere Spalte
28.11.2007 13:33:26
Ludger
Hallo zusammen,
mein Problem: Tabelle mit 12 Spalten enthält derzeit Werte in den Spalten 1 bis 4 und 9 bis12. Wie kann ich den Spalten-Namen der ersten freien Spalte erhalten? Hier also E .
Danke für euere Mühen

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: erste leere Spalte
28.11.2007 13:42:54
Thomas
spaltennr = [A1].End(xlToRight).Column + 1
Gruß

AW: erste leere Spalte
28.11.2007 14:04:00
Ludger
danke Thomas,
jetzt erhalte ich die Spalennummer, aber ich möchte doch auch gerne die alphanummerische Bezeichnung.
Danke

AW: erste leere Spalte
28.11.2007 14:18:09
Mag
Hi,
so?
Option Explicit

Sub ttt()
Dim strAdr As String
strAdr = Cells(1, [A1].End(xlToRight).Column + 1).Address
MsgBox Mid(strAdr, 1, InStr(2, strAdr, "$") / 3 * 2)
MsgBox Mid(strAdr, 2, InStr(2, strAdr, "$") / 5 * 2)
End Sub


Gruss

AW: erste leere Spalte
28.11.2007 14:20:00
Mag
... aber wozu?

AW: erste leere Spalte
28.11.2007 14:21:52
Thomas
s = [A1].End(xlToRight).Offset(0, 1).Address
s = Mid(s, 2, InStr(2, s, "$") - 2)

Anzeige
AW: erste leere Spalte
28.11.2007 14:23:35
Ludger
super - vielen Dank für die schnelle Hilfe

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige