lullaby
2013-05-23 08:26:54 UTC
Sub Essai1()
'
' Essai1 Macro
'
' Keyboard Shortcut: Ctrl+a
'
trig = UCase(InputBox("Donner le nom de l'agence", agence))
Range("E2").Select
ActiveCell.FormulaR1C1 = "=Feuil1!RC[-1]"
Range("E2").Select
Selection.AutoFill Destination:=Range("E2:E22"), Type:=xlFillDefault
Range("E2:E22").Select
End Sub
J'explique: je travaille sur deux feuilles (Feuille 1 et feuille 2). La feuille 1 contient une liste d'agences bancaires ainsi que les résultats de chacune (pour faire simple ^^ ). Le but est d'afficher les informations sur la page 2, mais uniquement celles de l'agence dont je préciserai le nom, pour cela j'ai utilisé cette fonction: trig = UCase(InputBox("Donner le nom de l'agence", agence))
Mais comment faire pour cibler les informations de CHAQUE agence et permettre d'y accéder sur la page 2 en indiquant simplement le nom.
J'espère avoir été claire. Merci d'avance pour votre aide .
PS: j'ai pensé à une solution que ne n'arrive pas à "formuler", toujours en mode macro effectuer un tri sur la feuille1 qui dépendra du nom d'agence que j'aurai indiqué .
Encore une fois, j'espère avoir été claire :)