|
こんにちは。かみちゃん です。
>> Rng.reszie(, 5).Value = Array(Me.ComboBox1.Text, _
>> Me.ComboBox2.Text, _
>> Me.ComboBox3.Text, _
>> Me.ComboBox4.Text, _
>> Me.ComboBox5.Text)
>
>さっそくスリムなコードを試してみましたが、上記のところが入力時に
>エラーとなり、サポートしていません、と出ます。
申し訳ありません。
スペルミスを確認しないまま提示してしまいました。
Rng.reszie(, 5).Value
を
Rng.Resize(, 5).Value
としてください。
>>>また、A、B、C、D行に同じ項目があれば自動的に、kosuuだけ足してその
>>>列に保存することは可能でしょうか?
>>
>>同じ項目というのは、直前の行と同じ値であればということでいいですか?
>
>dataシートの一つの列にコンボボックス1〜4までと、まったく同じデータ
>がある場合その列のEの数字とコンボボックス5を足して、その列のEに返したい
>ので、
新たに転記する行の一行上と同じであればなのか?
それよりも上の行ともチェックするのか?
例示のデータだとデータが1行しかないので、釈然としません。
たとえば、今回転記する行が4行目だったとします。
3行目と同じ値であれば、3行目の個数に加算します。
もし、1行目にも同じ値があればどうするのですか?
|
|