Links nach 15 Zeichen Löschen - In VBA

• Links nach 15 Zeichen Löschen - In VBA von Heinz H vom 02.01.2007 09:17:51
• AW: Links nach 15 Zeichen Löschen - In VBA - von Peter Feustel am 02.01.2007 09:24:18
• AW: Links nach 15 Zeichen Löschen - In VBA - von haw am 02.01.2007 09:25:12
  • AW: DANKE an Peter Feustel & HAW - von Heinz H am 02.01.2007 09:32:43

Betrifft: Links nach 15 Zeichen Löschen - In VBA
von: Heinz H

Geschrieben am: 02.01.2007 09:17:51
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

Betrifft: AW: Links nach 15 Zeichen Löschen - In VBA
von: Peter Feustel

Geschrieben am: 02.01.2007 09:24:18
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.

Betrifft: AW: Links nach 15 Zeichen Löschen - In VBA
von: haw
Geschrieben am: 02.01.2007 09:25:12
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

Betrifft: AW: DANKE an Peter Feustel & HAW
von: Heinz H

Geschrieben am: 02.01.2007 09:32:43
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

Excel-Beispiele zum Thema "Links nach 15 Zeichen Löschen - In VBA"
Summe bilden, wenn Kriterium Zeichenfolge	Leerzeichen aus einem Bereich löschen
Anfügen des Zeichens für Durchmesser	Zeichenfolge aufteilen
Filtern einer Zahl aus einer Zeichenfolge	Zeichenfolgen in Zahlen nach Textimport
Zeichenfolge korrigieren	Zeichenfolge umkehren
Zeichen separieren