|
▼津良 さん:
こんばんわ
>初心者ですがお世話になりたいと思っています。
>よろしくお願いします。
>
> A・・・・G・・・・・・・・P
>1 K180 2006/06/06
>2 R120
>3
>4
>データはこんな感じです。
ここまではいいのですが、
>Sheet1にあるGの列の文字をユーザーフォームに条件を入力して検索し、
これ、よく分かりません。
たぶん、「ユーザーフォームに条件を入力して、
Sheet1にあるGの列の文字を検索し」たいのだと思いますが、
Gの列の文字をユーザーフォームに取り込みたいようにもとれます。
>同じ行でPの列のセルに入力時の日付けを入れたいのですが、どのような使い方をすればいいでしょうか?
「入力時の日付け」のデータはどこにあるのですか?
とりあえず、参考までに
Private Sub CommandButton1_Click()
For i = 1 To Range("d65536").End(xlUp).Row
If Cells(i, 4) = TextBox1 Then
Cells(i, 16) = Date
End If
Next i
End Sub
もう少し分かりやすい質問の仕方をお願いします。
さらに「例え」を入れるといいと思います。
「例えば、ユーザーフォームのTextBox1に『R120』と入力してCommandButton1を押した時、
G列を検索してマッチたら同じ行のP列にxxの日付を入れたい」
というようにすれば回答者も回答しやすくなりますよ^^
|
|