Discussion :

[lavalois]

Bonjour,

Je suis débutant en vba, Voici mon problème. J'aimerai à partir de la valeur cellule (a1) de la feuille(2) du fichier ''formulaire'' sélection la feuille qui porte le même nom que la valeur de la cellule a1 du fichier bd (banque de données).

J'ai fait un macro avec ce que j'ai trouvé sur le net. Présentement il ne fonctionne pas, car j' essai de faire cette sélection.

Le but de cette macro est de receuilli des données selon le produit (a1) du formulaire. Le formulaire est une template que je vais utiliser pour tous les produits. Selon la sélection la valeur de la cellule a2 va se copier dans la le fichier BD dans la colonne B dans la bonne feuille du fichier.

Mreci d'avance de votre aide.

Note j'utilise à mon travail excel 2003.

[tehel]

Bonjour,

Voici comment je fait, le nom du fichier, avec son extention, est dans la cellule IV5

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
ChDir "Z:\Repertoire\Sous répertoire éventuel\"
Application.DisplayAlerts = False
Workbooks.Open Filename:="Z:\Répertoire\Sous répertoire éventuel\" & ActiveWorkbook.Worksheets(1).[iv5]

Tehel

[lavalois]

Excuse-moi


Je me suis peut-être mal expliqué. Ce que je veux c'est de sélectionner une feuille (onglet) d'un autre fichier ''BD'' à partir d'une cellule ''A1'' d'un autre fichier ''Formulaire''. Cette cellule aura la même valeur (nom) que celui de la feuille du fichier ''BD''. présentement les feuilles du fichier ''BD'' se nomment page1 et page2. Si dans le fichier ''formulaire'' la cellule ''A1'' = page1 la valeur de la cellule ''A2'' du formulaire devrait se copier dans la feuille '' page1'' du fichier ''BD''. Mais présentement ma macro BD ne fonctionne pas dans le fichier ''formulaire. La sélection de la feuille du fichier ''BD'' ne se fait pas.

excel 2003

Merci

[LePapat26]

Hello,

la sélection de la 'bonne' feuille dans le fichier BD.xls ne se fait pas car elle n'est pas implémentée . Pour le moment, le programme écrit 'bonjour' dans la dernière feuille active du fichier BD.xls.

Tu peux t'en rendre compte facilement :
- ouvre le fichier BD.xls
- sélectionne PAGE1
- sauvegarde puis ferme le fichier

à chaque fois que tu lanceras ta macro, elle écrira dans la PAGE1, que tu écrives PAGE1 ou PAGE2 ou TITI ou TOTO dans la cellule A1 du classeur FORMULAIRE.xls.

Pour résoudre leproblème, il faut que tu stockes la valeur inscrite dans la cellule A1 de FORMULAIRES.xls

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NomPage = Cells(1, 1).Value

puis que tu actives la feuille NomPage dans BD.xls avant de faire la copie

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets(NomPage).Select

LePapat

PS : Attention si tu veux sélectionner la feuille nommée "2" du classeur FORMULAIRE.xls, il vaut mieux écrire Sheets("2").Select car dans ton code tu appelles la 2éme feuille du classeur qui peut s'appeller "3", "4", voire "1"