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

VBA Problèmes variables

  • Initiateur de la discussion Initiateur de la discussion vivi4561
  • 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 !

V

vivi4561

Guest
Bonjour,

J'ai un petit soucis sur le code suivant :
Code:
    PaysSelection = InputBox("Veuillez sélectionner le code pays pour le calcul P&L")
    If PaysSelection = "" Then GoTo Fin:
    
    codepaysSelection = Application.Match(PaysSelection, Sheets("Resultats").Range("F4:HR4"), 0)

J'ai toujours un bug sur l'une ou l'autre des lignes suivant la façon dont je définie mes variables.
Savez vous comment je dois définir mes variables pour que tout cela fonctionne ?


Merci d'avance.



Vince
 
Re : VBA Problèmes variables

Bonjour,

essaye ceci, permet de "gérer" l'erreur au cas ou la valeur n'a pas été trouvée..
Code:
Dim codepaysSelection As Variant
Dim PaysSelection As String
PaysSelection = InputBox("Veuillez sélectionner le code pays pour le calcul P&L")
If PaysSelection = "" Then Exit Sub
codepaysSelection = Application.Match("PaysSelection", Range("F4:HR4"), 0)
If VarType(codepaysSelection) = vbError Then MsgBox "non trouvé"

bonne journée
@+
 
Re : VBA Problèmes variables

Bonjour Pierrot,

Merci pour ta réponse. Le truc c'est que le code existe bien et ça affiche tout de meme le message d'erreur.

Variable:
PaysSelection = Nombre ou lettre
codepaysSelection = Nombre (numéro d'une colonne)

Si je joue avec la déclaration des variables, dans un cas une variable marche mais pas l'autre 😡
 
- 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

Réponses
12
Affichages
1 K
C
Réponses
4
Affichages
2 K
C
L
Réponses
1
Affichages
1 K
Lucien31
L
C
Réponses
0
Affichages
3 K
C
M
Réponses
3
Affichages
1 K
MarcTer
M
M
Réponses
13
Affichages
2 K
michoulu
M
K
Réponses
5
Affichages
23 K
K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…