Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
MechMachineMan
in reply to: Anonymous

Try this in a rule and report back to how it runs:

 

AddReference "Microsoft.Office.Interop.Excel" 'To use excel

Sub Main()

	oExcelPath = "G:\FSH_Engineering\ENGINEERING DRAWINGS\_DRAWING TEMPLATES\_INVENTOR\_START PARTS\UTILITY\GAUGE.xlsx"
	oSheetName = "Sheet1" 
	
	Dim xlApp As Microsoft.Office.Interop.Excel.Application 
	xlApp = GetObject("", "Excel.Application") 
	Dim xlwb As Microsoft.Office.Interop.Excel.WorkBook 
	xlwb = xlApp.Workbooks.Open(oExcelPath)
	Dim xlws As Microsoft.Office.Interop.Excel.Worksheet
	xlws = xlwb.Worksheets(oSheetName)
	
	MsgBox("Cell A1 is: " & xlws.Cells(1, "A").Value)
	
	xlwb.Close(SaveChanges:= False)
	xlApp.Quit
	xlApp = Nothing

End Sub 

 

 


--------------------------------------
Did you find this reply helpful ? If so please use the 'Accept as Solution' or 'Like' button below.

Justin K
Inventor 2018.2.3, Build 227 | Excel 2013+ VBA
ERP/CAD Communication | Custom Scripting
Machine Design | Process Optimization


iLogic/Inventor API: Autodesk Online Help | API Shortcut In Google Chrome | iLogic API Documentation
Vb.Net/VBA Programming: MSDN | Stackoverflow | Excel Object Model
Inventor API/VBA/Vb.Net Learning Resources: Forum Thread

Sample Solutions:Debugging in iLogic ( and Batch PDF Export Sample ) | API HasSaveCopyAs Issues |
BOM Export & Column Reorder | Reorient Skewed Part | Add Internal Profile Dogbones |
Run iLogic From VBA | Batch File Renaming| Continuous Pick/Rename Objects

Local Help: %PUBLIC%\Documents\Autodesk\Inventor 2018\Local Help

Ideas: Dockable/Customizable Property Browser | Section Line API/Thread Feature in Assembly/PartsList API Static Cells | Fourth BOM Type