Discussion :

[chris6767]

Bonjour,
Dans une macro, je voudrais activer une feuille dont une partie du nom est variable: SuperMad-20130306.xls
La date 20130306 change et pourtant j'aimerai que cette feuille soit activée quelque soit la date. Quels caractères de masques puis-je utilisé ?
Je pensais à quelque chose du genre
Windows("SuperMad_EXP-********.xls").Activate
Je précise que la feuille sera ouverte manuellement.
Merci pour votre aide
Excel 2010

[Guiiand]

Bonjour,

En remplaçant

Code :

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

Windows("SuperMad_EXP-********.xls").Activate

Par

Code :

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

Windows("SuperMad_EXP-" & * & ".xls").Activate

Cela devrait fonctionner

[chris6767]

Désolé mais j'ai une erreur de compilation.
Attendu : Expression

[PMO2017]

Bonjour,

Votre demande est ambiguë. Vous parlez de feuille et vous utilisez Windows.
Si la recherche est celle d'une feuille dans le classeur de la macro (c'est ce que j'ai interprété) alors essayez le code suivant

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Sub aa()
Const DEBUT_NOM_FEUILLE As String = "SuperMad-"   'à adapter
Dim S As Worksheet
'---
For Each S In ActiveWorkbook.Sheets
  If Left(S.Name, Len(DEBUT_NOM_FEUILLE)) = DEBUT_NOM_FEUILLE Then
    S.Activate
    Exit For
  End If
Next S
End Sub

[chris6767]

Bonjour,

En fait, je ne sais pas écrire de macro sous excel. Je crée mes macros en enregistrant les commandes que je souhaite voir réaliser.
Je voulais copier un onglet de la feuille SuperMad dans un onglet d'une autre feuille. J'ai donc créer la "macro" suivante par enregistrement des commandes que j'ai réalisées :

Code :

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

1
2
3
4
5
6
7
8
 Windows("SuperMad_EXP-*.xlsm").Activate
    Sheets("Composants").Select
    Cells.Select
    Selection.Copy
    Windows("SUIVI_Q_P_A_T_EXP-*.xlsm").Activate
    Sheets("Feuil2").Select
    Range("A1").Select
    ActiveSheet.Paste

D'où mon problème avec le nom de fichier qui contient une date (Dans les 2 feuilles d'ailleurs).
En tout cas, je vais tester ta solution.
Merci