表をきちんと制御できるようにしようと思って，目的もなく作ってたら何かにつかえそうだったので載せます。オセロ作れる・・?挟まれたやつの判別ルーチンができたら作れるかなぁ。 Const 全幅 = 960, 全高 = 540 Sub test() Dim Sld1 As Slide: Set Sld1 = A…