Problème avec range

Résolu
JCB40 Messages postés 3058 Date d'inscription   Statut Membre Dernière intervention   -  
JCB40 Messages postés 3058 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

  1. jordane45 Messages postés 30426 Date d'inscription   Statut Modérateur Dernière intervention   4 830
     
    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
  2. JCB40 Messages postés 3058 Date d'inscription   Statut Membre Dernière intervention   479
     
    Bonjour

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