Fichier exécutable

Bonjour,

Je pense que non. C'est vrai que ce serait génial.

--
Patrick

"DENIS" <anonymous@discussions.microsoft.com> wrote in message
news:16fb01c4bc3d$64c11960$a601280a@phx.gbl...
Bonjour à tous,

Je souhaiterais savoir si il est possible de transformer
un fichier excel en un exécutable ?

Ou simplement qu'Excel n'apparaisse pas en arrière plan
lors de l'ouverture de l'userForm.

Merci

Bonjour,

Pour répondre au 2ème paragraphe de votre question.
Veuillez tester, dans un nouveau classeur, le code ci-dessous:

Construisez un UserForm et nommez-le UserForm1
Dans ce dernier ajoutez un CommandButton et nommez-le CommandButton1
Insérez le code évènementiel suivant dans le CommandButton
'***********************
Option Explicit
Private Sub CommandButton1_Click()
Me.Hide
Application.Visible = True
End Sub
'***********************

Dans un module général copiez le code suivant
'***********************
Option Explicit
Sub MasqueXL()
Application.Visible = False
UserForm1.Show
End Sub
'***********************

EXPLICATION:
Lorsque vous lancerez la routine MasqueXL l'application Excel ne sera
plus visible et votre UserForm s'affichera. En cliquant sur le CommandButton
le UserForm se masquera et l'application Excel se réaffichera.

Est-ce que ça vous plaît ?

Cordialement.

PMO
Patrick Morange

Bonjour à tous,

Je souhaiterais savoir si il est possible de transformer
un fichier excel en un exécutable ?

Ou simplement qu'Excel n'apparaisse pas en arrière plan
lors de l'ouverture de l'userForm.

Merci

Bonjour,

Pas mal l'idée de PMO..

A mon avis il n'y a qu'une solution pour la première partie... rendre excel
en exécutable...
Partir de VB, créer un objet excel, ouvrir un fichier et travailler dedans.
Pour autant que tu aies Visual Basic, c'est relativement facile...
Tu as alors un exécutable ".exe" qui utilise excel...
A+++
Bruno

"DENIS" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 16fb01c4bc3d$64c11960$a601280a@phx.gbl...
Bonjour à tous,

Je souhaiterais savoir si il est possible de transformer
un fichier excel en un exécutable ?

Ou simplement qu'Excel n'apparaisse pas en arrière plan
lors de l'ouverture de l'userForm.

Merci

Bonjour Denis,

Option Explicit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Excel.Workbooks.Count = 1 Then
Excel.Application.Quit
Else
Excel.Application.Visible = True
End If
End Sub

Private Sub Workbook_Open()
Excel.Application.Visible = False
UserForm1.Show
End Sub

Starwing

Excellent !
et merci.

Denis

-----Message d'origine-----
Bonjour,

Pour répondre au 2ème paragraphe de votre question.
Veuillez tester, dans un nouveau classeur, le code ci-
dessous:

Construisez un UserForm et nommez-le UserForm1
Dans ce dernier ajoutez un CommandButton et nommez-le
CommandButton1

Insérez le code évènementiel suivant dans le
CommandButton

'***********************
Option Explicit
Private Sub CommandButton1_Click()
Me.Hide
Application.Visible = True
End Sub
'***********************

Dans un module général copiez le code suivant
'***********************
Option Explicit
Sub MasqueXL()
Application.Visible = False
UserForm1.Show
End Sub
'***********************

EXPLICATION:
Lorsque vous lancerez la routine MasqueXL l'application
Excel ne sera

plus visible et votre UserForm s'affichera. En cliquant
sur le CommandButton

le UserForm se masquera et l'application Excel se
réaffichera.

Est-ce que ça vous plaît ?

Cordialement.

PMO
Patrick Morange

Bonjour à tous,

Je souhaiterais savoir si il est possible de
transformer

un fichier excel en un exécutable ?

Ou simplement qu'Excel n'apparaisse pas en arrière
plan

lors de l'ouverture de l'userForm.

Merci

.