Ouvrir, un onglet et se positionner en A1 depuis un autre onglet

Bonjour

J'essais de trouver comment faire pour ouvrir l'onglet "feuil2" se positionner dans en A1 depuis l'onglet "Feuil1"

J'ai essayé "Worksheet activate" ou "open" mais cela ne ferme pas l'onglet "feuil1"

Merci

Bonjour

'Activation de la feuille feuil2
Sheets("Feuil2").Activate
'Sélection de la cellule A1
Range("A1").Select

A plus sur le forum

Bonjour,

Je préfère :

Sub Goto_Feuil2_A1()
  Application.Goto Worksheets("Feuil2").Range("A1")
End Sub

Quel doit être le début de code à associer au "commandButton" de lUseform qui ouvrira la feuille en question?

Private Sub CommandButton13_Click()

Application.Goto Worksheets("Feuil2").Range("A1")

End Sub

Merci

Bonjour,

Il n'y a besoin d'aucun code autre pour activer une cellule sur une autre feuille du classeur actif.

Mais tes demandes ne sont pas claires : tu parles d'ouvrir et de fermer des feuilles.

Une feuille ne s'ouvre pas (et ne se ferme pas), elle s'active (au détriment d'une autre).

C'est un classeur qui s'ouvre ou se ferme .

re reformule

J'ai dans un useform en feuil1 un bouton de commande (CommandButton) qui en cliquant dessus devrait faire ceci:

Il chercherait dans les onglets masqué celui qui s'appelle Feuil2

Il ouvrirait feuill2 et désactiverait (visuellement Feuil1)

il se placerait en A1 de Feuil2

C'est guerre mieux !

Feuil1 est une feuille de calcul

Un userform est un formulaire VBA qui est indépendant des feuilles de calcul

Donc il n'y a pas de formulaire sur une feuille de calcul

Un bouton activeX (CommandButton) peut se trouver sur une feuille de calcul ou sur un userform.

Dans les 2 cas le code de son évènement Click serait le même si il n'y a qu'un seul classeur ouvert :

Private Sub CommandButton1_Click()
  Worksheets("Feuil2").Visible = xlSheetVisible
  Application.Goto Worksheets("Feuil2").Range("A1")
End Sub