I have an statement (see below) which delete all the buttons (button 13 &
button 14). The macro is running ok when I run the macro for first time,
however, when I run it for second time on the row the macro does not
recognize the button 13 and button 14.

I wonder if there is a way to have an statement where all the buttons will
be cut on specific sheet regarless the number its has. In another words
without mention button 13 & button 14.

Thanks in advance.
Maperalia


ActiveSheet.Shapes("Button 13").Select
Selection.Cut
ActiveSheet.Shapes("Button 14").Select
Selection.Cut
Range("C3").Select

>>statement where all the buttons will be cut

Activesheet.Buttons.Delete

--
Jim
"maperalia" <(E-Mail Removed)> wrote in message
news:33D239B6-7E56-42F4-816B-(E-Mail Removed)...
|I have an statement (see below) which delete all the buttons (button 13 &
| button 14). The macro is running ok when I run the macro for first time,
| however, when I run it for second time on the row the macro does not
| recognize the button 13 and button 14.
|
| I wonder if there is a way to have an statement where all the buttons will
| be cut on specific sheet regarless the number its has. In another words
| without mention button 13 & button 14.
|
| Thanks in advance.
| Maperalia
|
|
| ActiveSheet.Shapes("Button 13").Select
| Selection.Cut
| ActiveSheet.Shapes("Button 14").Select
| Selection.Cut
| Range("C3").Select
|

Jim;
Thanks very much

Maperalia
"Jim Rech" wrote:

> >>statement where all the buttons will be cut
>
> Activesheet.Buttons.Delete
>
> --
> Jim
> "maperalia" <(E-Mail Removed)> wrote in message
> news:33D239B6-7E56-42F4-816B-(E-Mail Removed)...
> |I have an statement (see below) which delete all the buttons (button 13 &
> | button 14). The macro is running ok when I run the macro for first time,
> | however, when I run it for second time on the row the macro does not
> | recognize the button 13 and button 14.
> |
> | I wonder if there is a way to have an statement where all the buttons will
> | be cut on specific sheet regarless the number its has. In another words
> | without mention button 13 & button 14.
> |
> | Thanks in advance.
> | Maperalia
> |
> |
> | ActiveSheet.Shapes("Button 13").Select
> | Selection.Cut
> | ActiveSheet.Shapes("Button 14").Select
> | Selection.Cut
> | Range("C3").Select
> |
>
>
>