Show Whole Sheet, Edit Cell B2

[vba_newby]

Hello All

I have a command button and on click i am
1. clearing some cells
2. going to the top of the work sheet - Ctrl + Home basically
3. go to cell B2

My code is

Worksheets("Sheet1").Range("B2:B12").ClearContents
Application.Goto Range("A1")
Application.Goto Worksheets("Sheet1").Range("B2"), True

Now... my cells do clear fine
I end up on cell B2 but the whole sheet is not showing... only column B starting with cell B2. And... i can not edit cell B2... i want to be able to start typing. I can hit the enter key and go to different cells, but i can not use the arrow keys to move to cells or type any text. What is going on with this?

Thanks...

 

[CWatts]

Modify how you're handling the last line:

Sub MoveAround()
    Worksheets("Sheet1").Range("B2:B12").ClearContents
    Application.Goto Range("A1")
    Worksheets("Sheet1").Range("B2").Select
End Sub

 

[vba_newby]

I have modified this several times and many different ways with no success... what am i missing...

Modify how you're handling the last line:

Sub MoveAround()
    Worksheets("Sheet1").Range("B2:B12").ClearContents
    Application.Goto Range("A1")
    Worksheets("Sheet1").Range("B2").Select
End Sub

 

[CWatts]

You're missing the changes I made to your last line of code. Replace it with what I put in to mine. That's at least what I understood you wanted to do, if that's not, could you elaborate more on your expected outcome?

 

[vba_newby]

your right... i did miss it... it works great... thanks...