ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Need to always go to Sheet1 (https://www.excelbanter.com/excel-programming/426976-need-always-go-sheet1.html)

Keith

Need to always go to Sheet1
 
Hi
I am using a RefEdit bx as shown below.
When the box is clicked to start, I want to always show Sheet1 for the
selections.
The following code did not work. I got this code by using the macro
recorder, so must have missed something else that's needed.

What would work here?


Private Sub RefEdit1_DropButtonClick()

Sheets("Sheet1").Select
Sheets("Sheet1").Show

End Sub

Thank you,
Keith


Simon Lloyd[_1097_]

Need to always go to Sheet1
 

Hi, using this
Private Sub RefEdit1_DropButtonClick()
Sheets("Sheet1").Activate
End Sub

will ensure that the first sheet the user gets to click will be sheet
1.

keith;309961 Wrote:
Hi
I am using a RefEdit bx as shown below.
When the box is clicked to start, I want to always show Sheet1 for the
selections.
The following code did not work. I got this code by using the macro
recorder, so must have missed something else that's needed.

What would work here?


Private Sub RefEdit1_DropButtonClick()

Sheets("Sheet1").Select
Sheets("Sheet1").Show

End Sub

Thank you,
Keith



--
Simon Lloyd

Regards,
Simon Lloyd
'The Code Cage' (http://www.thecodecage.com)
------------------------------------------------------------------------
Simon Lloyd's Profile: http://www.thecodecage.com/forumz/member.php?userid=1
View this thread: http://www.thecodecage.com/forumz/sh...ad.php?t=86663


Keith

Need to always go to Sheet1
 
Hi Simon,
thanks very much.
keith

"Simon Lloyd" wrote:


Hi, using this
Private Sub RefEdit1_DropButtonClick()
Sheets("Sheet1").Activate
End Sub

will ensure that the first sheet the user gets to click will be sheet
1.

keith;309961 Wrote:
Hi
I am using a RefEdit bx as shown below.
When the box is clicked to start, I want to always show Sheet1 for the
selections.
The following code did not work. I got this code by using the macro
recorder, so must have missed something else that's needed.

What would work here?


Private Sub RefEdit1_DropButtonClick()

Sheets("Sheet1").Select
Sheets("Sheet1").Show

End Sub

Thank you,
Keith



--
Simon Lloyd

Regards,
Simon Lloyd
'The Code Cage' (http://www.thecodecage.com)
------------------------------------------------------------------------
Simon Lloyd's Profile: http://www.thecodecage.com/forumz/member.php?userid=1
View this thread: http://www.thecodecage.com/forumz/sh...ad.php?t=86663




All times are GMT +1. The time now is 03:38 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com