|
Hirofumiさま、UO3さま、
ご回答をありがとうございました。
当方の理解力が足りず、ご回答を見ても、まったく分かりませんでした。
本当に申し訳ありません。
もう一度、具体的に、何をやりたいのか説明させて頂きます。
まず、Howto本には、ActiveXコントロールのコンボボックスをクリックして、右の▼だけ残して配置し、デザインモードで、プロパティウィンドウの中の、Name、BoundColumn、CloumnCount、ColomnWidth、LinkedCell、ListFillRange、ListWidthなどを設定してリスト入力する、というやり方が載っていますが、それでは、1つのセルだけしか入力できません。
また、そうやって設定したものを、▼ボタンを右クリックして、「コードの表示」を選択しても、
Private Sub ComboBox90_Change()
End Sub
と表示されるだけで、中のコードが表示されないので、コードが分からず、苦戦しています。
実際には、Sheet1のB17のセルを、コンボボックスのプルダウンから1つ選んで入力したら、芋づる式にC〜Qのセルにも、Sheet2の情報を入力したいのですが、Vlookup関数を使わずにできますでしょうか?
「」の部分は、手入力の部分で、空白です。
ですので、実際は、Sheet2のように、連続して並んでいません。
Sheet1
A B C D E F G H I J K L M N O P Q
16 明細番号 品 名 規格 規格単位 入数 入数単位 箱数 箱数単位 数量 数量単位 単価 金額 備考 仕入れ品名 仕入れ数量 仕入れ単位 原単価
17 1 スノードロップ-1 9 cm 28 ポット 「」 トレー 「」 ポット 180 「」 「」 「」 「」 ポット 67.48
18 2
Sheet2
A B C D E F G H I J
4 品 名 規格 規格単位 入数 入数単位 箱数単位 数量単位 単価 仕入れ単位 原単価
5 スノードロップ-1 9 cm 28 ポット トレー ポット 180 ポット 67.48
6 スノードロップ-2 9 cm 28 ポット トレー ポット 185 ポット 67.48
7 スノードロップ-3 9 cm 28 ポット トレー ポット 190 ポット 67.48
お手数ですが、今一度、ご説明頂けますよう、よろしくお願いいたします。
|
|