Variable übergeben
07.04.2022 15:41:46
Karsten
Ich habe folgenden Programmteil der sich zigmal wiederholt:
If Meister.SOR_Spät_1 = "0" And rs![SOR_Spät_1] "0" Then
answer = msgbox("Wollen sie den bestehenden Eintrag bei Geriest AR6 Frühschicht von " & rs![SOR_Spät_1] & " mit 0 überschreiben?", vbQuestion + vbYesNo + vbDefaultButton2, "Bestehenden Eintrag durch 0 ersetzen?")
If answer = vbYes Then
rs![SOR_Spät_1] = Meister.SOR_Spät_1
Else
Meister.SOR_Spät_1 = rs![SOR_Spät_1]
End If
End If
Daher wollte ich einen extra Public Sub machen, wo ich die "Variable" übergebe und dann den Makro immer wieder durch laufen lasse.
Die Variable muss als bei
Meister.SOR_Spät_1
und
rs![SOR_Spät_1]
übergeben/geändert werden.
Aber ich bin im Moment zu blöd und komme nicht weiter.
Kann mir vielleicht jemand helfen?
Danke im voraus.
Karsten