Wie kommuniziere ich zwischen Inventor und Excel?

Hallo

Ich habe ein Problem, ich möchte Informationen zu den Visual Basic von Inventor abrufen, die sich in einer Arbeitsmappe befinden, die bereits geöffnet ist.

Hallo

Haben Sie es mit dem Befehl GoExcel.CellValue,

Zum Beispiel:

 Length=GoExcel.CellValue("STÜCK 1.xls", "Blatt1", "C2")

Um dies zu berücksichtigen, müssen Sie die Excel-Datei speichern, ohne sie unbedingt zu schließen.

Hallo

Es hat nicht funktioniert 

GoExcel.CellValue < – diese Funktion kennt sie nicht.

Ich bin auf inventor 2021, wenn es Ihnen helfen kann.

 

Für diesen Vorgang ist es nicht erforderlich, ein Sub zu erstellen. Erstellt mit Inventor 2019

 


capture.jpg

Hallo

Hinzugefügte Referenz für Micosoft Excel:

 

Verwenden Sie dann diesen Code:

Public Sub ReadExcel()
    Dim excelApp As Excel.Application
    Set excelApp = GetObject(, "Excel.Application")

    Dim workBook As workBook
    Set workBook = excelApp.Workbooks.Open("C:\Temp\Test.xlsx")

    Dim sheet As WorkSheet
    Set sheet = workBook.Sheets.Item("Feuille1")

    Dim Val1 As String
    Val1 = sheet.Cells(22, 3)
    Debug.Print Val1

    excelApp.Quit
End Sub

 

2 „Gefällt mir“

Meine Excel-Datei ist bereits geöffnet, daher kann ich Öffnen nicht ausführen, ich brauche etwas anderes, um mein Excel auszuwählen.

Das habe ich getan, aber Vall ist leer. Die msgbox zeigt mir nichts an.

Der Code, so wie Sie ihn geschrieben haben, funktioniert auf meiner Seite gut.

Nun, für mich zeigt mir die Msbox Vall überhaupt nichts.