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

Scrollarea pour un fichier .xlsm

  • Initiateur de la discussion Initiateur de la discussion tactic6
  • 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 !

tactic6

XLDnaute Impliqué
Bonjour le forum
je galere avec scrollarea pour mon fichier .xlsm
quelqu'un sait il comment il faut faire pour que ça fonctionne
Private Sub Worksheet_Activate()
Worksheets("SAISIE").ScrollArea = "A1😛67"
End Sub
j'ai essayé ce code de partout dans mon fichier sans aucun résultat
j'ai meme essayé:
Sub Worksheet_Activate(ByVal control As IRibbonControl)
Worksheets("SAISIE").ScrollArea = "A1😛67" 'feuil1 et plage à adapter...
End Sub
dans un module mais ça ne fonctionne pas
Scrollarea est il compatible avec un .xlsm ?
Merci
 
Re : Scrollarea pour un fichier .xlsm

Bonsoir tactic6, le Forum,

Peut être aurais-tu mieux fait de poster dans le Forum spécial Excel 2007 ?

Cela dit, non ton problème ne vient pas d'une incompatibilité entre .xlsm et ScrollArea. ScrollArea reste toujours valable sur XL 2007. Ton problème vient d'ailleurs.

Juste au cas où : l'évènement Activate() d'une feuille ne se déclenche que lorsqu'un autre onglet est sélectionné et que tu actives la feuille cible. Il n'est pas déclenché à l'ouverture du classeur si la feuille cible est déjà la feuille active.

Cordialement,
 
Re : Scrollarea pour un fichier .xlsm

bonsoir


scrollarea fonctionne parfaitement pour les classeurs .xlsm


Code:
Private Sub Worksheet_Activate()

Tu as bien placé la procédure dans le module de la feuille ?
Les évènements dans la feuille de calcul Excel - Club d'entraide des développeurs francophones



Puis refais un essai en remplaçant
Code:
Private Sub Worksheet_Activate()
Worksheets("SAISIE").ScrollArea = "A1:P67"
End Sub

par

Code:
Private Sub Worksheet_Activate()
ActiveSheet.ScrollArea = "A1:P67"
End Sub


bonne soirée
michel


[Edit]bonsoir cher ami Didier ... ;o)
 
Re : Scrollarea pour un fichier .xlsm

salut,

ça marche en Worksheet_SelectionChange sur la feuille

><>

edit : oups pas le temps d'ouvrir 2007, bonsoir tout le monde et désolée pour la collision
 
Dernière édition:
Re : Scrollarea pour un fichier .xlsm

Bonsoir,

si tu veux limiter la plage tu peux le faire à l'ouverture du classeur, comme cela ça marche à tous les coups

Private Sub Workbook_Open()
'MsgBox ("saisie") ' enlever le commentaire pour vérifier

Worksheets("SAISIE").ScrollArea = "A1😛67"


End Sub

GIBI
 
- 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

Discussions similaires

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