Initialiser automatiquement une variable workbook

Bonsoir !

J'ai actuellement le code suivant :

Dim c As Workbook, recap As Worksheet
    Set c = Workbooks("CICE")
    Set recap = c.Worksheets("Recap 2018")

Cependant j'aimerais que le "CICE" et le "Recap 2018" soient remplacés par une variable car ceux-ci varient d'un classeur à l'autre.

Mettre une variable String contenant le texte exacte des titres à l'intérieur des fonctions n'a pas marché, y a t-il une autre solution ?

Merci !

Bonsoir,

Dim c As Workbook, recap As Worksheet
Dim CICE as String
Dim RecapAA as String
CICE = "CICE" 'ou bien [A1] cellule qui contient la valeur variable
RecapAA = "Recap 2018"
    Set c = Workbooks("CICE")
    Set recap = c.Worksheets(RecapAA)
    

Bonsoir,

Essaie l'utilisation de deux inputbox qui te permettront de saisir les valeurs que tu veux voir à la place de CICE et Récap 2018.

Cordialement