Guten tag
und danke nochmal für die letzte antwort!
Ich habe folgendes problem ich gebe in eine Textbox mehrere sachen ein die werden dann in eine excel tabelle geschrieben.soweit so gut jetzt beginnt mein problem die eingaben enthalten denn namen des produkts und denn preis die excel tabelle kann nun die produkte aber nicht zusammen rechnen weil es sich an dem text teil aufhangt.hat jeman eine idee???
i = Worksheets("Food Name").Cells(2.1) & " " & Worksheets("Food Preis").Cells(2.1) & "€"
If TextBox1.TextLength > 0 Then
TextBox1.Value = TextBox1.Value & vbCrLf
End If
' Zeilenumbruch nur einfügen, wenn in der Box schon etwas steht
TextBox1.Value = TextBox1.Value & i
ActiveCell = i
ActiveCell.Offset(1, 0).Select |