I have a string variable: x = "item000"

I would like to code to autogenerate a code such that when the code gets
executed, I increment the item by 1 from its previous value. (so, I see
values like item000, item001, item 002....item010, item 011...)
How do I accomplish this?

The code I have thus far which doesn't work is below:

rightstring = Right(x,3)
lefstring = left(x,len(x)-len(rightstring))
autonum = cstr(Right("000" & cint(rightstring) + 1, 3))
msgbox(autonum)
__________________________________________

Any ideas how to get this done?

Try . Use Format function

strAutoNum = "item002"
strAutoNum = "item" & Format(Right(strAutoNum, 3) + 1, "000")
MsgBox strAutoNum

If this post helps click Yes
---------------
Jacob Skaria


"vrk1" wrote:

> I have a string variable: x = "item000"
>
> I would like to code to autogenerate a code such that when the code gets
> executed, I increment the item by 1 from its previous value. (so, I see
> values like item000, item001, item 002....item010, item 011...)
> How do I accomplish this?
>
> The code I have thus far which doesn't work is below:
>
> rightstring = Right(x,3)
> lefstring = left(x,len(x)-len(rightstring))
> autonum = cstr(Right("000" & cint(rightstring) + 1, 3))
> msgbox(autonum)
> __________________________________________
>
> Any ideas how to get this done?
>
>
>
>

This solved my problem. Thanks

"Jacob Skaria" wrote:

> Try . Use Format function
>
> strAutoNum = "item002"
> strAutoNum = "item" & Format(Right(strAutoNum, 3) + 1, "000")
> MsgBox strAutoNum
>
> If this post helps click Yes
> ---------------
> Jacob Skaria
>
>
> "vrk1" wrote:
>
> > I have a string variable: x = "item000"
> >
> > I would like to code to autogenerate a code such that when the code gets
> > executed, I increment the item by 1 from its previous value. (so, I see
> > values like item000, item001, item 002....item010, item 011...)
> > How do I accomplish this?
> >
> > The code I have thus far which doesn't work is below:
> >
> > rightstring = Right(x,3)
> > lefstring = left(x,len(x)-len(rightstring))
> > autonum = cstr(Right("000" & cint(rightstring) + 1, 3))
> > msgbox(autonum)
> > __________________________________________
> >
> > Any ideas how to get this done?
> >
> >
> >
> >