Excel VBA質問箱 IV

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

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


63859 / 76738 ←次へ | 前へ→

【17470】Re:ユーザーフォームの件
質問  さる E-MAIL  - 04/8/30(月) 19:49 -

引用なし
パスワード
   ▼こもれび さん:

申し訳はありませんでした。説明不足ですみませんでした。

>>(Textbox1〜64とオプションボタン)をデータ入力した後、
最終行に追加できるようにコードがありますか?
>>
>>もし空欄があれば行を削除して最終行に追加します。
>>一行目はタイトル(項目)だから2行目から追加します。
1〜64は列項目ですから
行項目は個人別で氏名を表示します。
1   234567891011121314151617~64
S.S   33312313 2 3 3 3 1 2 3 3〜
S.A  33321224 4 4 4 2 3 3 3 5〜
       .
       .
    下の行へ追加していきます。
>現在カーソルが「A65」にあると仮定して、カーソルを例えば「A67」に移動する
>と解釈してよいのでしょうか?
>
>この場合は
>     Range("A67").Select
>若しくは
>     Range(Cells(67, 1), Cells(67, 1)).Select
>と記述します。
>( 実際の動作は、元のカーソル位置がどこであれ「A67」に移動します )

説明不足で申し訳はありません。
全て入力してシート1の2行目へデータを表示します。
まだ入力してシート1の3行目へデータを表示します。
繰り返していきます。
最終行を探してセルをデータに入れる方法です。
0 hits

【17412】ユーザーフォームの件 さる 04/8/28(土) 23:17 質問
【17415】Re:ユーザーフォームの件 こもれび 04/8/29(日) 0:35 回答
【17442】Re:ユーザーフォームの件 さる 04/8/29(日) 23:04 質問
【17443】Re:ユーザーフォームの件 こもれび 04/8/29(日) 23:43 回答
【17449】Re:ユーザーフォームの件 さる 04/8/30(月) 1:17 質問
【17450】Re:ユーザーフォームの件 こもれび 04/8/30(月) 1:46 回答
【17451】追伸 こもれび 04/8/30(月) 1:54 回答
【17465】Re:ユーザーフォームの件 さる 04/8/30(月) 15:09 質問
【17469】Re:ユーザーフォームの件 こもれび 04/8/30(月) 17:38 発言
【17470】Re:ユーザーフォームの件 さる 04/8/30(月) 19:49 質問
【17471】Re:ユーザーフォームの件 さる 04/8/30(月) 19:59 発言
【17472】Re:ユーザーフォームの件 さる 04/8/31(火) 1:28 質問
【17473】Re:ユーザーフォームの件 こもれび 04/8/31(火) 7:06 回答
【17535】Re:ユーザーフォームの件 さる 04/9/1(水) 20:30 質問
【17541】Re:ユーザーフォームの件 こもれび 04/9/2(木) 0:47 回答
【17580】Re:ユーザーフォームの件 さる 04/9/2(木) 17:06 お礼

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