Aide sur macro facile

toopey77 Messages postés 19 Statut Membre -  
rEVOLV3r Messages postés 232 Statut Membre -
Bjr a tous.

J'ai besoin de votre aide sur une macro je penses simple. Mais je ne vois pas comment faire dans l'immediat.

J'ai un fichierA et un fichierB

Le fichierA a une liste deroulante en H11 qui comporte chacun des onglets dispo dans le classeur du fichierB

Je me demande comment par macro activer directement la sheets dans le FichierB qui correspond a celle contenu dans la range h11 du fichierA.

Pour info j'ai tester :(de memoire)

If range(h11) = teste then listing.xls. Activate
Sheets teste. Activate

End if

Mais cela ne fonctionnne pas j'ai un msg bloc end if sans if...

Merci de votre aide

A voir également:

6 réponses

michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
bonjour,

If range("h11") = teste then workbooks("listing.xls"). Sheets( "teste"). select

Michel
0
toopey77
 
BOnjour michel _m,

Tout d'abord merci pour ton msg.

Je viens de faire un test avec ta macro.... mais elle ne fonctionne pas... aucun message d'erreur... rien ne se passe...

tu n'aurais pas une idées?

Merci beaucoup
0
toopey77
 
Voici la macro que j'ai montée:

Sub tentative()

If Range("h11") = "teste" Then Workbook("listing.xls").Sheets("teste").Select

If Range("h11") = "toopey" Then Workbook("listing.xls").Sheets("toopey").Select

If Range("h11") = "youyou" Then Workbook("listing.xls").Sheets("youyou").Select

End Sub

j'ai le msg d'erreur suivant: "Sub ou fonction non definie"

Pourtant j'ai le sentiment d'etre proche lol
0
toopey77 Messages postés 19 Statut Membre
 
Up... Personne pour m'aider please???
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Frenchie83 Messages postés 2254 Statut Membre 339
 
Bonsoir

If Range("h11").value = "teste" Then Workbooks("listing.xls").Sheets("teste").Select

mettre un S a Workbooks

d'autre part, le fichier listing se trouve t-il dans le même répertoire que le fichier d'appel? si ce n'est pas le cas, il faut lui indiquer le chemin

cdlt
0
rEVOLV3r Messages postés 232 Statut Membre 28
 
Bonjour,

Lorsqu'une boucle s'ouvre, elle doit être refermée ! :-D

"End if" pourrait peut-être vous aider ! Et la remarque de Frenchie83 est totalement vraie aussi.

Bye
-1
rEVOLV3r Messages postés 232 Statut Membre 28
 
Pour faire un code plus harmonieux, vous pouvez utiliser les Switch case aussi.
0