Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
488to492
488to492
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Ähnliche Anweisungen vereinfachen

Forumthread: Ähnliche Anweisungen vereinfachen

Ähnliche Anweisungen vereinfachen
23.09.2004 21:05:41
Barbara
Hallo,
kann man Folgendes kürzer und eleganter darstellen?
Ich denke dabei an eine Lösung mit with, wenn das geht.
Columns("E:E").ColumnWidth = 0.3
Columns("G:G").ColumnWidth = 0.3
Columns("J:J").ColumnWidth = 0.3
Columns("L:L").ColumnWidth = 0.3
Danke,
LG, Barbara
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ähnliche Anweisungen vereinfachen
23.09.2004 21:13:10
FP
Hi Barbara,
z.B. so ;-)

Sub barbara()
With Range("$E:$E,$G:$G,$J:$J,$L:$L")
.ColumnWidth = 0.3
End With
End Sub

Servus aus dem Salzkammergut
Franz
AW: Ähnliche Anweisungen vereinfachen
23.09.2004 21:17:53
GraFri
Hallo


Range("E:E,G:G,J:J,L:L").Columns.ColumnWidth = 0.3

     Code eingefügt mit Syntaxhighlighter 2.5

Mit freundlichen Grüßen, GraFri
Anzeige
AW: Ähnliche Anweisungen vereinfachen
23.09.2004 21:22:10
yps
hi :-),
Range("E:E,G:G,J:J,L:L").ColumnWidth = 0.3
cu Micha
AW: Ähnliche Anweisungen vereinfachen
23.09.2004 21:34:34
yps
jetzt fällt mir aber nix mehr ein:
[E:E,G:G,J:J,L:L].ColumnWidth = 0.3
cu Micha
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum