Bouton: Ouvrir fichier en premier plan

Bonjour,

Après pas mal de recherche et d'essais je suis toujours bloqué...

J'espère que vous allez pouvoir m'aider !

Ma question :

Sur un formulaire j'ai un bouton "Ouvrir fichier".

Ce que je souhaite c'est ouvrir ce fichier excel existant en premier plan (au dessus du formulaire).

Voici mon code :

Private Sub Open_result_Click()
Dim xlApp As New Application
    Set xlApp = New Excel.Application
        xlApp.Workbooks.Open ("E:\Bugs list.xlsx")
        xlApp.WindowState = xlNormal
        xlApp.Visible = True
        xlApp.ActiveWorkbook.Activate 
End Sub

Quand j'exécute ce code le fichier s'ouvre bien mais en arrière plan !!!!

Pls help me !!!

Pour info voici comment je lance mon formulaire dans "thisworkbook":

Private Sub Workbook_Open()
Application.WindowState = xlMinimized
Main_Interface.Show
End Sub

Salut,

Si on avait ton fichier, on pourrait voir à quoi ressemble ton UserForm "Main_Interface", éventuellement faire des essais, ....

Cordialement.

Je pensais que ma question était assez simple...

Pour rappel : [u]Ouvrir une nouvelle instance d'excel et afficher le ficher en premier plan.

[/u]

Mais bon voici un fichier pour faire des tests...

Attention il faut créer le fichier E:\Bugs_list.xlsx

Re-bonjour,

Je t'ai demandé ton fichier simplement pour voir s'il avait quelque chose de particulier. J'ai maintenant fait des essais sur cette base et je dois te dire que chez moi le fichier Bugs_list.xlsx s'ouvre automatiquement en avant-plan par rapport à ton UserForm ; en d'autres mots, le fichier ouvert au travers du UserForm est le seul visible à l'écran. J'ai déjà utiliser passablement de fois cette possibilité d'ouvrir un fichier au travers d'un code et j'ai toujours vu qu'il en est ainsi.

Veux-tu alors parler d'une autre possibilité ? Autrement je ne vois pas comment t'aider

A te relire.

Rechercher des sujets similaires à "bouton ouvrir fichier premier plan"