|
▼ichinose さん:
>
>よって、VBAでブックが開かれた直後に上記設定を行う処理を記述します。
>
>標準モジュールに
>'===========================================================
>Sub auto_open()
> Application.MoveAfterReturnDirection = xlToRight
> Worksheets("sheet1").ScrollArea = "$e$7:$n$16"
>' ↑設定するシート名 ↑設定するセル範囲
>End Sub
>
>確認してみて下さい。
福岡ですのでただ今台風が真上にいます。学校が休みになったので停電までがんばろうと思っています。
ありがとうございました。無事解決いたしました。
たぶん簡単なことだろうと、ヘルプなどで「カーソルの移動」などで検索したり「keydoun」などで調べたのですが、見つからず苦労していました。
本当にありがとうございました。
ついでに厚かましくもう一つ質問をよろしいでしょうか?
実は、自宅では、ExcelXP(2002)で開発しているのですが、学校ではExcel2000環境です。子どもがいろいろといじらないように、シートに保護をかけていたのですが、Excel2000環境では、そのままだとマクロがうまく機能しません。
子どもの記入範囲を採点し、間違いは、文字色赤背景黄色、正解は文字色青背景緑にし、新規問題では背景色なしにしていますが、
Range("E7:N16").Select
With Selection
.Value = Clear
.Font.ColorIndex = 5
.Interior.ColorIndex = xlNone ←ここでエラー
End With
「Interiorのプロパティーを取得できませんでした・・・」のエラーがでるのですが、
シートの保護の仕方に2000とXPでは違いがあるのでしょうか?また、同じように保護するにはどうしたらよいのでしょうか?
申し訳ありませんがよろしくお願いします。
|
|