Excel VBA質問箱 IV

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

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


38411 / 76732 ←次へ | 前へ→

【43458】Re:for〜next
発言  ハチ  - 06/10/16(月) 18:54 -

引用なし
パスワード
   ▼やずや、やずや さん:

このあたりから〜

>'--------------------------------------------
>at40 = at30 - at20 '行の範囲
> 
>   For g20 = at20 To at30
>    a100 = g20
>    a110 = "M" + CStr(a100)
>    a111 = "P" + CStr(a100)
>    a112 = "A" + CStr(a100)
>    a113 = "J" + CStr(a100)
>    a114 = "K" + CStr(a100)
>    a115 = "R" + CStr(a100)
>    a116 = "Q" + CStr(a100)
>        
>    For g30 = 2 To at40 + 2
>     a100 = g30
>    a110 = "M" + CStr(a100)
>    a111 = "P" + CStr(a100)
>    a112 = "A" + CStr(a100)
>    a113 = "J" + CStr(a100)
>    a114 = "K" + CStr(a100)
>    a115 = "R" + CStr(a100)
>    a116 = "Q" + CStr(a100)
>    
>   x1 = Worksheets("0").Range(a110) '業務名
>   x2 = Worksheets("0").Range(a111) '工期
>   x3 = Worksheets("0").Range(a112) '社員名
>   x4 = Worksheets("0").Range(a113) '総時
>   x5 = Worksheets("0").Range(a114) '総分
>   x6 = Worksheets("0").Range(a115) '人件費
>   x7 = Worksheets("0").Range(a116) '契約金額
>
>  Worksheets("DF2").Range(a110) = x1 '業務名
>  Worksheets("DF2").Range(a111) = x2 '工期
>  Worksheets("DF2").Range(a112) = x3 '社員名
>  Worksheets("DF2").Range(a113) = x4 '総時
>  Worksheets("DF2").Range(a114) = x5 '総分
>  Worksheets("DF2").Range(a115) = x6 '人件費
>  Worksheets("DF2").Range(a116) = x7 '契約金額
>    
>   Next g30
>  Exit For
> Next g20

〜このあたりまでのことですか?
どうしたいのか良くわかりません。
ループはなにを意味しているのでしょうか?

1 hits

【43456】for〜next やずや、やずや 06/10/16(月) 18:22 質問
【43458】Re:for〜next ハチ 06/10/16(月) 18:54 発言
【43460】Re:for〜next やずや、やずや 06/10/16(月) 19:22 質問
【43463】Re:for〜next ハチ 06/10/16(月) 20:01 発言
【43467】Re:for〜next やずや、やずや 06/10/16(月) 20:17 お礼

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