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

Letzte 3 Spalten formatieren

Forumthread: Letzte 3 Spalten formatieren

Letzte 3 Spalten formatieren
09.06.2019 17:14:13
Hans
Hallo,
ich möchte die letzten 3 Spalten meines Arbeitsblattes markieren und anschließend formatieren. Die letzten 3 Spalten befinden sich bei jedem Arbeitsblatt an einer anderen Stelle.
Kann man das automatisch mit einem Makro ausführen lassen...
LG
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Letzte 3 Spalten formatieren
09.06.2019 17:21:36
Hajo_Zi 

Option Explicit
Sub Formatieren()
Dim Loletzte As Long
Dim WsTabelle As Worksheet
For Each WsTabelle In Worksheets
With WsTabelle
Loletzte = .UsedRange.SpecialCells(xlCellTypeLastCell).Column
.Columns(Loletzte - 2 & ":" & Loletzte).NumberFormat = "hh:mm:ss"
End With
Next WsTabelle
End Sub

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Die Beiträge werden auch ignoriert, es erfolgt keine Antwort.
Anzeige
;

Beliebteste Forumthreads (12 Monate)

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