This is a spreadsheet i use over every year. It has the 12 months. Column
"C" i want to change to "0", the rest of the columns i want to erase, so i
can start over with a new spreadsheet for 2011. The thing is these numbers
that need to be changed are not in any type of sequence, meaning there are
two row that need to be zero then i skip about 4 rows, then i need to zero 6
more rows then maybe skip 3 where there are no numbers.

Thanks for the help!



"Reg" wrote:

Personally I forgot how to write 123 macros about 15 years ago - describe
what you are trying to do (by which I mean what the macro does) and we can
take it from there without me having to relearn it

Regards
RegMigrant

"Sammy" wrote:

I have this macro from lotus i need to convert to excel or write a macro like
this in excel. Any help would be appreciated

ZERO {GOTO}a:c126~
{FOR a:ad7;1;3200;1;enter}
{GOTO}a:D126~
{FOR a:ae7;1;3200;1;erase}
{GOTO}a:f1~
{EDIT-REPLACE-ALL "2009";text;"2010";a:c1..a:n3050}
{GOTO}b:c126~
{FOR b:ad7;1;3200;1;enter}
{GOTO}b:D126~
{FOR b:ae7;1;3200;1;erase}
{GOTO}b:f1~
{EDIT-REPLACE-ALL "2009";text;"2010";b:c1..b:n3050}
{GOTO}c:c6~
{FOR c:ad7;1;3200;1;enter}
{GOTO}c:D6~
{FOR c:ae7;1;3200;1;erase}
{GOTO}c:f1~
{EDIT-REPLACE-ALL "2009";text;"2010";c:c1..c:n3050}
{GOTO}d:c6~
{FOR d:ad7;1;3200;1;enter}
{GOTO}d:D6~
{FOR d:ae7;1;3200;1;erase}
{GOTO}d:f1~
{EDIT-REPLACE-ALL "2009";text;"2010";d:c1..d:n3050}
{GOTO}e:c6~
{FOR e:ad7;1;3200;1;enter}
{GOTO}e:D6~
{FOR e:ae7;1;3200;1;erase}
{GOTO}e:f1~
{EDIT-REPLACE-ALL "2009";text;"2010";e:c1..e:n3050}
{GOTO}f:f1~
{EDIT-REPLACE-ALL "2009";text;"2010";f:c1..f:n3050}
{QUIT}

ENTER {if @cellpointer("PROTECT")="0"}0~
{D}

ERASE {if @cellpointer("PROTECT")="0"}/re{r}{R}{R}{R}{R}{R}{R}{R}{R}{R}~
{D}