Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
328to332
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
328to332
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Nr. der letzten Spalte

Nr. der letzten Spalte
30.10.2003 14:27:08
iven_s
Hallo,
Wie kann ich einer Variablen die Nr. der letzten in Zeile 1 gefüllten Spalte einer Tabelle zuweisen.


Sub letzteSpalteNr()
dim lspnr as integer
lspnr=' Was muß hier rein ????????
msgbox lspnr
End Sub


iven_s

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

Betreff
Datum
Anwender
Anzeige
AW: Nr. der letzten Spalte
30.10.2003 14:29:31
Hajo_Zi
Hallo iven_S

Letzte Spalte der Zeile 4
Cells(4, Columns.Count).End(xlToLeft).Column
Fehler falls letzte Spalte belegt wird diese nicht erkannt
[IV4] End(xlToLeft).Column
nach Hinweis von ManuelaM geändert
Dim LoLetzte As Long
LoLetzte =256
If [IV4] = "" ThenLoLetzte =[IV4].End(xlToLeft).Column

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.


Anzeige
AW: Nr. der letzten Spalte
30.10.2003 14:31:05
Patrick
Hi iven_s

Versuche es mal mit den Befehlen


Sub letzteSpalteNr()
dim lspnr as integer
lspnr=' ActiveCell.Column
msgbox lspnr
End Sub

Danke an alle. Hajo' s Lösung funktioniert
30.10.2003 14:39:37
iven_s
...

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige