macro runs from VBA toobar but not from command button

Royzer · Mar 21st 2013

Hi. This code deletes rows from four sheets before moving on to something else. BUT when I add the code to a Command Button (2003 and 2007) the "Rows("2:600").Select" lines give a Runtime error 1004: Select Method of Range Class Failed error message. Any help would be GREATLY appreciated. :confused:

Code

Worksheets("Sort by station").Select                         
    Rows("2:600").Select
    Selection.Delete Shift:=xlUp
    Range("A2").Select
    
    Worksheets("Sort by use").Select
    Rows("2:600").Select
    Selection.Delete Shift:=xlUp
    Range("A2").Select
    
    
    Worksheets("Sort condition & mileage").Select
    Rows("2:600").Select
    Selection.Delete Shift:=xlUp
    Range("A2").Select
    
    
    Worksheets("Sort by make model").Select
    Rows("2:600").Select
    Selection.Delete Shift:=xlUp
    Range("A2").Select
    
    Worksheets("Add_edit_remove").Select
    Range("A5").Select

Display More

**rory** · Mar 21st 2013

Re: macro runs from VBA toobar but not from command button

There's generally no need to select things but if you do you need to qualify the range with the sheet to which it belongs:

Code

Worksheets("Sort by station").Rows("2:600").Delete Shift:=xlUp
Worksheets("Sort by use").Rows("2:600").Delete Shift:=xlUp
Worksheets("Sort condition & mileage").Rows("2:600").Delete Shift:=xlUp
Worksheets("Sort by make model").Rows("2:600").Delete Shift:=xlUp
 
With Worksheets("Add_edit_remove")
   .Select
   .Range("A5").Select
End With

Royzer · Mar 21st 2013

Re: macro runs from VBA toobar but not from command button

Thanks, Rory. Worked like a charm! :drum:

macro runs from VBA toobar but not from command button

Participate now!

Share

Users Viewing This Thread