Correct scrolling limit

Dear Everyone,

I have a worksheet having data to column AMR. When I make columns shown and hidden several time using VBA, the horizental scroll bar of Excel has a problem as followed:

1. To see the column AMR, I have to drag the scroll bar very little (left image).
2. If I put the scroll bar right-most position, I become to hit column UVT (right image). There is no data from columns AMS to UVT.

How can I reset my worksheet shows column AMR when I put the scroll bar right-most position? Worksheet.ScrollArea is not of solution. I already tested with no result.

Reply would be appreciated.

what abt this

Code:

---

ActiveWindow.ScrollColumn = 4 'col number

---

edited: Column number of AMR = Cells(1,"AMR").Column

Dear seenu_1st

It is just scroll to destinated column, and my problem is still not solved. I suppose, because of this problem, my VBA code cannot be excused. If I copy the data to new sheet and run VBA code, there is no problem for several times, but finally hit error.

it works for the active window, so activate ur sheet and scroll, if u dont want to display the sheet changes, set screen updates = false b4 execute the set it to true.