I have a list of 7 dates, any Monday - Sunday, and I want to write a
macro, that when run, will change the first date to 7 days in the
future, and then have all the other dates respond to the change in the
first date.

I have taken an unused cell, and added 7 to the first date, but when i
copy, or drag to the original cell, it either gives a #REF or the
other cells wont respond.

I write my macros by stepping through the processes. I don't know
enough to actually write one using the visual basic language.

A B C
1 8/30 Mon
2 +A1+1 =A2 <--- (formatted for day of the week)
3 +A2+1
4 +A3+1
5 etc.....
6
7
Thanks in advance. I appreciate the help.
Fred Roach
(E-Mail Removed)

You could use a line like:

with worksheets("sheet1").range("a1")
.value = .value + 7
end with

(This didn't do any validation at all!)



scary boy wrote:
>
> I have a list of 7 dates, any Monday - Sunday, and I want to write a
> macro, that when run, will change the first date to 7 days in the
> future, and then have all the other dates respond to the change in the
> first date.
>
> I have taken an unused cell, and added 7 to the first date, but when i
> copy, or drag to the original cell, it either gives a #REF or the
> other cells wont respond.
>
> I write my macros by stepping through the processes. I don't know
> enough to actually write one using the visual basic language.
>
> A B C
> 1 8/30 Mon
> 2 +A1+1 =A2 <--- (formatted for day of the week)
> 3 +A2+1
> 4 +A3+1
> 5 etc.....
> 6
> 7
> Thanks in advance. I appreciate the help.
> Fred Roach
> (E-Mail Removed)

--

Dave Peterson
(E-Mail Removed)

On Tue, 31 Aug 2004 18:07:04 -0500, Dave Peterson <(E-Mail Removed)>
wrote:

>with worksheets("sheet1").range("a1")
> .value = .value + 7
> end with


Dave -- that worked perfectly -- thanks so much.
quick response too, i really appreciate it.
fred roach