ich habe folgendes Problem. In 2 Eingabefeldern werden werte eigetragen. Die Eingaben können nur aus 0 oder 1 bestehen. Drückt man auf ein butten, werden die Datenfelder in eine Excel Tabelle ausgegeben. während dem eintragen in die Excel Tabelle soll er für die 1 bzw 0 aber ein Wort hinschreiben, so habe ich das Problem gelöst, aber es funzt nicht.
.Range("g2").Value = VSOR & Chr(10) & VGEF ---zielzelle in excel
If txtLagerverf = 0 Then ----eingabefeld 2 lagerverf
VSOR = ""
Else
VSOR = "sortiert"
End If
If txtLagereff = 0 Then ----eingabefeld 2 lagereff
VGEF = ""
Else
VGEF = "gefahr"
End If
Danke für eure mühe