グラフシート(チャートシート)の左上にスクロールしたい

[戻る]
たんめ 2009/04/07(火) 13:37:59
初心者のため、分かりづらいかもしれませんがすみません。
EXCEL2003 VBAが開発環境です。
グラフシート(チャートシート)を表示した際に、シートがウィンドウより大きい場
合、左上を表示するようにスクロールしたいのですが、ふつうのワークブックのように

  ActiveWindow.ScrollColumn = 1
  ActiveWindow.ScrollRow = 1

とやってみたのですが、エラーが出てしまいます。
どうしたら、チャートシート上で、シートの左上が表示されるようにできますか?
ご教授いただけたらと思います。
よろしくお願いします。

2009/04/13(月) 14:47:23
Application.Goto Reference:=Range(ActiveSheet.Shapes("グラフ
1").TopLeftCell.Address), Scroll:=True
↑切れるかもしれないのでくっつけてください。
または
ActiveSheet.Range(ActiveSheet.Shapes("グラフ 1").TopLeftCell.Address).Select
かな

チャートが表示されているウィンドウより大きいかどうかは
ActiveSheet.Shapes("グラフ 1").TopLeftCell.Address
ActiveSheet.Shapes("グラフ 1").BottomRightCell.Address
と
ActiveWindow.VisibleRange.Address
あたりで比較すればよいかと思います。

#検索して拾ってきただけなので突っ込まれても返信は
#出来ないかもしれません

古いスレッドには追加発言できません。