Hallo zusammen,
Ich habe in meiner userform eine listbox wo diese Werte durch klick auf den button Commandbutton10 ins Excel geschrieben werden sollen.
Jedoch wird der Wert nicht ins Excel geschrieben.
Ich weiss das es etwas mit BoundColumn zu tun hat. Da ich noch blutiger Anfänger bin weiss ich jedoch
nicht wo dieser teil eingesetzt werden muss...
Vielen Dank für die Hilfe
Gruss Manfred
Private Sub CommandButton10_Click()
'5)-------Schreibe alle Infos in Excel ------------
Dim StrRow As String
'----- finde die letzte Zeile im Sheet "flug" in der etwas drinsteht -----------------------
StrRow = Sheets("flug").Cells(Rows.Count, 1).End(xlUp).Row
Sheets("flug").Cells(UserForm1.TextBox33, 17).Offset(RowOffset, ColumnOffset).Value = UserForm1.ListBox1.Value
MsgBox "Update AMC successful", vbOKOnly + vbInformation, "Special Flight" |