Discussion :

[manufer]

Bonjour à toutes et à tous,

N'hésitez pas à me le dire sir je fais des erreurs de procédures ou autres sur le forum, je suis nouveau,

Mon problème est le suivant sur VBA, à chaque fois que je lance un code en "pas à pas, F8", j'ai un message "erreur d'exécution N°9 l'indice n'appartient pas à la selection".

Voila le bout de code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 r = Selection.Row
 n = Selection.Column
 
 Select Case n
 
 Case col_data_sur1an(0) To col_data_sur1an(UBound(col_data_sur1an))

C'est sur cette dernière ligne que tout bloque, avez-vous des angles d'attaques pour résoudre ça ?

[Invité]

bonjour,
donc c'est de col_data_sur1an qu'il faut parler

pas de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
r = Selection.Row
n = Selection.Column

QUÉSACO col_data_sur1an ?

[Pierre Fauconnier]

Salut.

Ton tableau col_data_sur1an ne commencerait pas à 1, par hasard?

Si tu l'a créé sur base d'une plage de cellules, il commence à 1. Il peut aussi commencer à 1 si tu as un Option Base 1 en tête de module, ou si tu l'as explicitement déclarer dim col_data_sur1an(1 to ...)

[manufer]

Merci à vous mais j'ai trouvé,

En fait comme il s'agit de variables,

Les valeurs sont initialisé dans un onglet, il suffit donc de les initialisé pour l'erreur disparaisse.

Je ne comprend pas pourquoi mais ça marche.

Par contre j'ai un autre souci qui est celui-ci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

                    diagno_fin.Caption = "finance : " & etat.Cells(etat.Range ("diag"). Row - 1, c)

J'ai le message d'erreur suivant: "erreur définit par l'application ou par l'objet"

Merci à vous.

[riaolle]

Bonjour,
Pour que nous puissions t'aider, il faut que tu nous dises ce à quoi correspond etat, diag, diagno_fin, c. Comment les définis-tu? Dans quel code cette ligne s'inscrit-elle?

[Invité]

tu as un véritable don, tu nous présentes jamais les information pertinente!

on est bien d'accord, "etat" c'est un onglet et "diag" c'est une cellule nommé de cet onglet qui ce trouve au moins en ligne 2 et "C" est supérieur à zéro?

[manufer]

Excusez moi je pensais que ces infos étaient suffisante.

etat = nom donnée à une feuille dans les propriété

diag = nom d'une cellule mais qui n'est pas en ligne 2

c = column

Quelle est le type d'informations pertinentes qui peuvent résoudre ce problème ?

Avec un Offset, le bug disparait, mais ça ne me dit pas si ça marche ou pas.

[riaolle]

En VBA, lorsqu'on veut faire référence à une feuille nomée etat, on écrit:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("etat")

Attention à ne pas confondre les variables et objets avec les noms des objets. Tu peux écrire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim maFeuille As Worksheet
Set maFeuille = Sheets("etat")
maFeuille.Range("A1").Value = "toto"

Tu l'as bien fait avec diag, par exemple.

[manufer]

Pour le coup je récupère un code,

Mais ce n'est pas l'onglet tableur qui est nommé ainsi,

C'est bien dans les propriétés que c'est ainsi. donc pour le coup cela est quasi figé.

J'ai aussi pour instruction de ne pas modifier l'existant mais d'ajouter par dessus.