Excel VBA質問箱 IV

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

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


34469 / 76734 ←次へ | 前へ→

【47474】ユーザーフォームのリストボックスから記入
質問  iida  - 07/3/12(月) 2:56 -

引用なし
パスワード
   教えて下さい。
ユーザーフォームをモーダレスで立ち上げています
アクティブなセルに既に文字が記入済みの場合(無い場合もあります)
この文字列にプラスして書込をしたいのですが
出来るのでしょうか?
出来るとすればどんなコードに変更すればよいのでしょうか?
よろしくお願いします。

Private Sub UserForm_Initialize()
  ListBox1.ColumnCount = 2
  ListBox1.RowSource = Sheets("sheet1"). _
  Range(Range("AK1"), Range("AK1").End(xlDown)).Address
  ListBox1.TextColumn = 1
  ActiveCell.Value = ListBox1.Value
End Sub
3 hits

【47474】ユーザーフォームのリストボックスから記入 iida 07/3/12(月) 2:56 質問
【47478】Re:ユーザーフォームのリストボックスから... Blue 07/3/12(月) 8:45 発言
【47492】Re:ユーザーフォームのリストボックスから... iida 07/3/12(月) 14:06 発言
【47494】Re:ユーザーフォームのリストボックスから... Blue 07/3/12(月) 14:24 回答
【47495】Re:ユーザーフォームのリストボックスから... iida 07/3/12(月) 14:33 発言
【47496】Re:ユーザーフォームのリストボックスから... iida 07/3/12(月) 14:53 お礼

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