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

Links nach 15 Zeichen Löschen - In VBA

Links nach 15 Zeichen Löschen - In VBA
02.01.2007 09:17:51
Heinz
Guten morgen,Leute
Ich bräuchte Bitte ein Makro,das mir in der Spalte B die Werte nach 15 Zeichen von Links löscht.
Könnte mir Bitte jemand dabei Helfen ?
Danke & Gruß Heinz

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

Betreff
Datum
Anwender
Anzeige
AW: Links nach 15 Zeichen Löschen - In VBA
02.01.2007 09:24:18
Peter
Hallo Heinz,
das könnte z. B. so gehen: Daten stehen in Spalte A ab Zeile 1

Sub Nur_15_Zeichen()
Dim lZeile  As Long
For lZeile = 1 To Range("A65536").End(xlUp).Row
Range("A" & lZeile).Value = Left(Range("A" & lZeile).Value, 15)
Next lZeile
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
AW: Links nach 15 Zeichen Löschen - In VBA
02.01.2007 09:25:12
haw
Hallo Heinz,
z.B. so:

Sub Ab15Löschen()
Dim lz%, z As Range
lz = Cells(Rows.Count, 2).End(xlUp).Row
For Each z In Range("B1:B" & lz)
z.Value = Left(z.Value, 15)
Next z
End Sub

Gruß Heinz
Anzeige
AW: DANKE an Peter Feustel & HAW
02.01.2007 09:32:43
Heinz
Guten morgen Peter & HAW
Recht herzlichen DANK,für die Superschnelle und Profihafte Hilfe.
Laufen beide Codes einwandfrei.
Nachträglich noch ein Prosit 2007
Heinz aus Oberösterreich

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige