Excel VBA質問箱 IV

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

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


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

51648 / 76738

←次へ　｜　前へ→


	【29953】繰り返し処理

超初心者 - 05/10/17(月) 14:51 -


	引用なし

	パスワード

　　A　　　　B　　　　　C　　　　D　　　　　E
1　受付日　受付番号　　No.　　　　担当　　製品型式
2　10/15　　1　　　　　1　　　　山田　　 A-3
3　　　　　　　　　　　2　　　　　　　　B-4
4　　　　　　　　　　　3　　　　　　　　A-8
5　　　　　　　　　　　4　　　　　　　　C-11
6　10/17　　2　　　　　　　　　　鈴木　 A-3
　　　　　　　　　　　　　　　　　　　D5

受付処理を自動化しています。1つの受付番号に複数の製品型式があります。
受付する時にC列の最終行からE列の最終行までC列に1から連番を振りたいのです。
今かいているコードでは全部に１を入力してしまいます。よろしくご教授ください。

　　～略～
上 = Range("c65536").End(xlUp).Row + 1
　　　下 = Range("e65536").End(xlUp).Row
　　 For RowNo = 上 To 下
　
　　　Range("ｃ" & RowNo) = Range("ｃ" & RowNo) + 1
　Next

　　～以下略～

0 hits

▼

【29953】繰り返し処理 超初心者 05/10/17(月) 14:51

≪