Öffnen einer Excel-Arbeitsmappe ein makro aus Access
Zunächst, ich habe gesucht und gelesen, ähnliche threads und ich habe versucht die Lösungen, die vorgeschlagen wurden, und löste das andere Leute das problem (meist Verwendung von einfachen Anführungszeichen um den Namen der Arbeitsmappe), aber es hat nicht funktioniert in meinem Fall.
Was ich tun möchte, ist sehr einfach: ich will, nennen eine Excel-Arbeitsmappe Zugreifen. Ist die Arbeitsmappe bereits geöffnet ist (mit VBA) das ist also nicht ein Problem der Arbeitsmappe geschlossen wird. Hier ist, wie ich versucht, das makro auszuführen:
Application.Run "'" & xlWb.Path & "\" & xlWb.Name & "'" & "!mainParcourirTrouverItem"
Ergebnisse in:
'I:\47491\...\Trouver items global.xlsm'!mainParcourirTrouverItem
Habe ich versucht, ein paar Variationen wie nicht mit dem vollständigen Pfad (nur der Dateiname), die nicht mit einfachen Anführungszeichen, das hinzufügen von Klammern an das Ende der sub ' s Namen...
Außerdem habe ich doppelt überprüft, dass die Schreibweise der sub name ist tatsächlich korrekt. Ich weiß wirklich nicht sehen 😐
Oh, und nur für die Zwecke der Angabe von Kontext, hier ist der komplette sub um diesen code:
Private Sub Commande10_Click()
Dim xlApp As Excel.Application
Dim xlWb As Excel.Workbook
Set xlApp = New Excel.Application
With xlApp
.Visible = False
Set xlWb = .Workbooks.Open(FichierImportExcel, ReadOnly:=True)
End With
Application.Run "'" & xlWb.Path & "\" & xlWb.Name & "'" & "!mainParcourirTrouverItem"
' Call importer_transitsrubriques_Click
End Sub
Vielen Dank.
- Ich benutze
"'" & ThisWorkbook.Name & "'!SetMenu"
in meinem eigenen code. Haben Sie versucht, mit nurApplication.Run "'" & xlWb.Name & "'" & "!mainParcourirTrouverItem"
sein, da die Datei bereits geöffnet ist? (Entfernen Sie einfach die parth von dem Anruf.)
Du musst angemeldet sein, um einen Kommentar abzugeben.
xlApp.Run
nichtApplication.Run
Application
beziehen sich auf Access, nicht Excel.