- 752 名前：デフォルトの名無しさん mailto:sage [2007/12/01(土) 05:56:40 ]
- もやは、釣りなのか何なのかわからなくなってるが。
VBAのIDEでCtrl+Gしてから次のコードを実行してみろ。
Set Rng = Range("A1:D10")
Set Rng1 = Rng.Columns(1)
Set Rng2 = Rng.Columns(3)
Set Rng3 = Union(Rng1, Rng2)
Debug.Print Rng.Address
Debug.Print Rng1.Address
Debug.Print Rng2.Address
Debug.Print Rng3.Address
