Discussion :

[Piccou]

bonjour

je voudrai ouvrir automatiquement un fichier excel dans mon application access. Le but étant que le fichier s'ouvre automatiquement dans un enchainement d'action.

Pour cela je sais ouvrir avec une macro excel (en sélectionnant ouvrir une application). En revanche j'en reste la

j'ai trouvé sur un forum un code VBA, mais en ayant aucune notion je ne le comprend pas et je ne sais quoi en faire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub cmdOpenExcel_Click()
Dim xls As Excel.Application
On Error GoTo errHnd
Set xls = CreateObject("Excel.Application")
xls.Workbooks.Open "c:\monfichier.xls"
xls.Visible = True
Exit Sub
errHnd:
MsgBox "Erreur N° " & Err.Number & vbLf & Err.Description, , Err.Source
End Sub

si quelqu'un saurait m'interpréter ça et me dire comment faire pour ouvrir un fichier excel avec access

Je vous remercie d'avance

bonne journée !!

[loufab]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set xls = CreateObject("Excel.Application")

on ouvre l'application Excel

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

xls.Workbooks.Open "c:\monfichier.xls"

On ouvre le fichier spécifié

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

xls.Visible = True

On affiche l'application avec le fichier ouvert précédemment.

Cordialement,