VBA Ouvrir des fichiers Excel dans des fenêtres séparées [Résolu] - VB / VBA

VBA Ouvrir des fichiers Excel dans des fenêtres séparées Vba ouvrir les fichiers excel des sous dossiers, uniquement. (Résolu) » Forum - Excel Fonction ouvrir fichier en VBA Excel [Résolu] » Forum - VB / VBA Excel VBA : Ouvrir un fichier nom variable (Résolu) » Forum - VB / VBA Excel 2007 VBA: Ouvrir un fichier [Résolu] (Résolu) » Forum - VB / VBA [VBA] Création d'un nouveau classeur Excel... [Résolu] (Résolu) » Forum - VB / VBA

Bonjour,
Je souhaite à partir d'une macro vba Excel copier/coller un onglet Excel dans une vrai nouvelle feuille Excel ... dans une autre application Excel (je sais pas si je me fais bien comprendre) ...
Bon, à dire vrai je penses que ce n'est pas possible, mais sait-on jamais ...

Peut être existe-il une option spéciale !

Thank you everybody !

Cdt
Wre.Less

Forum

VBA Ouvrir des fichiers Excel dans des fenêtres séparées Vba ouvrir les fichiers excel des sous dossiers, uniquement. (Résolu) » Forum - Excel Fonction ouvrir fichier en VBA Excel [Résolu] » Forum - VB / VBA Excel VBA : Ouvrir un fichier nom variable (Résolu) » Forum - VB / VBA Excel 2007 VBA: Ouvrir un fichier [Résolu] (Résolu) » Forum - VB / VBA [VBA] Création d'un nouveau classeur Excel... [Résolu] (Résolu) » Forum - VB / VBA

Web: www.shapebootstrap.net

12 réponses

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Bonjour,

Essaie ceci, a adapter le nom de la feuille:

Sub CopierUneFeuilleDunClasseurDansLautre()     Dim FichierOùCopier, FichierOùColler As String     FichierOùCopier = ActiveWorkbook.Name     Application.Workbooks.Add     FichierOùColler = ActiveWorkbook.Name     Workbooks(FichierOùCopier).Activate     Sheets("Feuil1").Select     Sheets("Feuil1").Copy After:=Workbooks(FichierOùColler).Sheets(2) End Sub 

Reply
réponses:
  • wire less

    Arffff ...
    Merci mais ... ça colle bien ma feuil1 mais dans la même instance d'excel ... moi je souhaiterais faire la même chose mais dans une instance différente. (Pour pouvoir comparer deux feuilles d'excel dans deux écrans différents par exemple.)

    Pour info, mon code actuelle est celui-ci ... il me duplique bien ma feuille excel mais malheureusement dans la même application excel.

     Sub Blabla()         Feuil1.Select     Feuil1.Copy End Sub 

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Quand tu regardes dans la barre de tâche en bas, tu as tes 2 classeurs Excel!

Reply
réponses:
  • cs_Le Pivert

    Avec ce code , tu n'ajoutes même pas un classeur!!!!!!!!!!!



    Sub Blabla()    
    Feuil1.Select
    Feuil1.Copy
    End Sub


    Application.Workbooks.Add 'ajoute un classeur

  • wire less

    Arfff ... Les mystères de VBA EXCEL !!

    Chez moi ce code m'ouvre bien un nouveau classeur.

     Sub Blabla()         Feuil1.Select     Feuil1.Copy End Sub 


    Bon ... Mon code est un tout petit peu plus complexe mais marche très bien pour ouvrir un nouveau classeur d'une seule feuille contenant une copie de ma feuille 1.

     Sub Blabla()        Application.ScreenUpdating = False     Feuil1.Visible = xlSheetVisible     Feuil1.Select     Feuil1.Copy     Feuil1.Visible = xlSheetVeryHidden     Application.ScreenUpdating = True End Sub 


    Mais, j'aimerais bien que la copie soit dans un Excel séparé pour pouvoir faire des comparaison sur deux écrans différents.
    :-/

    Application.Workbooks.Add
    M'ouvre bien un nouveau classeur, mais dans la même application ...
    Je sais toujours pas si je me suis fait comprendre ! Par nouvelle application, je veux dire une fenêtre d'Excel séparé qui permette de faire des comparaisons côte à côte !!
    Thank you !!

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Oui, j'ai très bien compris, qu'en cochant Afficher les fenêtres côte à côte cela ne fonctionne pas. Parce que c'est la même application. Cela n'a rien a voir avec la programmation. Il faudrait faire une recherche sur Google.

Reply

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Je me rappelle qu'avec XP et Office2003, je pouvais voir les 2 fenêtres!
Maintenant je suis sous Windows10 et Office 2007.
Je pensais que cela provenait du 2ème classeur qui n'était pas enregistré. Mais avec d'autres classeur enregistrés, c'est la même chose!

Reply

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Petite recherche sur Google et voilà:

http://www.pcastuces.com/pratique/astuces/3907.htm

Reply
réponses:
  • wire less

    TADA !!
    Merci CS_LE_PIVERT !

    Mais ce n'est toujours pas ce que je cherche à faire. J'essais à partir d'une macro à un nouveau classeur EXCEL différent ... mais je penses que se ne sera pas possible car les fonctions excel ne peuvent interagir qu'avec les classeurs de l'instance courante d'Excel.

    Deux programmes Excel différents doivent certainement être totalement hermétique l'un pour l'autre !

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Je sais toujours pas si je me suis fait comprendre ! Par nouvelle application, je veux dire une fenêtre d'Excel séparé qui permette de faire des comparaisons côte à côte !!

C'est bien ce que tu as écrit!
Tu vois tes 2 classeurs!
Je suis largué :-(

Reply
réponses:
  • wire less

    Oui. Je vois mes deux classeurs ... mais dans le même programme Excel.
    J'aurais aimé faire la même mais dans deux programmes Excel différents :-/

    Bon. J'ai ajouté

    Windows.BreakSideBySide Windows.Arrange ArrangeStyle:=xlVertical

    à mon code ... je vais en rester à ta solution de deux classeurs séparé verticalement dans la même fenêtre.

    Merci CS_LE PIVERT.
    Je laisse le sujet ouvert un peu ... si jamais quelqu'un a la vrai réponse ... sinon je conclurais que ce ne pas faisable .

Marsh

NOVEMBER 9, 2013 AT 9:15 PM

Cela peut être possible si tu as 2 versions d'Office sur ta machine. Mais je ne sais pas si la nouvelle version d'Office n'écrase pas la précédente!
Voilà, je pense que l'on va en rester là pour préserver nos méninges qui ont fort à faire déjà avec la programmation.

Reply

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed