Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Afficher une page dans une feuille Excel

  • Initiateur de la discussion Initiateur de la discussion Peponne31
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

P

Peponne31

Guest
Bonjour,

Dans une feuille Excel, j'ai plusieurs pages, j'ai créé un CommanButton qui me permet d'afficher une page, la page commence en F1 jusqu'à J200. Mon problème est que je n'arrive pas à avoir la colonne F à gauche de l'écran, ça débute par la colonne C. Voici ce que j'ai fais;
Pour le CommanButton:

Private Sub VérinsMoules_Click()
Application.ScreenUpdating = True
FrmVérinsdeMoules.Show
End Sub

Pour la procédure:

Private Sub VérinsMoules_Click()
Application.ScreenUpdating = True
Range("F1:J200").CurrentRegion.Select
Sheets("Presse").EnbleSelection = xlUnlockedCells
Range("F6").Select
Range("F6").Activate
End Sub

Le curseur est bien en J6 mais la colonne J n'est pas la première colonne de ma page.
J'èspère mètre bien expliquer.
Cordialement

Pierrot
 
Re : Afficher une page dans une feuille Excel

Bonjour à tous,

Peux-tu essayer :

VB:
Sub Test()
Feuil1.ScrollArea = "F1:J200" 'Pour ne pouvoir utiliser que cette plage
Application.Goto Reference:=Feuil1.Range("F1"), scroll:=True 'Pour avoir la première colonne en F1
End Sub

A+ à tous
 
Re : Afficher une page dans une feuille Excel

Merci pour ta réponse, j'ai encore un dysfonctionnement, j'ai adapté ta solution à ma feuille, lorsque je clique sur le bouton test, j'ai bien la page qui s'affiche correctement, mais lorsque je clique sur un autre bouton pour revenir au menu, donc en A1 de ma feuille, je suis bloqué.

J'ai oublié de préciser que je suis sur Excel 2003

Cordialement

Pierrot
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
7
Affichages
344
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…