(Solved) – Looking for VBA equivalent for Strright

(solved)-–-looking-for-vba-equivalent-for-strright

Looking for a VBA equivalent for LotusScript’s Strright. The snippet is to concatenate error messages into one cell.

LotusScript Strright

'Meera's error message code
ReDim Preserve errormsg(i)
errormsg(i) = "Field Required"
IsError = True

...
errormsg(i) = "Invalid Date"
etc...

If IsError = True Then
   tmpMsg = ""
   For Each v In errormsg
       tmpMsg = tmpMsg   ","   v
   Next v
   Cells(Row, 8).Value = strright(tmpMsg, ",")      'LotusScript
End If

Leave a Reply

Your email address will not be published. Required fields are marked *