| |
ありがとうございます。
ヒデアキです。
>ならば先にレスしたように系列の削除は止めて、Unionメソッドで複数範囲を
>まとめるコードでやってみて下さい。
すいません抜けてました。
説明のようにやってみたらうまくいきました。
セルの結合の方もしない型にしました。
>たとえば変数 a を使って
>a= Worksheets("MeasData").Cells(8, 77)として
>この変数は、何のために用意しようとしているのでしょーか ? それが分かった方が
>回答しやすいかと思いますが、
すいません説明不足でした。
データをいくつか取って履歴を残そうとしているので、
１つ目は１０行目のところ。２つ目のデータは２０行目のところ・・・と
したいのですが、このようにデータの番号によってコピーしたグラフを
順番に貼り付けることはできますか？
説明不足があって申し訳ありません。
よろしくお願いいたします。
▼Kein さん：
>>エラーが出てしまいます
>ならば先にレスしたように系列の削除は止めて、Unionメソッドで複数範囲を
>まとめるコードでやってみて下さい。その場合も
>>3列を一つのセルに結合
>は、解除しておいた方がいいです。どんな処理にせよ、セル結合はマクロとの
>相性が悪すぎるので、コーディングに慣れた人は結合を嫌います。
>>たとえば変数 a を使って
>>a= Worksheets("MeasData").Cells(8, 77)として
>この変数は、何のために用意しようとしているのでしょーか ? それが分かった方が
>回答しやすいかと思いますが、少なくとも a は Rangeオブジェクト型で宣言して
>いるとみなせば、Set ステートメントを使わないといけません。即ち
>
>With Sheets("HistRead")
> Set a = .Cells(8, 77)
> Lp = a.Left: Tp = a.Top
>
>というように書くことになります。
|
|
ヒデアキ
- 04/9/9(木) 22:17 -
