Sujet Précédent Sujet Suivant

Utiliser un classeur d'un fichier sans l'ouvrir

Résolu/Fermé
NoviceVBA2017 Messages postés 26 Date d'inscription dimanche 29 janvier 2017 Statut Membre Dernière intervention 6 mai 2019 - 29 janv. 2017 à 19:28
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 29 janv. 2017 à 23:00
Bonjour,

Je suis novice en programmation VBA, j'ai fait des recherches mais je n'utilise peut être pas les bons mots clé...

Je cherche tout simplement à faire cette action en utilisant une macro :

J'ouvre mon fichier Excel A.
Lorsque je lance ma macro de mon fichier A, le programme va comparer la cellule A1 du fichier A, et la comparer avec la cellule A1 d'un fichier B (qui est dans un autre dossier).

J'ai réussi à trouver sur le forum comment ouvrir un fichier dans un autre dossier mais ça ne me satisfait pas : je ne veux surtout pas que le fichier B s'ouvre (ou tout du moins, s'affiche).
Je ne veux pas non plus passer par la copie de la feuille du fichier B vers le fichier A pour ensuite les comparer.

Pouvez-vous me venir en aide?

Cordialement
A voir également:

1 réponse

Réponse 1 / 1
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
29 janv. 2017 à 22:22
Bonjour,

Si tu veux comparer tes 2 fichiers sans toucher au fichier B, le plus simple et la plus rapide, c'est d'ouvrir le B en masqué, récupérer les données dans une table et le refermer. Ensuite ta comparaison en table sera beaucoup plus rapide, même sans savoir le résultat précis que tu souhaites.
0
NoviceVBA2017 Messages postés 26 Date d'inscription dimanche 29 janvier 2017 Statut Membre Dernière intervention 6 mai 2019
29 janv. 2017 à 22:35
Bonjour gbinforme,

Tout d'abord merci pour cette réponse rapide.

Oui cette option d'ouvrir le fichier en masqué conviendrait très bien à l'utilisation que je veux en faire. Je ne savais pas que c'était possible, je vais chercher le code.

Merci encore!
0
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
29 janv. 2017 à 23:00
re
Avec ceci tu récupères dans la table 'tbd' ton classeur pour pouvoir faire tes comparaisons ensuite. 
Dim tbd
    Application.ScreenUpdating = False
    Workbooks.Open chemin
    tbd = ActiveSheet.UsedRange.Cells.Value
    ActiveWorkbook.Close False
    Application.ScreenUpdating = True
0

Discussions similaires

"Aucune application permettant d'ouvrir cette URL"
sidojaice -
JIP -

24 réponses