Excel VBA質問箱 IV

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

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


403 / 75193 ←次へ | 前へ→

【80434】Re:検索フォームの動作について
回答  tarutaru  - 19/2/15(金) 14:18 -

引用なし
パスワード
   マナ様

お忙しい中、ありがとうございます。
シートの構成等は下記のとおりです。

シートは、2シート用意しており、”2019.4”,”Sheet3”(Sheet2は作成中削除しました)、レイアウトにつきましては、A列は3行目から連番を、Range(“B2:T2”)まで順に「役職・所属・(数字)・氏名・(住所)・(生年月日)・(年齢)・血液型・入社年月日・退社年月日・(在職月)・(在職年月)・(連絡先1)・(連絡先2)・職業構成・就業形態・(会社名)・(会社連絡先)・配偶者」の項目【()内の項目は入力フォームにはボックスとして配置しておりません】を入れており、3行目以降がデータとなります。

また、”2019.4”のRange(“B1”)に「入力」、Range(“C1”)に「検索」のCommandButtonを配置し、「検索」を押すと「検索フォーム」が表示され、”Sheet3”のRange(“B1”)に配置した「一覧表」のCommandButton、押すと、“2019.4”がActivateになるよう設定しています。

次に、「検索フォーム」ですが、フォーム上部に上記各入力ボックスを配置、フォーム下部(フォームの下半分)にListBox1、さらにフォーム上部には、「決定」Comb1、「抽出」Comb3、「RESET」Comb2ボタンを配置しており、「決定」ボタンで絞込後、ListBox1に表示されたリストを選択し、「抽出」ボタンを押すと”Sheet3”に抽出したデータ(List表示されているそのままのデータ)が転記され、その前のリスト選択時のリストだけ、色が変わるようにしたいのですが、上手くいきません。

「RESET」ボタンは押すと、各入力ボックスの内容が空白となり、”2019.4”が「検索フォーム」を残したまま表示されるようにしています。
更にTextBoxを2つ配置しており、TextBox6に「該当数」、TextBox7に「総数」が数字表示されるようにしています。

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

57 hits

【80422】検索フォームの動作について tarutaru 19/2/13(水) 13:36 質問[未読]
【80425】Re:検索フォームの動作について マナ 19/2/13(水) 19:15 発言[未読]
【80426】Re:検索フォームの動作について tarutaru 19/2/13(水) 22:09 質問[未読]
【80427】Re:検索フォームの動作について tarutaru 19/2/14(木) 3:30 質問[未読]
【80432】Re:検索フォームの動作について マナ 19/2/14(木) 19:22 発言[未読]
【80434】Re:検索フォームの動作について tarutaru 19/2/15(金) 14:18 回答[未読]
【80439】Re:検索フォームの動作について マナ 19/2/16(土) 9:24 発言[未読]
【80448】Re:検索フォームの動作について tarutaru 19/2/16(土) 17:20 回答[未読]
【80449】Re:検索フォームの動作について マナ 19/2/16(土) 19:35 発言[未読]
【80456】Re:検索フォームの動作について tarutaru 19/2/16(土) 21:38 発言[未読]
【80463】Re:検索フォームの動作について マナ 19/2/16(土) 23:22 発言[未読]
【80464】Re:検索フォームの動作について マナ 19/2/17(日) 0:03 発言[未読]
【80466】Re:検索フォームの動作について tarutaru 19/2/17(日) 7:42 発言[未読]
【80470】Re:検索フォームの動作について マナ 19/2/17(日) 10:31 発言[未読]
【80473】Re:検索フォームの動作について マナ 19/2/17(日) 11:19 発言[未読]
【80475】Re:検索フォームの動作について tarutaru 19/2/17(日) 17:33 お礼[未読]
【80477】Re:検索フォームの動作について マナ 19/2/17(日) 18:55 発言[未読]
【80480】Re:検索フォームの動作について tarutaru 19/2/17(日) 20:50 お礼[未読]
【80495】Re:検索フォームの動作について tarutaru 19/2/19(火) 22:54 お礼[未読]
【80496】Re:検索フォームの動作について マナ 19/2/20(水) 19:29 発言[未読]
【80497】Re:検索フォームの動作について tarutaru 19/2/21(木) 12:09 お礼[未読]

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