Ö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 nur Application.Run "'" & xlWb.Name & "'" & "!mainParcourirTrouverItem" sein, da die Datei bereits geöffnet ist? (Entfernen Sie einfach die parth von dem Anruf.)
InformationsquelleAutor ApplePie | 2012-08-20
Schreibe einen Kommentar