| |
２点教えてください。
例えばセルＡ１，Ｂ１，Ｄ５に数値の１，２，３がそれぞれ入っていたとします。
これをＡ１はＥ１に、Ｂ１はＦ１に、Ｄ５はＧ１に転記する場合
.
.
Set A = Union(Range("A1:B1"), Range("D5"))
Set B = Range("E1:G1")
For Each I In A
B(I).Value = A(I).Value
Next I
１．こうすると、Ａ１，Ｂ１の値は、Ｅ１，Ｆ１に転記されますが、Ｄ５の値は転記
されません。いろいろテストしてみるとどうも、Ａ２の値がＧ１に転記されます。
すなわち、ＵＮＩＯＮで離れたセルをつけても、ＦＯＲ ＥＡＣＨの中では
はじめの、Ａ１：Ｂ１のＲＥＮＧＥの中を順に探していき、個数は３個なので
Ａ２までを対象にしてしまっているようです。これをきちんと、Ｄ５をＧ１に
転記させる方法は無いのでしょうか。配列などを使えばできそうですが、
ＵＮＩＯＮでは、無理なのでしょうか？
２.上記の記述に何か誤りはあるのでしょうか。有ればどう修正すればいいのでし
ょうか？
というのは、Ａ１、Ｂ１などの対象となっているセルの値が数値なら
動くのですが、文字にすると、実行時エラー”１３” 型が一致しません。
のエラーメッセージでできません。
どちらかというと文字データで使う場合のほうが多いので、文字でもできる
ようにしたいです。
以上２点よろしくお願いします。
|
|
マキチャン
- 06/4/22(土) 15:02 -
