Problème avec range

Résolu
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

  1. Bonjour

    J'ai trouvé grâce à l'enregistreur de macro
    Crdlt
    1. Modérateur
      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