Probleme de selection de données VBA [Résolu/Fermé]

Signaler
Messages postés
82
Date d'inscription
mardi 5 juillet 2016
Statut
Membre
Dernière intervention
2 décembre 2016
-
Messages postés
850
Date d'inscription
vendredi 13 février 2015
Statut
Membre
Dernière intervention
15 février 2019
-
Bonjour,

J'ai un petit soucis avec ma macro VBA
Je l'ai écrite dans la feuille Feuil 2 ou en cliquant sur un bouton que j'ai mis cela va me créer une nouvelle feuille nommée XXX avec de nouvelles données. J'aimerai y créer un graphique mais pour cela je dois donner à excel une plage de données j'utilise cette macro pour cela :

With ActiveSheet
Set x = Range(Cells(Cells(22, 8) + 6, 2), Cells(Cells(22, 8) * 5 + 16, 2))
Set y = Range(Cells(Cells(22, 8) + 6, Nbtrain + 2), Cells(Cells(22, 8) * 5 + 16, Nbtrain + 2))
End With


Sauf que cela me selectionne les cellules de Feuil2 et non de la feuille XXX (ceque je voudrais)

J'espere avoir été assez clair
Si quelqu'un peut m'aider

Merci


1 réponse

Messages postés
850
Date d'inscription
vendredi 13 février 2015
Statut
Membre
Dernière intervention
15 février 2019
36
Bonjour,

Je pense que vous avez oublié d'utiliser votre syntaxe avec With.

Du coup le code prend la feuille 2 et pas l'ActiveSheet actuellement.

Moi j'écrirais le code ainsi :

With ActiveSheet
    Set x = .Range(Cells(Cells(22, 8) + 6, 2), Cells(Cells(22, 8) * 5 + 16, 2))
    Set y = .Range(Cells(Cells(22, 8) + 6, Nbtrain + 2), Cells(Cells(22, 8) * 5 + 16, Nbtrain + 2))
End With


Donc avec des "." devant Range.

Cordialement.