Sous access Ouvrir excel en premier plan

Flomen -  
RV71 Messages postés 656 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Sous Access j'ouvre un fichier excel, je recherche la solution pour l'afficher en premier plan
Voici mon code
Function OuvrirExcel(ExcelID As String) As String
Dim EXCEL As New EXCEL.Application
OuvrirExcel = ""
Set EXCEL = CreateObject("Excel.Application")
EXCEL.Workbooks.Open ExcelID, readOnly:=False
EXCEL.Visible = True
Set EXCEL = Nothing
End Function

Cordialement
A voir également:

3 réponses

yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour, quand je teste ton code, Excel reste au premier plan.
comment y fais-tu appel?
0
Flomen
 
J'appelle la fonction avec un call OuvrirExcel(....)
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584
 
ce pourrait-il, qu'après ce call, Access revienne en avant-plan, à cause d'une action qui s'y passe?
0
RV71 Messages postés 656 Date d'inscription   Statut Membre Dernière intervention   31
 
Bonjour,

tu avais déjà un souci avec l'ouverture en premier plan.
https://forums.commentcamarche.net/forum/affich-36588314-outlook-en-premier-plan

Cela confirme donc un souci sur ta config...

A+
0