[[20081009194607]]　『実行時エラー　1004　LineStyleプロパティを設定ａx（ＴＡ）　ページの最後に飛ぶ

『実行時エラー　1004　LineStyleプロパティを設定できません』（ＴＡ）

 お世話になってます。
 今日は、以前できてたマクロがエラーになり困っているのでお助けください。
 次のようなプログラムです。
 Sub 斜線音楽()
    Sheets("シール").Select
     Dim 人数 As Integer
     人数 = Sheets("設定").Range("b13").Value
    Range(Cells(2, 13), Cells(人数 * 2 + 1, 13)).Select
    With Selection.Borders(xlDiagonalUp)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    Range("E2").Select
 End Sub
 これを実行すると表題のようなエラーメッセージが出ます。
 なぜ急にラインスタイルがダメになったのか教えていただけないでしょうか。

 エクセル2003SP3　WINXPで普通に処理されますが・・・
 どこでエラーになるのかステップ実行されては？
 そのときに人数にどんな数字が入っていますか？
　　　　　　(SHIOJII）

 すみません、ステップ実行とはどのようにするのですか？

 ちなみに、人数は指定したセルにcountの関数の値が入っています。

 >ステップ実行とはどのようにするのですか？
 該当のエクセルファイルを開き、Alt+F11キーでVBEを開く。
 上記のコードが書き込んであるモジュールを開き、SubとEnd Subの間にカーソルを当て、
 F8キーを押して下さい。
 以降、F8キーを一つ押す毎にコードが一行ずつ実行されるのが分かると思います。

 一つずつ振る舞いを検証し、どこの部分でエラーが発生したかを確認してみて下さい。

 (Dil)

 ありがとうございます。
 試してみてから、また質問させていただきます。

おはようございます。

 みなさん、すみません。
 単純なミスでした。
 シートの保護でセルの書式設定ができないようにしていたことがいけなかったみたいです。
 すみませんでした。

コメント返信：

[ 一覧(最新更新順) ]

[[20081009194607]] 『実行時エラー 1004 LineStyleプロパティを設定ａx（ＴＡ） ページの最後に飛ぶ

[[20081009194607]]　『実行時エラー　1004　LineStyleプロパティを設定ａx（ＴＡ）　ページの最後に飛ぶ