Faire appel à deux fichier excel dans une macro

Fermé
cejiceji - 7 janv. 2013 à 23:34
Heliotte Messages postés 1491 Date d'inscription vendredi 26 octobre 2012 Statut Membre Dernière intervention 28 janvier 2013 - 9 janv. 2013 à 08:56
Bonjour,
est ce que c'est possible de faire appel à deux fichiers excel dans une seule macro (la macro est dans l'un des deux , j'ai besoin d'informations d'autre classeur ) si c'est possible comment faire ?



A voir également:

1 réponse

Heliotte Messages postés 1491 Date d'inscription vendredi 26 octobre 2012 Statut Membre Dernière intervention 28 janvier 2013 92
9 janv. 2013 à 08:56
Bonjour,

Il existe plusieurs méthode. Pour faire simple:

- Vous ne connaissez pas le répertoire et/ou le nom du fichier à ouvrir .. utilisez :
Sub OuvrirClasseur()
    Dim strFichier As String
    '
    ChDrive ("C:")
    ChDir "\Dossier\Excel\"
        strFichier = Application.GetOpenFilename("Excel Files (*.xls), *.xls")
    If (strFichier <> "") Then
        If (strFichier <> "Faux") Then
            MsgBox strFichier
        End If
    End If
End Sub


- Vous connaissez l'emplacement et le nom du fichier:
-- Application.Workbooks.Open "d:\tuto.xls"

- Travailler directement sur un classeur fermé .. là, on récupère les informations sans ouvrir ni fermer le classeur. Gain de temps et d'écriture
0