Public Sub LeftClickUp_Show_Note(obElem As Element)
Dim obPosVar As Variable
Dim obNoteVar As Variable
Set obPosVar = thisProject.Variables.Item(obElem.ItemVariable(0).Name)
prefix = Mid(obPosVar.Name, 1, InStr(obPosVar.Name, "!") - 1)
Set obNoteVar = thisProject.Variables.Item(prefix & "!" & prefix & "_Note")
'No error when writing the value
obNoteVar.Value = "something"
'Getting error when trying to access the same value
msgbox(obNoteVar.Value)
End Sub