seltsames Verhalten meiner inputBox..!!
Jaffi
ich brauch mal wieder eure Hilfe.
Eine in meiner Sub integrierten Inputbox verhält sich seltsam:
With wks _
_
For lngZeile = 3 To .Cells(.Rows.Count, 1).End(xlUp).Row
If .Cells(lngZeile, 1).Value = varEingabe Then
bManuell = True
Do
lngStueckzahl = Application.InputBox(" Der Artikel muss _
manuell erfasst werden. " & vbNewLine & " Bitte geben Sie eine Menge ein!", "Achtung", _
_
400, 200,Type:=1
If (lngStueckzahl 0
Exit For
Else
lngStueckzahl = 1
End If
Next lngZeile
End With
Nun ist es so: Wenn sich die InputBox öffnet, verhält sich das so...die Bewegung meiner Maus verhält sich so als würde ich Zellen auswählen wollen, sie sind dann so gestrichelt umrahmt... zbsp. wenn ich für eine Formelerstellung in eine Zelle klicke. Weis jetzt nicht genau wie dieses Verhalten heist, jedenfalls wenn ich in irgend eine Zelle reinklicke erscheint im Eingebefeld der Inputbox der geklickte Zellbereich (z.bsp.: =$C$4). Total komisch. Will ja eigentlich nur das eine Zahl eingeben wird. Eine Falscheingabe wird zwar vom Code unterbunden, aber ich finde es trotzdem unschön...
weis jemand wie ich das verhindern kann?
Tausend Dank für eure Hilfe!!!