as a starter you could try this code in the sheet's code module, as long
as there is only one window open for this workbook, it should work,
though it will need you to select a cell rather than just scroll with
the scroll bars:
Code:
--------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ChartObjects(1).Left = Cells(1, ThisWorkbook.Windows(1).ScrollColumn).Left + 20
End Sub
--------------------
--
p45cal
*p45cal*
------------------------------------------------------------------------
p45cal's Profile: 558
View this thread:
http://www.thecodecage.com/forumz/sh...d.php?t=164092
Microsoft Office Help