Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10307 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【22595】ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。 じん 05/2/24(木) 15:41 質問[未読]
【22597】Re:ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。 Jaka 05/2/24(木) 17:00 発言[未読]
【22600】Re:ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。 じん 05/2/24(木) 17:30 発言[未読]
【22640】Re:ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。 Jaka 05/2/25(金) 9:53 回答[未読]
【22666】Re:ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。 じん 05/2/26(土) 0:51 お礼[未読]
【22595】ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。
質問  じん  - 05/2/24(木) 15:41 -
引用なし
パスワード
   初めまして、こんにちは。
超初心者ですが、本、HPなどを見ながらVBAを使って顧客管理をしたいと考えて
やっております。
まず入力用のフォームに名前・住所・利用年月日などを入力し、ワークシート
に転送できるようになりました。
そのフォーム上にさらにﾃｷｽﾄﾎﾞｯｸｽとｺﾏﾝﾄﾞﾎﾞﾀﾝを配置し名前を入れると、以前利
用したデータから検索してフォーム上のﾃｷｽﾄﾎﾞｯｸｽに抽出され、入力の手間を省けるようにしたいと考えています。
ﾌｫｰﾑ上のﾃｷｽﾄﾎﾞｯｸｽをｺﾝﾎﾞ・ﾘｽﾄﾎﾞｯｸｽにかえるなどがあるとは思いますが、
まったくﾁﾝﾌﾟﾝｶﾝﾌﾟﾝです。
何か良いご提案と、コード記述を教えて頂ければありがたいです。
都合の良い質問かとは思いますが、よろしくお願いいたします。
【22597】Re:ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。
発言  Jaka  - 05/2/24(木) 17:00 -
引用なし
パスワード
   こんにちは。

取得したいデータの列は、固定されているみたいですから、行番号が解れば何とかなるんじゃないかと思います。
名前データが1列目（Ａ）に記入されているとして、下記コードで同じ名前が何行目にあるか解ります。

Sub fnmfm()
　　Dim ScNo As Variant
　　ScNo = Application.Match(TextBox1.Value, Sheets("Sheet1").Columns(1), 0)
　　If IsError(ScNo) Then
　　　 MsgBox "名前が見つかりません。
　　　 Exit sub
　　Else
　　　 MsgBox ScNo & "行目にありました。"
　　End If
End Sub

取得した行番号を使って、

TextBox2.Value = Sheets("Sheet1").Cells(ScNo,取得したい列番号).Value

で、テキストボックスに入れる。
テキストボックスの値をセルに入れるなら、右辺左辺を入れ替えるだけです。
【22600】Re:ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。
発言  じん  - 05/2/24(木) 17:30 -
引用なし
パスワード
   Jaka さん、ありがとうございます。
教えて頂いたとおり、うまく出来ました！！
が、これは一文字とかで検索するのは不可能なのでしょうか？
あと、同姓同名がいた場合はどちらが優先されて表示されるのですか？
努力不足で申し訳ございませんが、回答のほどよろしくお願いいたします。
【22640】Re:ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。
回答  Jaka  - 05/2/25(金) 9:53 -
引用なし
パスワード
   >これは一文字とかで検索するのは不可能なのでしょうか？
エクセル関数のMatchですから、できません。
それでしたら、Findを使った方が良いと思います。
ワイルドカードが使えますし。

>同姓同名がいた場合はどちらが優先されて表示されるのですか？
最初に見つかった物、つまり上にある物。
オートフィルタを使った方が、複数の抽出が可能だしワイルドカードも使えるから、これも選考した方が良いかも。

どんな風に抽出するのかで、抽出方法も変わりますし、どんな風に抽出したら良いのかも、現時点では解らないのではないないのでしょうか？

検索、抽出等で検索して出たスレッドなどを読んで試すなどされると、どれが自分のやりたい事なのか、だんだん見えてくると思いますから、1度目を通してみてね。
【22666】Re:ﾃｷｽﾄﾎﾞｯｸｽから検索したいです。
お礼  じん  - 05/2/26(土) 0:51 -
引用なし
パスワード
   Jaka さんありがとうございます。
やりたいことの「なんとなく」のイメージはあるんですが、
うまく表現できません。最初に答えを頂いたのでも十分なんですけど
欲深いもので・・・スミマセン。
けど、頑張ってなんとなくを、「これ！！」っていうふうに
探して試して頑張ります。
また質問すると思いますが、よろしくお願いします
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10307 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free