Activer une feuille dans liste déroulante userform

[mix770]

Bonjour,

j'ai créé un usurform avec une liste déroulante contenant des noms, chaque nom est dans un tableau de suivi, je souhaiterai que lorsque un nom est sélectionné, il active la page et affiche le tableau à l'écran en mettant en haut à droite une cellule.
l'onglet est nommé RTT. pour mettre en page j'ai cette macro mais comment l'insérer dans la macro
Colonne = ActiveWindow.ScrollColumn
Ligne = ActiveWindow.ScrollRow
ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollRow = 94
merci à vous

 

[vgendron]

Re : Activer une feuille dans liste déroulante userform

Bonjour Mix770

je pense que tu ne vas pas avoir beaucoup de réponse. aussi. avant que tu ne t'impatientes pour rien, je te suggère de poster ton fichier de travail SANS données confidentielles. on pourra ainsi sans doute t'apporter une solution proche de ton besoin.

toujours en anticipation, si j'ai bien compris.
ton fichier contient un onglet qui s'appelle RTT. Sur cet onglet avec un tableau (surement très long) qui contient des noms..
quand tu sélectionnes un nom, tu veux que la ligne correspondante s'affiche directement à l'écran sans avoir à scroller toi meme pour faire apparaitre ladite ligne.. j'ai bon?

 

[mix770]

Re : Activer une feuille dans liste déroulante userform

Bonjour,

oui tu as gagné un panier garni, dans le mille, se sont en fait des tableaux empilés un par nom sur la même feuille, tu as raison c'est beaucoup mieux avec un fichier, je le post dans l'après midi je suis en réunion avant.
merci de ta réponse

 

[mix770]

Re : Activer une feuille dans liste déroulante userform

bonjour,

je n'ai pas réussi à répondre avant j'espère que vous aurez le message.
J'ai un userform, avec liste déroulante des noms, quand je sélectionne le nom je souhaite qu'il affiche le tableau à l'écran en mettant en haut a gauche la cellule de reference afin d'avoir un affichage propre. la macro serait donc juste sur un nom j'active la page RTT et le tableau du nom correspondant en haut a gauche.

donc le nom A correspond à A1
nom B correspond à A51
nom C correspond à A 101
etc
merci à vous

 

[mix770]

Re : Activer une feuille dans liste déroulante userform

je tatonne mais je tourne en rond :-(

Private Sub ComboBox2_Change()
Dim tableaux_rtt As String
tableaux_rtt = ComboBox2.Value
Worksheets(tableaux_rtt).Select
ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollRow = 1
End Sub

 

[vgendron]

Re : Activer une feuille dans liste déroulante userform

Re,

Je ne vois pas ton Userform dans le fichier joint. pas meme une macro.. ??

 

[mix770]

Re : Activer une feuille dans liste déroulante userform

bonjour,
la macro est celle ci dessus, j'ai extrait l'onglet RTT car il est dans un tableau qui est lourd et ne passe pas sur le forum.
dans le combobox j'ai une liste déroulante qui reprend les noms des agents avec le rowsource TABLES!D2😀42
et le code suivant

Private Sub ComboBox2_Change()
Dim tableaux_rtt As String
tableaux_rtt = ComboBox2.Value
Worksheets(tableaux_rtt).Select
ActiveWindow.ScrollColumn = 1
ActiveWindow.ScrollRow = 1
End Sub
je sais pas comment t'aider plus

 

[mix770]

Re : Activer une feuille dans liste déroulante userform

re,
si je met dans la liste de nom le nom de l'onglet "tableaux_RTT" il m'active la page, ce qui faut c'est qu'il active cette page par défaut et qu'il retrouve une ActiveWindow.ScrollColumn = 1 ActiveWindow.ScrollRow = 51 sur le nom afficher (doit t’ont faire une table quelque part avec les information, je sais pas.
merci à toi

 

[mix770]

Re : Activer une feuille dans liste déroulante userform

re,
j'active par defaut la page
je sélectionne la colonne de recherche" E"
________
bobo tete

Private Sub ComboBox2_Change()
Sheets("Tableaux_RTT").Activate
Range("E:E").Select
limite = 100