このホームページのサンプルを勉強させていただいているのですが、
ｖｂとエクセルをやり取りの項目のところで、
Option Explicit 'SampleNo=017 WindowsXP VB6.0(SP5) Excel2000　2002.04.19
Private Sub Command1_Click()
'基本的な設定は[ＶＢからエクセルを操作する]を参照して下さい。
　　Dim xlApp　　As Excel.Application
　　Dim xlBook　 As Excel.Workbook
　　Dim xlSheet　As Excel.Worksheet
　　Set xlApp = CreateObject("Excel.Application")
　　Set xlBook = xlApp.Workbooks.Add
　　Set xlSheet = xlBook.Worksheets.Add

　　'Excel のセルに値を代入します。
　　Dim i As Integer
　　Dim j As Integer
　　For i = 2 To 6
　　　　For j = 2 To 6
　　　　　　'３０〜１００の範囲のランダムなデータを作成
　　　　　　xlSheet.Cells(j, i) = CInt(70 * Rnd + 31)←サンプルで定数に値は、代入できませんとでるがどうすればよいでしょうか？
　　　　Next j
　　Next i
　　

再確認して見ましたが、私の環境では問題ありません。

状況を詳しく教えて下さい。
OS VB のバージョン Excelのバージョン
コードはＨＰからコピー＆ペーストされた状態でエラーが発生するのか
それとも自分で記入されたのでしょうか？

win98で、ｖｂ5.0とエクセル2000
必ずcellのところで、定数に値は、代入できませんとメッセージされます。
ヘルプ参照しても、VBA_XL.HLPは、見つかりませんとメッセージさます。
自分の所では、環境は、あっていないのでしょうか？
コマンドボタンつけてコピー＆ペーストととりあえず自分でも打ってみました。

［エクセルにデータを送りグラフを表示する］ のサンプルを新たに試して見て下さい。
途中までは同じ事をしているのですが？
又、問題の部分をコメントアウトしたらどうなりますか？
エラーが出た時の　I ,j の値はいくつですか？
Excelへの参照設定は何に設定されていますか？


又、他の（Excel関係）サンプルではどうでしたか？

Microsoft Excel 5.0 ObjectLibrary　にチェックを入れておられるとエラーが発生
するようです。

一度参照設定を外して　ok で閉じてから、再度Microsoft Excel 9.0 ObjectLibrary に
チェックを入れ直して下さい。

> 一度参照設定を外して　ok で閉じてから、再度Microsoft Excel 9.0 ObjectLibrary に
> チェックを入れ直して下さいとやればできたした。どうもありがとうございました。
しかしどうしてでしょうか？そのあたりをおしえてください。

> しかしどうしてでしょうか？そのあたりをおしえてください。

貴方のＰＣにExcel 5.0 が入っていないからだと思います。

つまらない質問ですが、では、2002ならば、どれにチェックを入れればいいものですか？

> つまらない質問ですが、では、2002ならば、どれにチェックを入れればいいものですか？

Microsoft Excel 10.0 ObjectLibrary　です。