Ouvrir 2 fichiers excel dans le même classeur

Résolu/Fermé
guillaume gdco
Messages postés
70
Date d'inscription
samedi 15 août 2009
Statut
Membre
Dernière intervention
30 août 2020
- 6 avril 2020 à 13:20
guillaume gdco
Messages postés
70
Date d'inscription
samedi 15 août 2009
Statut
Membre
Dernière intervention
30 août 2020
- 6 avril 2020 à 16:44
Bonjour,

Bonjour

j'ai deux fichier excel de 1 feuille chacun que je souhaiterai ouvrir en même temps dans le même classeur qui présenterai les deux feuilles.


Merci

Configuration: Windows / Firefox 60.0

4 réponses

yg_be
Messages postés
19975
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
9 août 2022
1 170
6 avril 2020 à 14:38
bonjour, fichier Excel et classeur Excel étant synonymes, peux-tu réécrire ce que tu veux obtenir?
0
guillaume gdco
Messages postés
70
Date d'inscription
samedi 15 août 2009
Statut
Membre
Dernière intervention
30 août 2020

6 avril 2020 à 15:13
j'ai deux classeurs excel de 1 feuille chacune que je souhaiterai ouvrir en même temps dans le même classeur
0
yg_be
Messages postés
19975
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
9 août 2022
1 170
6 avril 2020 à 15:19
as-tu commencé à écrire ton code VBA? dans quel classeur le code est-il présent?
0
guillaume gdco
Messages postés
70
Date d'inscription
samedi 15 août 2009
Statut
Membre
Dernière intervention
30 août 2020
> yg_be
Messages postés
19975
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
9 août 2022

6 avril 2020 à 15:28
non pas encore de code, je souhaitais savoir si il était déjà possible d'ouvrir ces deux feuilles ensembles
0
yg_be
Messages postés
19975
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
9 août 2022
1 170 > guillaume gdco
Messages postés
70
Date d'inscription
samedi 15 août 2009
Statut
Membre
Dernière intervention
30 août 2020

6 avril 2020 à 15:29
ce n'est possible qu'en copiant au moins une des deux feuilles.
0
guillaume gdco
Messages postés
70
Date d'inscription
samedi 15 août 2009
Statut
Membre
Dernière intervention
30 août 2020

6 avril 2020 à 15:40
Dans ce cas je peux commencer par utiliser ce code pour copier a feuille

Dim dv1 As Object
Dim cel As Range
Dim d°L As Long
  ' Mémoriser les valeurs de la feuille 1 sans doublon
  Set dv1 = CreateObject("Scripting.Dictionary")
  With Worksheets(1)
    d°L = .Cells(.Rows.Count, "A").End(xlUp).Row
    For Each cel In .Range("A1:A" & d°L)
      dv1(cel.Value) = ""
    Next
  End With
0
yg_be
Messages postés
19975
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
9 août 2022
1 170
6 avril 2020 à 15:55
plus simple:
Private Sub cp()
Dim classeur1 As Workbook, classeur2 As Workbook
Set classeur1 = ThisWorkbook
Set classeur2 = ThisWorkbook
classeur1.Worksheets(1).Copy After:=classeur2.Worksheets(1)
End Sub
0
guillaume gdco
Messages postés
70
Date d'inscription
samedi 15 août 2009
Statut
Membre
Dernière intervention
30 août 2020

6 avril 2020 à 16:44
Merci!
0