Bonjour a tous;

Ma demande paraît simple mais je ne trouve rien sur les forums qui comble mes attentes.

Je souhaiterais déclarer deux classeurs ouverts:

F1 = TGRI (Tableau de Gestion du réseau incendie).xlsm 'source
F2 = Export donnée 10.12.2020.xlsx 'cible

Et pouvoir faire appel à eux à n'importe quel moment dans mon code (code en boucle). Je vous dépose un exemple de ce qu'il a été déjà fait.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub SyncTGRISDIS() 'Construction
 
 
       Dim EF1 As Workbooks 'Source
    Dim F1 As Worksheet 'feuille source
    Dim EF2 As Workbooks 'Cible
    Dim F2 As Worksheet 'feuille Cible
 
    '---Déclaration du TGRI sur la variable "F1" d'un classeur déja ouvert
    Set EF1 = Workbooks("TGRI (Tableau de Gestion du réseau incendie).xlsm")
    Set F1 = EF1.Sheets("TGRI")
    '---Déclaration du dossier "export SDIS" sur la variable "F2" d'un classeur déja ouvert
    Set EF2 = Workbooks("Export donnée 10.12.2020.xlsx").Sheets("Feuil1")
    Set F2 = EF2.Sheets("Feuil1")