Thread: Command Button
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Norman Jones[_2_] Norman Jones[_2_] is offline
external usenet poster
 
Posts: 421
Default Command Button

Hi Suresh,

Your question is not clear.

Are you asking for a means to navigate to
any sheet in the workbook?

If that is the case then try assisgning the following
code to a toolbar button or to a shortcut key:

'==================
Sub ShowSheetList()
'// Jim Rech

On Error Resume Next
If ActiveWorkbook.sheets.Count <= 16 Then
Application.CommandBars("Workbook Tabs"). _
ShowPopup 500, 225
Else
Application.CommandBars("Workbook Tabs"). _
Controls("More Sheets...").Execute
End If
On Error GoTo 0
End Sub
'<<==================


---
Regards.
Norman


"sureshkasi1985 via OfficeKB.com" <u43741@uwe wrote in message
news:8484da04d7ed0@uwe...
Hi All
Please could u help me
I want to write a Macro using teh VBA, such that

Suppose in a sheet if there is a buttton, then it should click on that
button,
if the button is not present then it should navigate to other page. is
this
possbile. please help me out

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200805/1