Discussion :

[jenniferIUP]

bonjour,

j'orais besoin d'ouvrir un fichier préci nommé "calcul du RIS" a partir d'un formulaire excel.
Je sais que je peut faire que excel s'ouvre grâce à l'assitant bouton de commande mais je ne sais comment faire pour quil ouvri un fichier précis

pouriez vous m'aider!

merci d'avance

[LedZeppII]

Bonjour,

Code :

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

1
2
3
Dim strFichierXL As String
strFichierXL = "chemin\calcul du RIS.xls"
Application.Workbooks.Open strFichierXL

Comme tu es déjà dans Excel, Application fait référence à Excel.

A+

[jenniferIUP]

access n'est pas d'accord avc ".Worksbook" qu'est ce que cela signifie t il?

[Invité]

Bonjour

Tu es dans Access ou Excel ?

Car il faut déclarer une instance d'Excel si tu es sous Access, un peu de lecture : Piloter Excel via Access : exemples d'opérations courantes effectuées sur cellules, plages, lignes ou colonnes excel à partir d'access.

Philippe

[LedZeppII]

Bonjour,

un exemple dans Access (avec une référence VB à Microsoft Excel x.x Object Library")

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim appXL As Excel.Application, strXLfile As String
 
strXLfile = "chemin\calcul du RIS.xls"
 
On Error Resume Next
Set appXL = GetObject(, "Excel.Application")
On Error GoTo 0
If appXL Is Nothing Then
   Set appXL = New Excel.Application
   appXL.Visible = True
   appXL.UserControl = True
End If
appXL.Workbooks.Open strXLfile
AppActivate appXL.Caption

Sinon il a toujours cette bonne vielle méthode : Comment ouvrir un fichier en utilisant l'exécutable associé ?

A+

[rockys]

bonjour, j'ai utiliser le code que vous avez mis, il passe mais j'ai un problème sur le chemin pour ouvrir le fichier que je souhaite.
Le code m'ouvre bien Excel mais il m'envoie une heureux 1004.