bouton vers une feuille

JONEY76

XLDnaute Occasionnel

• 4 Mars 2017

• #2

Bonjour,

sheets("feuil blabla").select

 

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 4 Mars 2017

• #3

Bonsoir chaelie 🙂, le Forum 🙂

Pourquoi un bouton??

Dans l'évenement double_click If Target.address = "$M$2" Then Sheets(x).Activate

Et pour revenir à la feuille accueil par exemple.

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address = "$N$2" Then Sheets(1).Activate
End Sub

 

Dernière édition: 4 Mars 2017

Vote positif 0 Vote négatif

JONEY76

XLDnaute Occasionnel

• 4 Mars 2017

• #4

 

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 4 Mars 2017

• #5

Bonsoir joney76,lone-wolf
merci pour la réponse
"sheets("feuil blabla").select"
si la feuille est masquée(veryhidden) ?
a+

 

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 4 Mars 2017

• #6

Re chaelie

Sheets(x).Visible = True - Sheets(x).Visible = False

 

Dernière édition: 4 Mars 2017

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 4 Mars 2017

• #7

re
ça n'a pas fonctionné???

Private Sub CommandButton1_Click()
'Sheets("ZONEDESAISIE").Select
Sheets("ZONEDESAISIE").Hidden = False
End Sub
a+

 

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 4 Mars 2017

• #8

Lone-wolf à dit:

Sheets(x).Visible = True - Sheets(x).Visible = False

Cliquez pour agrandir...

Re
non plus ???
a+

 

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 4 Mars 2017

• #9

Lone-wolf à dit:

Re chaelie

Sheets(x).Visible = True - Sheets(x).Visible = False

Cliquez pour agrandir...

re
non plus????
a+

 

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 4 Mars 2017

• #10

Re

Essaie comme ceci

Dim sh As Worksheet
Set sh = Sheets(2)
sh.Visible = xlSheetVeryHidden
sh.Visible = xlSheetVisible

 

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 4 Mars 2017

• #11

re
merci souci résolut
a+

 

Vote positif 0 Vote négatif