Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

21329 / 76738

←次へ　｜　前へ→


	【60810】Re:［無題］

新参者３ - 09/3/16(月) 17:39 -


	引用なし

	パスワード

▼kanabun さん：

更に付け加えますと、
uの位置は、前使っていたマクロの使い回しのため、
u+2と指定しております。

ここを変えても問題はないのですが、
変えなくても問題ないと思いますので変えておりません。

> t = sh2.Cells(4, 2).Value
> u = 2
> If u <= t * 4 Then　←ここのif文ももっと良い方法がありますが、当時はこれでやりましたのでそのまま載せました。これも問題ないとは思うのですが・・・
>　　 For w = u To 4 * t
>　　　　 u = u + 4
>　　 Next w

5 hits

▼

【60781】［無題］ 新参者 09/3/14(土) 3:47