Caps Lock

[AMN3161]

Hello

This is probably a simple question but I am doing a look up at a excel document and replacing the iproperty "description" I saw that you add ".ToUpper)" to the code to make it caps but I am not 100% sure how to implement it

thank you ahead of time

[bradeneuropeArthur]

Every string has a ToUpper or ToLower function.

Dim Qwerty  as string 

Qwerty thIS

Qwerty.ToUpper gives THIS

Qwerty.ToLower gives this

[Anonymous]

Try the code below.

To test: Create a part file "Part-001.ipt", then run the code. Then save as the file to "Part-002.ipt", run the code again and check iproperties.

'Get the filename
Dim oFileName As String = ThisDoc.FileName(False) 'without extension

'Check if it is correct
MessageBox.Show(oFileName, "File Name")

'This will automatically find your filename in the excel
oExcelFile = GoExcel.FindRow("C:\Test\Test.xlsx", "Sheet1", "Part Name", "=", oFileName)

'This will find your "Description" column in the excel. Should be typed exactly.
ExcelDesc = GoExcel.CurrentRowValue("Description")

'Check if it is reading from excel
MessageBox.Show(ExcelDesc, "Description from excel")




'ToUpper or ToLower
MessageBox.Show(ExcelDesc.ToUpper, "ToUpper / ToLower")

iProperties.Value("Project", "Description") = ExcelDesc.ToUpper

[AMN3161]

Could you attached the IPT file? i think you forgot to

[WCrihfield]

Here's the simplest example using only iLogic:

Copy this code into a new rule, then run it.

Dim oStr As String = "cAse"
MsgBox("oStr = cAse" & vbCrLf & _
"oStr.ToUpper = " & oStr.ToUpper & vbCrLf & _
"oStr.ToLower = " & oStr.ToLower,vbOKOnly+vbInformation," ")

If this solved your problem, or answered your question, please click ACCEPT SOLUTION.
Or, if this helped you, please click 'LIKE' 👍.

If you have time, please... Vote For My IDEAS 💡and Explore My CONTRIBUTIONS

Inventor 2020 Help | Inventor Forum | Inventor Customization Forum | Inventor Ideas Forum