Hallo Experten,
ich will die letzten drei Werte einer Variable ändern.
-------------------Makro--------------------------
Dim x As String
x hat z.b. den Wert „Halloabc“
ich will die letzten drei Werte der Variable ändern.
X soll den Wert Hallo123 haben.
VIELEN DANK!!!
WILSSWISSEN
Hallo, dein Kurztext sagt was ganz anderes aus als deine Bescheibung ?!?
Für das Problem in deiner Beschreibung brauchste kein VBA, das kannst mit einer Fomel machen.
Mein Ansatz wäre: zuerst Länge der Variablen ermitteln, dann über Funktion Links(Feldname;Länge-3) den Wert ermitteln, der stehen bleiben soll und dann verketten mit deiner neuen Variablen oder einem festen Wert (z.B. 123).
Gruß
PoD
Hallo Willswissen,
das lässt sich so lösen:
y=„123“
x=left(x,len(x)-3) & y
Gruß
Natator
Hallo Natator und Mario,
Vielen DANK !!! es funktioniert ;D
MFG
WILSSWISSEN
Hallo WillsWissen,
probiers mal so:
x = „Halloabc“
y = Len(x)
x = Left(x, y - 3)
x = x + „123“
Viele Grüße
X=Left$(x,Len(x)-3)+„123“
So sollte es klappen.
X = Left(X, len(x)-3) & „123“
Gruß
Reinhard Kraasch
Hallo WillsWissen,
x= left(x,len(x)-3) & „123“
viel Erfolg!
Katharina
Hallo
Da findest Du evtl. die Lösung!
http://www.arstechnica.de/index.html?name=http://www…
http://www.herber.de/forum/archiv/592to596/t592034.htm
Mit freundlichen Grüssen
sry, aber da müsste ich mich auch erst mal schlau machen in foren und dafür hab ich gerade wenig zeit…
Hallo,
hier die Lösung:
Sub test()
X = „Halloabc“
LängeX = Len(X)
Y = Mid(X, 1, LängeX - 3)
X = Y & „123“
End Sub
Gruß,
Ptonka
Hallo willsissen!
die rechten 3 Buchstaben erhälst DU mit der Funktion right(feld, anzahl)
bspw.
y = RIGHT( name, 3)
Diese dann mit Wertezuweisung in eine zweite Variable speichern.
x = RIGHT( name, 3)
, dann ersetzen mit dem gewünschten String
x = ‚neuer String‘
und dann wieder zusammensetzen…
VG Dagmar