>>338です。

>>341さんありがとうございます。

>>342さんご指摘の通りVBAでの実装方法を探しています。
いまのところ
Application.Union("Add_
>>341さんありがとうございます。

>>342さんご指摘の通りVBAでの実装方法を探しています。

いまのところ
Application.Union("Additional_Address", Selection).Select
を繰り返して複数のセルを同時に選択するところまではできています。
一方で、例えばA1,A2,A3,B3,C3,D3の順にAdditional_Addressを指定すると
選択範囲がA1〜A3の縦３連とB3〜D3の横３連に分割されて選択されるため、
xlEdgeLeft等の処理が縦３連と横３連それぞれで実行されてしまう状況です。
こうなるのを
┌┐
││
│├──┐
└┴──┘
こうしたい
┌┐
││
│└──┐
└───┘

セルごとに隣接判定をして罫線を描く／描かないの処理を
するしかないのでしょうか