Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


69994 / 76732 ←次へ | 前へ→

【11251】変数の指定方法について
質問  初心者です  - 04/3/3(水) 21:23 -

引用なし
パスワード
   はじめまして。
マクロを勉強して1ヶ月の新人です。
シートの名前に(氏名一覧、集計、山田花子、○△□×、・・・)というシートがあって山田花子のシート以下数百名のシートがある状態です。名前の付いたシートは氏名一覧のシートに、名前をシートの順にA1のセルから下に列挙してあります。マクロで組みたいのは、集計の表にある各個人のデータを名前のシートにそれぞれ飛ばしたいのです。いろいろとやってみたのですが、エラー9の「インデックスが有効範囲にありません」というエラーがでてうまくいきません。どなたか手助けしていただけるとありがたいのですが、よろしくお願いします。

Sub 転記()

For i = 2 to 1179 step11

Sheetname=Worksheets("氏名一覧").cells((i-2)/11+1,1)

With Worksheets(sheetname)
 .range("c3")="=集計!b"&i
 .range("d10")="=集計!e"&i+1
 .range("e10")="=集計!g"&i+1
 .range("g10")="=集計!k"&i+1
 .range("h10")="=集計!p"&i+1
End With

Next

End sub

どうも、Sheetnameの変数の指定の仕方が間違っているようなのですが本当にわかりません。ここに、変数を無視してシートの名前を入れると、そのシートだけはうまく動くのです。是非とも教えてください。
1 hits

【11251】変数の指定方法について 初心者です 04/3/3(水) 21:23 質問
【11257】Re:変数の指定方法について かみちゃん 04/3/3(水) 22:22 回答
【11258】Re:変数の指定方法について アイエネス 04/3/3(水) 22:36 回答
【11259】Re:変数の指定方法について かみちゃん 04/3/3(水) 23:16 回答
【11297】ありがとうございます。 初心者です 04/3/4(木) 21:08 お礼

69994 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free