[実行時エラー '13': 型が一致しません]の解消方法は?

Question 104.6 Excel VBA Borad (掲示板)より Previous Next
シートのくり返し印刷をマクロで行おうと考えています。
エラーメッセージ 同じファイル内の別シートでは上手く動いていたもの(マクロ)を変数の指定番地を変更したら、「エラー#13 変数の型が合いません」と表示されてマクロが上手く走りません。
どのようにしたらよいのでしょうか。マクロは次のようなものです。
変数 「printstart」と「printend」は共にシートから直接読み込んでいます。
変数「i」はFor ~ Next でくり返し、「i」の値をシートに戻し、印刷内容の変更をさせています。
マクロの実行をすると For ~ Next が黄色く反転し止まります。
Sub Macro1()
'
'マクロ1
'データ個票 印刷
'
Dim inti As Integer, intprintstart As Integer, intprintend As Integer
'
    With ActiveSheet.PageSetup
        '.Orientation = xlLandscape
        .PaperSize = xlPaperA4
        .FitToPagesWide = 1
        .FitToPagesTall = 1
    End With
'
    printstart = Range("印刷開始番号").Value
    printend = Range("印刷終了番号").Value
'
    For i = printstart To printend
        Range("通し番号").Value = i
        Worksheets("2期個票").PrintPreview
    Next i
End Sub
以上のようなもので、マクロ初心者が本やネットで調べながら作ってみました。 一度は動いたのですが、その後動かないので、よろしくお願いいたします。
Answer   2011.12.13 永井善王
エラーメッセージ 『For ~ Next が黄色く反転』したときの、i の値、printstart の値、printend の値は、それぞれどうなっていますか?
右図のように、黄色くなっている行の変数名にマウスを重ねると内容が表示されるので、簡単にわかります。
おそらく
printstartprintend におかしな値が入っているのではありませんか?
どうも有難うございました
変数に入っている物が数値ではありませんでした。
シートから数値を読み取るときに
Range("印刷開始番号").Value の"印刷開始番号"の番地指定が 「○1:△1」 の様になっているとダメなようで、「○1」だけにすると動きました。

マウスポインタを変数に合わせると変数内容が表示できるとは、知りませんでした。
大変便利な機能だなと、併せて教えていただき有難うございました。

 

Excel VBA Macro