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

Umformatieren einer Spalte

Forumthread: Umformatieren einer Spalte

Umformatieren einer Spalte
07.06.2020 12:23:36
Richi
Hallo Zusammen
Ich möchte eine Spalte umformatieren erhalte Laufzeitfehler und weiss nicht was ich falsch mache. Hoffe ihr könnt mir dabei helfen.
https://www.herber.de/bbs/user/138097.xlsm
Liebe Gruess
Richi
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Umformatieren einer Spalte
07.06.2020 12:33:14
Hajo_Zi
Hallo Richi,
Option Explicit
Sub Format_0000000()
Dim lngPer As Long
Dim lngPerMax As Long
With Sheets("Personalnummer")
lngPerMax = IIf(IsEmpty(.Cells(.Rows.Count, 1)), .Cells(.Rows.Count, 1).End(xlUp).Row, . _
Rows.Count)
For lngPer = 2 To lngPerMax
.Cells(lngPer, 2) = "'" & Format(.Cells(lngPer, 1).Value, "00000000")
Next lngPer
End With
End Sub

Anzeige
AW: Umformatieren einer Spalte
07.06.2020 13:16:47
Richi
Besten Dank Hajo
Läuft wunderbar.
Liebe Gruess
Richi
Neuer Beitrag, aber....
07.06.2020 12:46:50
Werner
Hallo,
...für ein Feedback im anderen Beitrag reicht es nicht?
Gruß Werner
Ja Feedback wäre schön
07.06.2020 13:12:35
Daniel
Vor allem, wenn der Antworter sogar ein vollständiges Makro entworfen und bereitgestellt hat.
Anzeige
;

Beliebteste Forumthreads (12 Monate)

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