increment invoice numbers in excel

[Allan]

I have just setup an 'order' template in excel and inserted a macro that
increments the number when opened.
I have tested the workbook and I now wish to reset thenumbering system back
to 0 (zero).
Can anyone advise me how I proceed.
Allan

[Paul B]

Allan, where every you are storing the number in the macro just change it
back to to 0 there

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"Allan" <[email protected]> wrote in message
news:[email protected]...
> I have just setup an 'order' template in excel and inserted a macro that
> increments the number when opened.
> I have tested the workbook and I now wish to reset thenumbering system
back
> to 0 (zero).
> Can anyone advise me how I proceed.
> Allan

[Allan]

Hi Paul
The trouble is I do not know where it is being saved.
This is the macro can you tell me where I find the place to reset the number;
With .Range("I6")
If IsEmpty(.Value) Then
nNumber = GetSetting(sAPPLICATION, sSECTION, sKEY,
nDEFAULT)
.NumberFormat = "@"
.Value = Format(nNumber, "0000")
SaveSetting sAPPLICATION, sSECTION, sKEY, nNumber + 1&
Cheers. Allan
"Paul B" wrote:

> Allan, where every you are storing the number in the macro just change it
> back to to 0 there
>
> --
> Paul B
> Always backup your data before trying something new
> Please post any response to the newsgroups so others can benefit from it
> Feedback on answers is always appreciated!
> Using Excel 2002 & 2003
>
> "Allan" <[email protected]> wrote in message
> news:[email protected]...
> > I have just setup an 'order' template in excel and inserted a macro that
> > increments the number when opened.
> > I have tested the workbook and I now wish to reset thenumbering system
> back
> > to 0 (zero).
> > Can anyone advise me how I proceed.
> > Allan
>
>
>

[Paul B]

Allen, not sure without seeing all the code but you could try to make
nNumber = 0 and see if that will work, something like this, just put in a 0
and a ' after it to comment out the rest.
nNumber = 0 'GetSetting(sAPPLICATION, sSECTION, sKEY, nDEFAULT)
run the code and see if that sets it back to 0, if so change it back like it
was and save the file
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"Allan" <[email protected]> wrote in message
news:[email protected]...
> Hi Paul
> The trouble is I do not know where it is being saved.
> This is the macro can you tell me where I find the place to reset the
> number;
> With .Range("I6")
> If IsEmpty(.Value) Then
> nNumber = GetSetting(sAPPLICATION, sSECTION, sKEY,
> nDEFAULT)
> .NumberFormat = "@"
> .Value = Format(nNumber, "0000")
> SaveSetting sAPPLICATION, sSECTION, sKEY, nNumber + 1&
> Cheers. Allan
> "Paul B" wrote:
>
>> Allan, where every you are storing the number in the macro just change it
>> back to to 0 there
>>
>> --
>> Paul B
>> Always backup your data before trying something new
>> Please post any response to the newsgroups so others can benefit from it
>> Feedback on answers is always appreciated!
>> Using Excel 2002 & 2003
>>
>> "Allan" <[email protected]> wrote in message
>> news:[email protected]...
>> > I have just setup an 'order' template in excel and inserted a macro
>> > that
>> > increments the number when opened.
>> > I have tested the workbook and I now wish to reset thenumbering system
>> back
>> > to 0 (zero).
>> > Can anyone advise me how I proceed.
>> > Allan
>>
>>
>>

[nowfal]

Hi,
Its an interesting subject, can you put the enitre code here , so that others can learn from it. Otherwise the experts, please assist to have a new one with the same subject as incrementing number in an invoice of a sheet.
thanks
regards
nowfal

[Paul B]

nowfal, have a look here for ways to do it,

http://www.mcgimpsey.com/excel/udfs/sequentialnums.html
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"nowfal" <[email protected]> wrote in
message news:[email protected]...
>
> Hi,
> Its an interesting subject, can you put the enitre code here , so
> that others can learn from it. Otherwise the experts, please assist to
> have a new one with the same subject as incrementing number in an
> invoice of a sheet.
> thanks
> regards
> nowfal
>
>
> --
> nowfal
> ------------------------------------------------------------------------
> nowfal's Profile:
> http://www.excelforum.com/member.php...o&userid=10003
> View this thread: http://www.excelforum.com/showthread...hreadid=386396
>

[Allan]

Thanks Paul
That worked perfectly

Cheers
Allan

"Paul B" wrote:

> Allen, not sure without seeing all the code but you could try to make
> nNumber = 0 and see if that will work, something like this, just put in a 0
> and a ' after it to comment out the rest.
> nNumber = 0 'GetSetting(sAPPLICATION, sSECTION, sKEY, nDEFAULT)
> run the code and see if that sets it back to 0, if so change it back like it
> was and save the file
> --
> Paul B
> Always backup your data before trying something new
> Please post any response to the newsgroups so others can benefit from it
> Feedback on answers is always appreciated!
> Using Excel 2002 & 2003
>
> "Allan" <[email protected]> wrote in message
> news:[email protected]...
> > Hi Paul
> > The trouble is I do not know where it is being saved.
> > This is the macro can you tell me where I find the place to reset the
> > number;
> > With .Range("I6")
> > If IsEmpty(.Value) Then
> > nNumber = GetSetting(sAPPLICATION, sSECTION, sKEY,
> > nDEFAULT)
> > .NumberFormat = "@"
> > .Value = Format(nNumber, "0000")
> > SaveSetting sAPPLICATION, sSECTION, sKEY, nNumber + 1&
> > Cheers. Allan
> > "Paul B" wrote:
> >
> >> Allan, where every you are storing the number in the macro just change it
> >> back to to 0 there
> >>
> >> --
> >> Paul B
> >> Always backup your data before trying something new
> >> Please post any response to the newsgroups so others can benefit from it
> >> Feedback on answers is always appreciated!
> >> Using Excel 2002 & 2003
> >>
> >> "Allan" <[email protected]> wrote in message
> >> news:[email protected]...
> >> > I have just setup an 'order' template in excel and inserted a macro
> >> > that
> >> > increments the number when opened.
> >> > I have tested the workbook and I now wish to reset thenumbering system
> >> back
> >> > to 0 (zero).
> >> > Can anyone advise me how I proceed.
> >> > Allan
> >>
> >>
> >>
>
>
>

[Allan]

Hi Paul
Where do I 'rate a post'

Allan

"Paul B" wrote:

> Allen, not sure without seeing all the code but you could try to make
> nNumber = 0 and see if that will work, something like this, just put in a 0
> and a ' after it to comment out the rest.
> nNumber = 0 'GetSetting(sAPPLICATION, sSECTION, sKEY, nDEFAULT)
> run the code and see if that sets it back to 0, if so change it back like it
> was and save the file
> --
> Paul B
> Always backup your data before trying something new
> Please post any response to the newsgroups so others can benefit from it
> Feedback on answers is always appreciated!
> Using Excel 2002 & 2003
>
> "Allan" <[email protected]> wrote in message
> news:[email protected]...
> > Hi Paul
> > The trouble is I do not know where it is being saved.
> > This is the macro can you tell me where I find the place to reset the
> > number;
> > With .Range("I6")
> > If IsEmpty(.Value) Then
> > nNumber = GetSetting(sAPPLICATION, sSECTION, sKEY,
> > nDEFAULT)
> > .NumberFormat = "@"
> > .Value = Format(nNumber, "0000")
> > SaveSetting sAPPLICATION, sSECTION, sKEY, nNumber + 1&
> > Cheers. Allan
> > "Paul B" wrote:
> >
> >> Allan, where every you are storing the number in the macro just change it
> >> back to to 0 there
> >>
> >> --
> >> Paul B
> >> Always backup your data before trying something new
> >> Please post any response to the newsgroups so others can benefit from it
> >> Feedback on answers is always appreciated!
> >> Using Excel 2002 & 2003
> >>
> >> "Allan" <[email protected]> wrote in message
> >> news:[email protected]...
> >> > I have just setup an 'order' template in excel and inserted a macro
> >> > that
> >> > increments the number when opened.
> >> > I have tested the workbook and I now wish to reset thenumbering system
> >> back
> >> > to 0 (zero).
> >> > Can anyone advise me how I proceed.
> >> > Allan
> >>
> >>
> >>
>
>
>

[Paul B]

Allen, your welcome, as far as rating a post no way that I know of to do it
in a newsgroup like this, other than posting and letting us know that a
solution works for you

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"Allan" <[email protected]> wrote in message
news:[email protected]...
> Hi Paul
> Where do I 'rate a post'
>
> Allan
>
> "Paul B" wrote:
>
> > Allen, not sure without seeing all the code but you could try to make
> > nNumber = 0 and see if that will work, something like this, just put in
a 0
> > and a ' after it to comment out the rest.
> > nNumber = 0 'GetSetting(sAPPLICATION, sSECTION, sKEY, nDEFAULT)
> > run the code and see if that sets it back to 0, if so change it back
like it
> > was and save the file
> > --
> > Paul B
> > Always backup your data before trying something new
> > Please post any response to the newsgroups so others can benefit from it
> > Feedback on answers is always appreciated!
> > Using Excel 2002 & 2003
> >
> > "Allan" <[email protected]> wrote in message
> > news:[email protected]...
> > > Hi Paul
> > > The trouble is I do not know where it is being saved.
> > > This is the macro can you tell me where I find the place to reset the
> > > number;
> > > With .Range("I6")
> > > If IsEmpty(.Value) Then
> > > nNumber = GetSetting(sAPPLICATION, sSECTION, sKEY,
> > > nDEFAULT)
> > > .NumberFormat = "@"
> > > .Value = Format(nNumber, "0000")
> > > SaveSetting sAPPLICATION, sSECTION, sKEY, nNumber +
1&
> > > Cheers. Allan
> > > "Paul B" wrote:
> > >
> > >> Allan, where every you are storing the number in the macro just
change it
> > >> back to to 0 there
> > >>
> > >> --
> > >> Paul B
> > >> Always backup your data before trying something new
> > >> Please post any response to the newsgroups so others can benefit from
it
> > >> Feedback on answers is always appreciated!
> > >> Using Excel 2002 & 2003
> > >>
> > >> "Allan" <[email protected]> wrote in message
> > >> news:[email protected]...
> > >> > I have just setup an 'order' template in excel and inserted a macro
> > >> > that
> > >> > increments the number when opened.
> > >> > I have tested the workbook and I now wish to reset thenumbering
system
> > >> back
> > >> > to 0 (zero).
> > >> > Can anyone advise me how I proceed.
> > >> > Allan
> > >>
> > >>
> > >>
> >
> >
> >

[Allan]

Many Thanks for your help.

Allan


"Paul B" wrote:

> Allen, your welcome, as far as rating a post no way that I know of to do it
> in a newsgroup like this, other than posting and letting us know that a
> solution works for you
>
> --
> Paul B
> Always backup your data before trying something new
> Please post any response to the newsgroups so others can benefit from it
> Feedback on answers is always appreciated!
> Using Excel 2002 & 2003
>
> "Allan" <[email protected]> wrote in message
> news:[email protected]...
> > Hi Paul
> > Where do I 'rate a post'
> >
> > Allan
> >
> > "Paul B" wrote:
> >
> > > Allen, not sure without seeing all the code but you could try to make
> > > nNumber = 0 and see if that will work, something like this, just put in
> a 0
> > > and a ' after it to comment out the rest.
> > > nNumber = 0 'GetSetting(sAPPLICATION, sSECTION, sKEY, nDEFAULT)
> > > run the code and see if that sets it back to 0, if so change it back
> like it
> > > was and save the file
> > > --
> > > Paul B
> > > Always backup your data before trying something new
> > > Please post any response to the newsgroups so others can benefit from it
> > > Feedback on answers is always appreciated!
> > > Using Excel 2002 & 2003
> > >
> > > "Allan" <[email protected]> wrote in message
> > > news:[email protected]...
> > > > Hi Paul
> > > > The trouble is I do not know where it is being saved.
> > > > This is the macro can you tell me where I find the place to reset the
> > > > number;
> > > > With .Range("I6")
> > > > If IsEmpty(.Value) Then
> > > > nNumber = GetSetting(sAPPLICATION, sSECTION, sKEY,
> > > > nDEFAULT)
> > > > .NumberFormat = "@"
> > > > .Value = Format(nNumber, "0000")
> > > > SaveSetting sAPPLICATION, sSECTION, sKEY, nNumber +
> 1&
> > > > Cheers. Allan
> > > > "Paul B" wrote:
> > > >
> > > >> Allan, where every you are storing the number in the macro just
> change it
> > > >> back to to 0 there
> > > >>
> > > >> --
> > > >> Paul B
> > > >> Always backup your data before trying something new
> > > >> Please post any response to the newsgroups so others can benefit from
> it
> > > >> Feedback on answers is always appreciated!
> > > >> Using Excel 2002 & 2003
> > > >>
> > > >> "Allan" <[email protected]> wrote in message
> > > >> news:[email protected]...
> > > >> > I have just setup an 'order' template in excel and inserted a macro
> > > >> > that
> > > >> > increments the number when opened.
> > > >> > I have tested the workbook and I now wish to reset thenumbering
> system
> > > >> back
> > > >> > to 0 (zero).
> > > >> > Can anyone advise me how I proceed.
> > > >> > Allan
> > > >>
> > > >>
> > > >>
> > >
> > >
> > >
>
>
>