Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
Ed Ed is offline
external usenet poster
 
Posts: 399
Default "Select" and "Activate" failing?

I have a Workbook_Open macro as follows:

Private Sub Workbook_Open()

Worksheets("Sheet2").Visible = True
Worksheets("Sheet3").Visible = xlVeryHidden
Worksheets("Sheet1").Visible = True
Worksheets("Sheet1").Range("A1").Select

End Sub

The last line fails with " "Select" method of "Range" class failed." I then
changed it to
Worksheets("Sheet1").Range("A1").Activate
and got the same failure error. Why?

Ed



  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 644
Default "Select" and "Activate" failing?

I don't know why but the work around I use is:
Application.GoTo Sheets("Sheet1").Range("A1")

Charles

Ed wrote:
I have a Workbook_Open macro as follows:

Private Sub Workbook_Open()

Worksheets("Sheet2").Visible = True
Worksheets("Sheet3").Visible = xlVeryHidden
Worksheets("Sheet1").Visible = True
Worksheets("Sheet1").Range("A1").Select

End Sub

The last line fails with " "Select" method of "Range" class failed." I then
changed it to
Worksheets("Sheet1").Range("A1").Activate
and got the same failure error. Why?

Ed


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 31
Default "Select" and "Activate" failing?

or you can use the following two lines

Worksheets("Sheet1").activate
Worksheets("Sheet1").Range("A1").Select

You can not select a range unless that sheet is already
activated(selected)

Hope this helps.


Die_Another_Day wrote:
I don't know why but the work around I use is:
Application.GoTo Sheets("Sheet1").Range("A1")

Charles

Ed wrote:
I have a Workbook_Open macro as follows:

Private Sub Workbook_Open()

Worksheets("Sheet2").Visible = True
Worksheets("Sheet3").Visible = xlVeryHidden
Worksheets("Sheet1").Visible = True
Worksheets("Sheet1").Range("A1").Select

End Sub

The last line fails with " "Select" method of "Range" class failed." I then
changed it to
Worksheets("Sheet1").Range("A1").Activate
and got the same failure error. Why?

Ed


  #4   Report Post  
Posted to microsoft.public.excel.programming
Ed Ed is offline
external usenet poster
 
Posts: 399
Default "Select" and "Activate" failing?

Thank you, sonu. Activating the sheet first did the trick.
Ed

"sonu" wrote in message
ups.com...
or you can use the following two lines

Worksheets("Sheet1").activate
Worksheets("Sheet1").Range("A1").Select

You can not select a range unless that sheet is already
activated(selected)

Hope this helps.


Die_Another_Day wrote:
I don't know why but the work around I use is:
Application.GoTo Sheets("Sheet1").Range("A1")

Charles

Ed wrote:
I have a Workbook_Open macro as follows:

Private Sub Workbook_Open()

Worksheets("Sheet2").Visible = True
Worksheets("Sheet3").Visible = xlVeryHidden
Worksheets("Sheet1").Visible = True
Worksheets("Sheet1").Range("A1").Select

End Sub

The last line fails with " "Select" method of "Range" class failed." I
then
changed it to
Worksheets("Sheet1").Range("A1").Activate
and got the same failure error. Why?

Ed




Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Excel - Golf - how to display "-2" as "2 Under" or "4"as "+4" or "4 Over" in a calculation cell Steve Kay Excel Discussion (Misc queries) 2 August 8th 08 01:54 AM
change "true" and "false" to "availble" and "out of stock" inthestands Excel Worksheet Functions 2 July 19th 07 07:05 PM
HELP on "left","right","find","len","substitute" functions serene83 Excel Discussion (Misc queries) 5 June 27th 06 02:23 AM
Count occurences of "1"/"0" (or"TRUE"/"FALSE") in a row w. conditions in the next BCB New Users to Excel 7 May 13th 06 10:02 PM
Using "Cells" to write "Range("A:A,H:H").Select" Trip Ives[_2_] Excel Programming 3 June 5th 04 03:13 PM


All times are GMT +1. The time now is 12:25 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"