Hallo zusammen !
Ich möchte den Text aus einer InputBox mit dem Inhalt einer Zelle in
einer neuen Zelle verknüpfen:
Dim Text As string
Text = InputBox ("Text", "Eingabe", "Artikelname")
Range("F2").Select
ActiveCell.FormulaR1C1 = "=RC[-1]& x " & Text ????
HIER HAB ICH MEINE SCWIERIGKEITEN !!!
In "E2" (RC[-1]) steht die Menge, Text ist die Artikelbezeichnung
und dies möchte ich gerne als Zeichenkette in Zelle "F2" einfügen:
Ergebnis-Beispiel : " 5 x Dichtung"
Nachher das Ganze runterkopieren und in Werte wandeln ist kein Problem.
Wer kann mir da helfen?
Programmieren - alles kontrollieren 4.941 Themen, 20.708 Beiträge
In Deiner ActiveCell Formel sind die Anführungsstriche schon falsch.
Dim Wert as Integer
Wert = ActiveCell
Cells(2,6) = Wert & " x " & "Text"
2,6 ist die Zelle F2