Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Feldinhalte erweitern

Forumthread: Feldinhalte erweitern

Feldinhalte erweitern
02.03.2006 11:28:36
frambach
hallo allerseits,
ich möchte excelfelder, besser die inhalte dahingehend erweitern 8über ein makro, da bes ne echt lange liste ist), das ich aus beispielsweise 900.30 ein 900.030 oder aus 090.20 ein 090.020 mache also eine stelle mehr haben möchte. bin für jeden ratschlag dankbar.
gruß
jan
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Feldinhalte erweitern
02.03.2006 11:54:28
volker
hallo jan
probiere es mal so:
=WECHSELN(A1;".";".0")
gruß volker
AW: Feldinhalte erweitern
02.03.2006 12:05:48
Reinhard
Hi Jan,
Option Explicit

Sub tt()
Dim zei As Long, teil
Columns("A:A").NumberFormat = "@"
For zei = 1 To Range("A65536").End(xlUp).Row             ' A anpassen
teil = Split(CStr(Cells(zei, 1)), ".")               ' (zei, 1) anpassen, A=1, B=2, C=3 usw
Cells(zei, 1) = CStr(teil(0)) & ".0" & CStr(teil(1)) ' (zei, 1) anpassen, A=1, B=2, C=3 usw
Next zei
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige