VBA / Excelの検索機能

データベース内の値を検索し、参照の後の2列にデータをコピーするマクロを作成しようとします。

例：

データベース：

PS85

ps86

ps77

ps52

...

• ユーザーフォームで、値 "ps86"のドロップメニュー、数値 "5"のドロップメニュー
• 送信ボタン
• ボタンをクリックするとデータベースに入ります。

PS85

ps86 5

ps77

ps52

...

溶液

このコードを試してください：

ComboBox1 =値付きドロップリスト（ps85、ps86 ...）

ComboBox2 =数量リスト

CommandButton1 =送信ボタン

次のコードを修正してください。

 Private Sub CommandButton1_Click（）ComboBox1 ""およびComboBox2 ""の場合は範囲​​として薄暗いRngTrouve、次にシート（NomDeTaFeuil）.Columns（1）を設定MsgBox "valeur inexistante"その他RngTrouve.Offset（0、2）.Value = ComboBox2.Value Endが設定されていれば終了RngTrouve = Nothing End Sub 

このチップをくれたpijakuに感謝します。