Fonction split procédure publique - VBA excel

Résolu
Zozo -  
f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention   - 19 mars 2021 à 13:21
Bonjour,

J'ai un problème avec le code suivant qui fonctionne parfaitement bien quand je le lance au sein d'une procédure privée.

Cependant celui-ci ne fonctionne plus dans une procédure publique et je ne comprends pas pourquoi. 


I_P2() = Split(Cells(9, 1).Offset(0, 5).Value)
I_P2_Valeur() = Split(Cells(9, 1).Offset(0, 6).Value)
For z = LBound(I_P2) To UBound(I_P2) Step 2
    Nbr_I_P2 = Nbr_I_P2 + 1
    SaveSetting "Création BDD", "Indices", "Indice P2 " & "n°" & Nbr_I_P2, I_P2(z)
    SaveSetting "Création BDD", "Indices", "Valeur Indice P2 " & "n°" & Nbr_I_P2, I_P2_Valeur(z)
Next z


I_P2() et I_P2_Valeur() sont déclarés en String.
Nbr_I_P2 et z sont déclarés en Integer.

Excel m'indique une erreur d'incompatibilité de type sur la première ligne.
Merci de m'éclaircir.

Configuration: Windows / Chrome 89.0.4389.90
A voir également:

1 réponse

Réponse 1 / 1
f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Chez moi pas d'erreur..
0
Zozo
 
En effet, l'erreur se déclenchait parce que dans mon module où je déclare mes variables publiques, celles-ci étaient déclarées sur une même ligne :

"Public I_P1(), I_P1_Valeur(), I_P2(), I_P2_Valeur(), I_P3(), I_P3_Valeur(), I_R1(), I_R1_Valeur(), I_R2(), I_R2_Valeur() As String"

En modifiant pour déclarer les variables "I_P2()" et "I_P2_Valeur()" distinctement par ligne le bug ne se déclenche plus...

Je ne comprends pas pourquoi mais désormais mon programme fonctionne.

Merci et au temps pour moi,
0
f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention   1 713 > Zozo
 
Re,

Vous n'avez pas besoin des parentheses dans votre declaration de variables I_XXX
0

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
appliquer une pause dans une macro vba excel
ch'duj -
lerif25 -

10 réponses
ouverture d'un fichier excel à partir d'un code VBA
TraderAS -
pijaku -

3 réponses
Méthode find dans VBA - Recherche de données sous Excel
baissaoui -
baissaoui -

0 réponse