ouvrir et se ranger dans une feuille

[nrdz83]

Bonsoir à tous , voila j'ai cette macro

Sub affdocancre()
Sheets("doc ancre").Visible = True
End Sub

Qui m'ouvre une ma feuille "doc ancre" qui était masquée, et je voudrais me ranger dans cette feuille en B1 . dois je utiliser ce code ?

Sub affdocancre()
Sheets("doc ancre").Visible = True
Range.B1
End Sub


d'avance merci à tous amitiés

 

[Roland_M]

Re : ouvrir et se ranger dans une feuille

bonsoir

Range("B1").Select

 

[Pierre-Henry]

Re : ouvrir et se ranger dans une feuille

Bonsoir,

Sub affdocancre()
Sheets("doc ancre").Visible = True
Sheets("doc ancre").Range("B1").Select
End Sub

devrait fonctionner....

Cordialement

 

[nrdz83]

Re : ouvrir et se ranger dans une feuille

bonsoir roland M je mettais pas le .select deja pas bien.
Aussi cette maccro je l'ai associé à une commande qui se trouve dans ma page 'PV ancre' et le probleme c'est que cette macro affiche bien ma feuille 'doc ancre' qui etait masquée mais ne se place pas en B1 dans cette feuille.
Merci pour tes lumières😕

 

[Roland_M]

Re : ouvrir et se ranger dans une feuille

re

salut pierre_henry

peut être sélectionnée la feuille j'avais oublié !

Sub affdocancre()
Sheets("doc ancre").Visible = True
Sheets("doc ancre").Select
Sheets("doc ancre").Range("B1").Select
End Sub

 

[nrdz83]

Re : ouvrir et se ranger dans une feuille

bonsoir et merci pierre henri non ça me met en debogage 😀

 

[Cousinhub]

Re : ouvrir et se ranger dans une feuille

Re-,

A toutes fins utiles, il est rarement nécessaire de sélectionner une cellule, voire, de démasquer une feuille.....

Si tu avais plus de précisions......

Bon w-e (Et oui, la campagne, dans moins de 10 mois....Vivement Nouméa)

Bonne soirée

 

[13GIBE59]

Re : ouvrir et se ranger dans une feuille

Bonsoir.

Et si tu essayais :

Sub affdocancre()
Sheets("doc ancre").Activate

ActiveSheets.Range("B1").Select
End Sub

 

[Pierre-Henry]

Re : ouvrir et se ranger dans une feuille

Re-bonsoir,
Bon bah en 2 fois ça devrait le faire 😉 Désolé, j'ai pas Excel sous la main là....

Sub affdocancre()
Sheets("doc ancre").Visible = True
Sheets("doc ancre").Select
Range("B1").Select
End Sub

Mais il n'est effectivement pas nécessaire de la dé-masquer pour aller lire ou écrire dedans...

Cordialement

 

[Staple1600]

Re : ouvrir et se ranger dans une feuille

Bonsoir

Sub affdocancre()
With Sheets("doc ancre")
 .Visible = True
 .Activate
 .Range("B1").Select
End With
End Sub

 

[nrdz83]

Re : ouvrir et se ranger dans une feuille

nickel bonsoir à tous ça marche au top chapeau à tous amitiés