macro pour trouver selectionner pagepar rapport a une cellule qui porte le meme nom

C

CHALET53

XLDnaute Barbatruc

• 26 Juillet 2012

• #2

Re : macro pour trouver selectionner pagepar rapport a une cellule qui porte le meme

Bonjour

Sub goo()

Sheets("Feuil1").Select
a = Cells(3, 1)
Sheets(a).Activate

End Sub

a+

 

Vote positif 0 Vote négatif

P

pasquetp

XLDnaute Occasionnel

• 26 Juillet 2012

• #3

Re : macro pour trouver selectionner pagepar rapport a une cellule qui porte le meme

chalet53, c'est genial. merci infiniment!!! tu m'as enlevé une sacré epine du pied. merci encore

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 26 Juillet 2012

• #4

Re : macro pour trouver selectionner pagepar rapport a une cellule qui porte le meme

Bonsoir le fil, bonsoir le forum,

Ou en simplifiant :

Code:

Sub goo()
Sheets(Sheets("Feuil1").Cells(3, 1).Value).Activate
End Sub

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 26 Juillet 2012

• #5

Re : macro pour trouver selectionner pagepar rapport a une cellule qui porte le meme

Bonsoir


Une autre façon

Code:

Sub a()
Application.Goto Sheets([A3].Text).[A1]
End Sub

PS: Bizarrement ton message parle de feuilles mensuelles soit (12 feuilles)
et ton fichier exemple cause de pierre et d'une feuille pierre...

 

Vote positif 0 Vote négatif

P

pasquetp

XLDnaute Occasionnel

• 26 Juillet 2012

• #6

Re : macro pour trouver selectionner pagepar rapport a une cellule qui porte le meme

merci a tous! le fichier que jai mis en ligne je me suis dit que ce serait mieux de poster un exemple tout simple. je vais proceder a lapplication sur le bon doc. merci encore!

 

Vote positif 0 Vote négatif

P

pasquetp

XLDnaute Occasionnel

• 26 Juillet 2012

• #7

Re : macro pour trouver selectionner pagepar rapport a une cellule qui porte le meme

bon ca marche. j'ai utilisé celle la Sheets(Sheets("Feuil1").Cells(3, 1).Value).Activate

encore merci pour lexcllent travail.

 

Vote positif 0 Vote négatif