Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Probleme VBA fonction CALL avant IF

  • Initiateur de la discussion Initiateur de la discussion raphael.diaz
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

R

raphael.diaz

Guest
SITUATION : Sur un worksheet de mon classeur (ThisWorkbook ou un autre), j’utilise cette macro qui me permet de vérifier la présence de la référence : reference.xla et d’appeler le Call seulement si elle est présente. Voilà le programme :

CODE :
Private Sub Worksheet_Deactivate()
'Verifie si le fichier referentiel est bien présent
Dim Fichier As String
Fichier = Dir("C:\Program Files\Microsoft Office\OFFICE11\XLSTART\reference.xla")
‘fichier de référence
If Fichier <> "" Then 'le fichier existe
Call DeleteVersionItemsInPopup
Else 'le fichier n'existe pas
'MsgBox "Le fichier " & Fichier & " est inexistant"
Exit Sub
End If
End Sub

PROBLEME:
Cependant, à l’utilisation, quant la référence n’est pas présente, le programme appel directement le « call » et m’envoi ce message d’erreur :
« Erreur de complilation : Sub ou Function non définie. ». Il ne prend pas en compte ma condition…
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

A
  • Question Question
Réponses
3
Affichages
1 K
N
Réponses
4
Affichages
13 K
nico91410
N
R
Réponses
1
Affichages
1 K
G
R
Réponses
1
Affichages
7 K
S
  • Question Question
Réponses
1
Affichages
2 K
J
Réponses
4
Affichages
20 K
julien0112
J
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…