Hello,
For an ERP i need to cut the title in 3 custom iproperties.
My rule work only partially.
I succed to cut the title in 3 variable of 30 character but I can't stock into my custom properties....
Dim TitrePartie1, TitrePartie2, TitrePartie3 As String TitrePartie1 = Left(iProperties.Value("Summary", "Title"), 30) TitrePartie2 = Mid(iProperties.Value("Summary", "Title"), 31, 30) TitrePartie3 = Right(iProperties.Value("Summary", "Title"), 30) MessageBox.Show(TitrePartie1) ' Pour test: affiche le titreERPi et le nombre de charactères 'MessageBox.Show(TitrePartie1 & " " & Len(TitrePartie1) & vbLf & _ 'TitrePartie2 & " " & Len(TitrePartie2) & vbLf & _ 'TitrePartie3 & " " & Len(TitrePartie3) & vbLf _ ', "iLogic ")
'The 3 lines below don't work... Do you understand why?
'The 3 custom properties TitreERP1 & TitreERP2 & TitreERP3 are already created.
iProperties.Value("Custom", "TitreERP1") = TitrePartie1 iProperties.Value("Custom", "TitreERP2")= TitrePartie2 iProperties.Value("Custom", "TitreERP1") = TitrePartie3
'When I try iProperties.Value("Custom", "TitreERP1") = "a" it's work :(
Thanks
Solved! Go to Solution.
Solved by snappyjazz. Go to Solution.
Hi @Remy-intl
Does it give you an error? what is the error? I copy and pasted your code and created your 3 custom properties and it worked for me.
P.S. your line:
iProperties.Value("Custom", "TitreERP1") = TitrePartie3
Probably meant to write:
iProperties.Value("Custom", "TitreERP3") = TitrePartie3
Thanks.
Today it's working...
I think the computer just needed a restart....
Thanks a lot for your remark...
Can't find what you're looking for? Ask the community or share your knowledge.