Hallo!
HAbe ein Problem mit der Speicherdeffinition und einer Zelle mit SVerweis.
Habe folgenden Code
Dim intKundennr As Integer
intKundennr = ThisWorkbook.Sheets("Auftragsvorlage").[F5]
If intKundennr <= 100 Then~f~
MsgBox "Es ist kein Kunde ausgewählt!", vbExclamation, "Abbruch"
Exit Sub
End If
In der Zelle F5 habe ich folgnden SVerweis:
~f~=WENN($A$1>0;SVERWEIS($A$1;Adresse;2;0);"")&" "&WENN($A$1>0;SVERWEIS($A$1;Adresse;8;0);"")
Das Problem ist, wenn in Zelle F5 eine Kundennummer (Zahl 5 stellig) ausgegeben wird dann funktioniert die VBA Abfrage, wenn keine ausgegeben wird (leere Formel) dann kommt eine Fehlermeldung "Typen unverträglichkeit".
Was mache ich da falsch?
Bitte um Hilfe
Gruß
Gerd S.