|
かみちゃんさん、お手数おかけしますが
よろしくお願いします。
動作イメージです。
入力シート
A B C D E F
1 品名 価格 個数 品名 価格 個数
2 もも 5 もも 10
3 みかん 4 みかん 5
500(浮動)
各月毎の商品別売上です。
別シートの商品別価格から、価格列に値を貼り付けます。
商品別価格シート
A B
1 品名 価格
2 もも 100
3 みかん 50
500(浮動)
入力シートの、価格列に、商品別価格シートの価格を
貼り付けたいのです。
>対象となるセルの数が1つしかないときはAutoFillする必要があるでしょうか?
>というより、できますか?
必要はないですね。。
セル数が1以上だったらオートフィルする、ですね。
ありがとうございます!
今試してみたところ、
Selection.AutoFill Destination:=Range(Selection, ActiveCell.xlLastCell), Type:=xlFillValues
のところで、このオブジェクトは、プロパティまたはメソッドをサポートしていませんエラーがでました。。
よろしくお願いします。
|
|