Jak komunikować się między programem Inventor a programem Excel?

Out of category
1

Witam

Mam problem, chciałbym pobrać informacje na temat Visual Basic programu Inventor, który znajduje się w skoroszycie, który jest już otwarty.

2

Witam

czy próbowałeś z poleceniem: GoExcel.CellValue,

Lubię co:

 Length=GoExcel.CellValue("KAWAŁEK 1.xls", "Arkusz1", "C2")

Aby wziąć to pod uwagę, musisz zapisać plik Excela bez konieczności jego zamykania.

3

Witam

To nie zadziałało 

GoExcel.CellValue <-- nie zna tej funkcji.

Jestem na wynalazcy 2021, jeśli może ci pomóc.

 

4

W przypadku tej operacji nie jest konieczne tworzenie elementu podrzędnego wykonanego za pomocą programu Inventor 2019

 


capture.jpg
5

Witam

Dodano odniesienie do programu Micosoft Excel:

 

Następnie użyj tego kodu:

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 polubienia
6

Mój plik Excel jest już otwarty, więc nie mogę zrobić Otwórz, potrzebuję czegoś innego, aby wybrać mój Excel.

7

Zrobiłem to, ale Vall jest pusty. Msgbox nic mi nie pokazuje.

8

Kod, tak jak go napisałeś, działa dobrze po mojej stronie.

9

Cóż, dla mnie Msbox Vall nie pokazuje mi zupełnie nic.