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

Thanks MegaJerk,

i end up with this code. Required excel sheet. On opening new dwg show up input box with clients. If hit enter won't go away. In my case Client is maped into Title block and will be written on  save. Hope this may help to others.

'Open list of our Clients
GoExcel.Open("C:\Customer.xlsx", "Sheet1")
lastUsedRow = 2
'set the list to be read from the XLS file
Dim myArrayList As New ArrayList
'add the values from the Excel file to an array list
While GoExcel.CellValue("A" & lastUsedRow) <> ""
		myarraylist.add(GoExcel.CellValue("A" & lastUsedRow))
	lastUsedRow = lastUsedRow + 1
End While

If iProperties.Value("Summary", "Company") = "" Then 
	While CompanyProperty = ""
		CompanyProperty = InputListBox("Select Customer from list", myArrayList, myArrayList, Title := "iLogic", ListName := "Customer")

	End While
	iProperties.Value("Summary", "Company") = CompanyProperty
End If