OVH Cloud OVH Cloud

Ouvrir 2 fichiers dans la même instance

11 réponses
Avatar
Bruno Guerpillon
Bonjour

Voila une question qu'elle est bête certainement.
Excel 2000.

Quand je tapes : excel classeur1.xl, j'ai une instance Excel.exe qui démarre
Quand je tapes : excel classeur2.xl, j'ai une 2eme instance Excel.exe qui
démarre

La question est : comment faire (peut importe la facon/language) pour ouvrir
le 2eme fichier dans la 1ere instance (donc le but est de n'avoir qu'une
seule instance ouverte)

Cordialement

Bruno

1 réponse

1 2
Avatar
Bruno Guerpillon
Haha et je suis tombé dans le panneau :)


"jps" a écrit dans le message de news:
%
merci, bruno, mais je plaisantais, ce que je fais toujours lorsque je suis
à cent lieues de comprendre quoi que ce soit...
jps

"Bruno Guerpillon" a écrit dans le message de news:
44911d0c$0$5267$
Salut JPS

N'applique pas ce que je viens de dire, c'est une grosse bétise, je me
suis trompé de post :)
Pour reclarifier, ce que j'ai poster dans ce post c'est une méthode en VB
pour passer automatiquement Excel au 1er plan.
Je l'utilise dans un programme forms (oracle) pour ouvrir mes 2 fichiers
(ce que je cherchais donc à faire) puis à passer Excel au 1er plan (le
code VB précédent).

Pour ouvrir 2 fichiers excel dans la même instance, on utilise des
commandes DDE depuis un form Oracle.

Cordialement

Bruno

"jps" a écrit dans le message de news:
%23JCq72%
merci, bruno : j'applique sur le champ :-)))))
jps

"Bruno Guerpillon" a écrit dans le message de news:
44903017$0$14855$
Voila la solution pour ceux qui cela pourrait interesser

Code réalisé, testé avec VB6.

====================================================== >>>> ====================================================== >>>>
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd
As Long) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long,
ByVal nCmdShow As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA"
(ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Const SW_NORMAL = 1

Private Sub Form_Load()
Dim hWndXL As Long, PathXL As String
PathXL = "D:Program FilesMicrosoft OfficeOffice10Excel.exe"
hWndXL = FindWindow("XLMAIN", vbNullString)
If hWndXL = 0 Then
Shell PathXL, vbNormalFocus
Else
ShowWindow hWndXL, SW_NORMAL
SetForegroundWindow hWndXL
End If
While Forms.Count
Unload Forms(0)
DoEvents
Wend

End Sub

====================================================== >>>> ====================================================== >>>>

"Bruno Guerpillon" a écrit dans le message de news:
448ed9c9$0$12747$
Bonjour

Voila une question qu'elle est bête certainement.
Excel 2000.

Quand je tapes : excel classeur1.xl, j'ai une instance Excel.exe qui
démarre
Quand je tapes : excel classeur2.xl, j'ai une 2eme instance Excel.exe
qui démarre

La question est : comment faire (peut importe la facon/language) pour
ouvrir le 2eme fichier dans la 1ere instance (donc le but est de
n'avoir qu'une seule instance ouverte)

Cordialement

Bruno


















1 2