VBA Excel, incompatibilité de inputbox as integer
Mon code
Dim a As Integer
a = InputBox("Enter the number", "Program", "", 7000, 6000)
If a = Empty Then
' do code...
Else
MsgBox "Enter the number."
End If
Si je laisse un champ vide , Excel renvoie une Type Mismatch
erreur. Je voudrais afficher un message.
OriginalL'auteur Oskar Strasburger | 2013-02-11
Vous devez vous connecter pour publier un commentaire.
Depuis
a
est unInteger
, il ne peut pas contenir unString
ou êtreEmpty
. Utiliser unVariant
puis vérifiez pour voir ce qui a été retourné:OriginalL'auteur Olle Sjögren
Vous avez
a
défini commeInteger
.Integer
ne peut pas être vide. UtilisationVariant
au lieu deInteger
:If IsEmpty(a) Then
mon +1 pour brett)
pourquoi ne pas publier votre propre réponse? 🙂
Parce que vous avez déjà saisi les clés de la partie, et nous avons déjà une répétition (proche dans le temps) de votre réponse. Pourquoi en ajouter une autre? 🙂
c'était une nouvelle information qui n'a pas été inclus dans votre question initiale.
OriginalL'auteur Andrey Gordeev