Workbook_Open() Error

  • Thread starter Thread starter Minitman
  • Start date Start date
M

Minitman

Greetings,

I am attempting to turn one CommandButton visible and to make another
one not visible when I open my workbook. What I am getting is a
Visual Basic error message:

Run-time error '424'
Object required

This is what I tried in "ThisWorkbook" (the * is the line
highlighted by Debug):

Private Sub Workbook_Open()

Sheets("Enter").Select
* CommandButton1,Visible = True
CommandButton2,Visible = False
Range("AP2").Select

End Sub

Anyone see what is wrong with code?

Any help would be most appreciated.

TIA

-Minitman
 
Hi



Sheets("Enter").Activate
ActiveSheet.CommandButton1.Visible = True
ActiveSheet.CommandButton2.Visible = False
Range("AP2").Select


Slawek(Poland)
 
You need a dot separator not comma, and you have to qualify the button with
the sheet

Private Sub Workbook_Open()

Sheets("Enter").Select
ActiveSheet.CommandButton1.Visible = True
ActiveSheet.CommandButton2.Visible = False
Range("AP2").Select

End Sub

or

Private Sub Workbook_Open()

With Sheets("Enter").
.Activate
.CommandButton1.Visible = True
.CommandButton2.Visible = False
.Range("AP2").Select
End With

End Sub


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Hey Ron,

Good catch on the typo. That, however, is not the problem (I typed
the code rather then copied). Do you see any other possibilities?
 
Back
Top