Discussion :

[Elijah37]

Bonjour,

Je cherche un moyen de Creer un nom de variable en VBA a partir d'une valeur d'une cellule pour ouvrir et activer un fichier en fonction de cette valeur.

Un truc du genre

Code :

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

1
2
3
Ouvrir(Prefixe_Du_Fichier & Variable & suffixe_du_fichier)
Windows.(Prefixe_Du_Fichier & Variable & suffixe_du_fichier).activate

Les parties en rouges sont les bous de code que je n'arrive pas à trouver(pour l'ouverture , c'est par pure fainéantise).

[zazaraignée]

Pour obtenir une base pour ton code, utilise l'enregistreur de macros. Tu pourras modifier le code par la suite.

Un nom de variable peut être n'importe quoi. Je crois que tu confonds le nom de la variable et son contenu. Tu dois mettre le nom du fichier dans une variable de chaîne (String) puisque les fonctions d'ouverture de fichier on besoin d'un paramètre de type String pour le nom complet du fichier.

Code :

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

1
2
3
Dim NomFichier As String
NomFichier = ActiveWorkbook.Path & "\" & ActiveCell.Value & ".xls"
' code pour ouvrir le fichier...

[Elijah37]

Je veux faire un truc du style :

Code :

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

1
2
3
 
Ouvrir("kiki" & ActiveCell.Value &"koko.xls")
Windows.("kiki" & ActiveCell.Value &"koko.xls").activate

Est ce que ca peut marcher ?

[zazaraignée]

D'après toi... tu as essayé d'exécuter ton code tel quel ?

Je vois bien que tu es débutant(e) en programmation VBA, mais comme je te disais, l'enregistreur de macro est ton ami.

Bon! Quelques pistes (parce que je crois fermement qu'on se souviens davantage de ce que l'on cherche) :

Il y a dans l'aide des informations intéressantes sur les objets Workbook, Worksheet, Sheet, Cell et Range, et aussi sur les collections Workbooks, WorkSheets, Sheets et Cells.

Pour ouvrir un classeur, regarde du côté de la méthode Open de l'objet Workbook. La collection Workbooks permet, entre autres choses, d'activer l'un des classeurs ouverts via sa méthode Activate.

Code :

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

1
2
Workbook.Open("nomDuClasseur")
Workbooks("nomDuClasseur").Activate

Tu t'amuseras beaucoup avec les tutoriels.

[Elijah37]

En faite je sors de 3 mois de stage en Access-VBA et d'un Mois d'interim en VBA. Mais on est vendredi Aprem et je suis totalement mort

Un gars dans la boite m'a demandé un truc sur excel et je touche pas du tout Excel (contrairement à access). Fodrait que je vois comment ca marcheun jour hihi.

Merci pour l'aide ^^