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

Columns

Columns
06.10.2006 20:57:28
Walli
Guten Abend allerseits,
wie könnte ich folgende Zeile:
Columns("E:I").Delete Shift:=xlToLeft
umwandeln, da dies nicht funktioniert:
Columns("5:9").Delete Shift:=xlToLeft
Ich brauche aber Zahlenangaben, da die Zahlenangaben als Variable ermittelt werden. Beispiel:
dim a,b
a=5
b=9
Columns(a:b).Delete Shift:=xlToLeft
funzt nicht?!?
Grüsse Walli

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Columns
06.10.2006 21:12:59
Peter
Hallo Walli,
das geht z. B. so:
Public

Sub Spalten_loeschen()
Dim a     As Integer
Dim b     As Integer
Dim Sp_V  As String
Dim Sp_B  As String
a = 5
b = 9
Sp_V = Chr(Asc("@") + a)
Sp_B = Chr(Asc("@") + b)
Columns(Sp_V & ":" & Sp_B).Delete Shift:=xlToLeft
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
AW: Columns
06.10.2006 21:41:27
Walli
Hallo Peter
vielen Dank, klappt prima
noch einen schönen Abend
Gruss Walli

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige