Problème avec range

Résolu
JCB40 Messages postés 3013 Date d'inscription   Statut Membre Dernière intervention   -  
JCB40 Messages postés 3013 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Voila le code que j'ai mis a un bouton activeX pour activer une feuille(Calendrier) et me rendre directement a la cellule (A3)
mais cela ne fonctionne pas.Pouvez vous svp me dire ou se trouve mon erreur

Private Sub CommandButton1_Click()
Sheets("Calendrier").Activate.Range ("A3")
End Sub
Merci pour votre aide
Cordialement



Configuration: Windows / Firefox 66.0

2 réponses

jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
Bonjour,

Déjà, merci de poster ton code correctement à l'avenir.
Pour cela, il faut utiliser les balises de code tel qu'expliqué ici : https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
(et comme cela t'a déjà été indiqué dans de précédentes discussions.....)

Ensuite, ton "activate" n'est pas au bon endroit...
Sheets("Calendrier").Activate.Range ("A3")

A remplacer par
Sheets("Calendrier").Range ("A3").Activate

0
JCB40 Messages postés 3013 Date d'inscription   Statut Membre Dernière intervention   463
 
Bonjour

J'ai trouvé grâce à l'enregistreur de macro
Crdlt
0