Sous access Ouvrir excel en premier plan

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

3 réponses

  1. Contributeur
    bonjour, quand je teste ton code, Excel reste au premier plan.
    comment y fais-tu appel?
    0
    1. J'appelle la fonction avec un call OuvrirExcel(....)
      0
      1. Contributeur
        ce pourrait-il, qu'après ce call, Access revienne en avant-plan, à cause d'une action qui s'y passe?
        0

    Discussions similaires

    arriere plan

    1 réponse