XL 2016 Macro pour creer un bouton

Neileru4

XLDnaute Occasionnel
Bonjour a tous
je cherche sur le forum sans succès a ma question
Comment créer une macro avec un bouton pour ouvrir un onglet masquer
sachant que je sais creer mon bouton mais je n'arrive pas a creer la macro qui va ouvrir mon onglet
 

Calvus

XLDnaute Barbatruc
Bonjour Neilru4, le forum,

VB:
Sheets("Machin").Visible = False' pour masquer
Sheets("Machin").Visible = True 'pour afficher'
A+
 

Neileru4

XLDnaute Occasionnel
Bonjour calvus quand tu mets machin c'est le nom de mon onglet?

mais est il possible que quand je clique sur mon bouton que sa ouvre mon onglet?
 

Calvus

XLDnaute Barbatruc
Re,

Tu parles bien d'un onglet masqué non ?
Alors oui, il faut mettre le nom de l'onglet et le code dans le module qui gère le bouton.

A+
 

Neileru4

XLDnaute Occasionnel
oui je parle bien d'un onglet masquer mais cela ne fait que l'afficher
le bouton me l'ouvre mais ne me renvoie pas vers l'onglet
est ce possible?
 

Neileru4

XLDnaute Occasionnel
Re
Merci pour ces fonctions
mais tu va dire que je suis embêtant activate fonctionne si l'onglet et afficher
s'il est masquer comment faire?
 

Neileru4

XLDnaute Occasionnel
Bonjour
Suite a ma demande d'hier j'aurais voulu via la macro ouvrir un onglet excel mais d'un autre classeur
Est ce possible?
 
Dernière édition:

Calvus

XLDnaute Barbatruc
Bonsoir,

Voici le code :

VB:
Sub Ouvrir()
Dim fichier As String, nom As String
fichier = Feuil12.Range("A1")
nom = Feuil12.Range("A2")
On Error Resume Next
    Workbooks(nom).Activate
    If Err.Number <> 0 Then
        Workbooks.Open fichier
    End If
Sheets("Machin").Activate
End Sub
A+
 

Neileru4

XLDnaute Occasionnel
Bonjour mon classeur s'appel Données
mon onglet Part1
donc le code devrait être:

Sub Ouvrir()
Dim fichier As String, nom As String
Données = Part1.Range("A1")
Données = Part1Range("A2")
On Error Resume Next
Workbooks(Données).Activate
If Err.Number <> 0 Then
Workbooks.Open fichier
End If
Sheets("Part1").Activate
End Sub

est ce bien ca car cela ne fonctionne pas
 

Haut Bas