Pointage dans une feuille

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

G

Guigui

Guest
hello le forum,

j'ai 14 tableau dans une feuille de a5 à A690

chaque tableau correspond à un agent.
Dans une listbox je selection un agent et son tableau s'affiche.

sous chaque nom, je met Range('Axx').select ou xx correspond a la ligne ou commence le tableau de tel ou tel agent

le Hic c que le curseur ne se cale pas dans le coin sup gauche mais selectionne ma plage ('Axx') au milieu de l'écran. Donc mon visu sur le tableau est pas 'centré' sur la bonne personne ou est a cheval sur deux


y a t il un moyen de d'avoir mon curseur en hat à gauche de l'écran ...

Merci d'avance pour votre aide

A+ guillaume
 
Salut 'guigui'
as tu exploré la propriété SCROLL
ex texte de l'aide
Cette propriété renvoie ou définit le numéro de la colonne de gauche du volet ou de la fenêtre. Type de données Long en lecture-écriture.

Note
Si la fenêtre est fractionnée, la propriété ScrollColumn de l'objet Window fait référence au volet supérieur gauche. Si les volets sont figés, la propriété ScrollColumn de l'objet Window exclut les zones figées.

Exemple
Cet exemple montre comment déplacer la colonne 3 de telle sorte qu'elle devienne la colonne située à l'extrême gauche dans la fenêtre.

Worksheets('Sheet1').Activate
ActiveWindow.ScrollColumn = 3
pour toi ce pourrait être
ActiveWindow.ScrollColumn = Range('Axxx').Column
peut être ?????
pour mettre la cellule C3 dans le coin Gauche
Sub scroll()
ActiveWindow.ScrollColumn=Worksheets('feuil1').Range('C3').Column
ActiveWindow.ScrollRow = Worksheets('feuil1').Range('C3').Row
End Sub

Message édité par: ChTi160, à: 21/03/2005 14:04
 
- 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

S
Réponses
6
Affichages
2 K
SPELTIER
S
P
  • Question Question
Réponses
4
Affichages
833
Pernin
P
G
Réponses
2
Affichages
1 K
GeoLek
G
T
Réponses
12
Affichages
4 K
Thegraou
T
Retour