Excel VBA質問箱 IV

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

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


41004 / 76732 ←次へ | 前へ→

【40815】テキストボックスでオフセット値の選択
質問  勉強中です E-MAIL  - 06/7/24(月) 17:05 -

引用なし
パスワード
   皆様 こんばんわ またお世話になります
今回は、ユーザーフォームを使用して A列の値で検索をしてその行の
D列以降に数字を入力すると言うことをしています
ユーザーフォーム上には テキストボックスが2個 コマンドボタンが1個です
ここでテキストボックス3を追加してテキストボックス2の値を入力する列の指定が出るとそのつどマクロの書き換えやユーザーフォームをたくさん作ら無くてもいいのですがこのようなことは可能でしょうか 

    A     B     C      D      E     F
1  コード   取引先  形態    取引額   対象発注   実績
2  1001    A 社    EOS      0     0      0
3  1003    B 社    FAX      0     0      0 
4  1005    C 社    EOS      0     0      0
5  1012    D 社    WEB      0     0      0

現在のコードは以下です
Private Sub CommandButton1_Click()

For i = 1 To Range("A65536").End(xlUp).Row
    
   If Cells(i, 1) = TextBox1 Then
    Cells(i, 4) = TextBox2.Value
      ’この4をテキストボックス3で指定したいのですが 
    End If
  Next i


TextBox1.Value = ""
TextBox2.Value = ""
TextBox1.SetFocus

End Sub

よろしくお願いいたします。
0 hits

【40815】テキストボックスでオフセット値の選択 勉強中です 06/7/24(月) 17:05 質問
【40818】Re:テキストボックスでオフセット値の選択 Jaka 06/7/24(月) 17:42 発言
【40819】Re:テキストボックスでオフセット値の選択 勉強中です 06/7/24(月) 18:15 お礼

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