Hoe communiceer ik tussen inventor en excel?

Hallo

Ik heb een probleem, ik wil graag informatie ophalen over de visuele basis van inventor die in een werkmap staat die al open is.

Hallo

heb je geprobeerd met het commando: GoExcel.CellValue,

Zoals wat:

 Length=GoExcel.CellValue("STUK 1.xls", "Blad1", "C2")

Om er rekening mee te houden, moet u het Excel-bestand opslaan zonder het noodzakelijkerwijs te sluiten.

Hallo

Het werkte niet

GoExcel.CellValue <-- het kent deze functie niet.

Ik ben op inventor 2021 als het je kan helpen.

 

voor deze bewerking is het niet nodig om een Sub te maken. gemaakt met uitvinder 2019

 


capture.jpg

Hallo

Referentie toegevoegd voor Micosoft Excel:

 

Gebruik dan deze 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 likes

Mijn Excel-bestand is al geopend, dus ik kan niet Open doen, ik heb iets anders nodig om mijn Excel te kiezen.

Dat heb ik gedaan, maar Vall is leeg. De msgbox laat me niets zien.

De code, zoals je die hebt geschreven, werkt goed aan mijn kant.

Nou, voor mij laat de Msbox Vall me helemaal niets zien.