Objet requis (erreur 424)
Bruno-Dominique ROBERT
Toujours débutant...
Qui peut m'expliquer pourquoi dans les lignes suivantes quelque soit
l'instruction utilisée (en enlevant les ') j'obtiens toujours une erreur
424.
En vous remerciant
BDR
Sub Saisie_CodePostal()
Dim Message, Titre, CP_Input
Message = "Code Postal SVP ?"
Titre = "Saisie CP"
' CP_Input = InputBox(Message, Title)
Set CP_Input = InputBox(Message, Title)
On Error Resume Next
' Set CP = InputBox(prompt:="Code Postal ?", Type:=8)
' Set CP = .InputBox(prompt:="Code Postal ?", Type:=8)
If CP_Input Is Nothing Then
MsgBox "Saisie du Code Postal OBLIGATOIRE"
Else
'Ecrire CP_Input dans la cellule active
End If
End Sub
Paul VERSCHEURE
--
Bonjour
Chez moi, ton code légèrement modifié marche très bien
Sub Saisie_CodePostal()
Dim Message, Titre, CP_Input, Title
Message = "Code Postal SVP ?"
Titre = "Saisie CP"
CP_Input = InputBox(Message, Title)
On Error Resume Next
If IsNull(CP_Input) Then
MsgBox "Saisie du Code Postal OBLIGATOIRE"
Else
'Ecrire CP_Input dans la cellule active
MsgBox CP_Input
End If
End Sub
J'ai seulement ajouté la déclaration de Title et remplacé Nothing (que
j'aime pas ) par isnull
HTH & A+
Paul
(Ma version Excel 2000 anglais)
"Bruno-Dominique ROBERT" <b...@rvh.fr> a écrit dans le message news:
OLfZT83NBHA.1312@tkmsftngp05...
Bruno-Dominique ROBERT
Merci pour ton aide.
VBA est encore plein de mystères pour moi... mais je progresse à l'aide du
forum.
Cela me rappelle quand dans une cellule avec la fonction ESTVIDE très
souvent je n'obtiens pas le résultat escompté et que je suis obligé
d'utiliser ESTTEXTE ou ESTNUM à la place...
Que signifie HTH ?
Salutations
BDR
"Paul VERSCHEURE" <p.a.ver...@skynet.be> a écrit dans le message news:
3b98a17c$0$36470$ba62...@news.skynet.be...
Paul VERSCHEURE
;-)
Paul
"Bruno-Dominique ROBERT" <b...@rvh.fr> a écrit dans le message news:
Oy8PoI5NBHA.600@tkmsftngp05...
Bruno-Dominique ROBERT
"Paul VERSCHEURE" a écrit > HTH = Hope this help
> ;-)
>
> Paul
Re
OF COURSE !
Merci encore
BDR
Clément RICHERT
ESTVIDE donne faux pour une cellule contenant juste un espace ou contenant
une formule aboutissant a un resultat hum comment dire ... "vierge"
Par exemple si je tape en A1 : =concatener(B1;C1) et que B1 et C1 sont vides
ESTVIDE(A1) renvoie faux alors que ESVIDE(B1) est vrai
mais
avec la case F1 vraiment vide de chez vide
et en A1 =concatener(B1;C1) et que B1 et C1 sont vides
alors =SI(A1=F1;VRAI;FAUX) fonctionne
HTH :)
CCI ?
a+
--
A+
Clemnet
"Bruno-Dominique ROBERT" <b...@rvh.fr> a écrit dans le message news:
Oy8PoI5NBHA.600@tkmsftngp05...