Gruppe
Funktion
Problem
Wie kann ich nach der Auswahl einer Kundennummer in einem Gültigkeitsfeld die Adresse in Adresszellen eintragen lassen?
StandardModule: basMain
Sub Merken()
Dim rngOld As Range
Set rngOld = ActiveCell
Range("AA1").Select
MsgBox "Bin gewandert!"
rngOld.Select
MsgBox "Bin zurück!"
End Sub