質問: エクセル マクロ 線対称・点対称の位置に色づけする いつもお世話になっております。 エクセルのマクロを使って(あるいは数式でもいいのですが・・・)やりたいことが2つあります。 (1)指定したセルを「対称の中心」として,アクティブセルと点対称の位置にあるセルに色付けができないかと思っています。 (2)指定した列を「対称の軸」として,アクティブセルと線対称の位置にあるセルに色付けできないかと思っています。 もし可能であるようなら,どなたかマクロを教えていただけませんか? いつも他力本願で申し訳ないのですが,教育に役立てたいと思っています。どうかご教授ください。
回答: とりあえず、ヒントまで。 sub sample2() dim selectrangeaddress as string selectrangeaddress = selection.address names.add name:="中心", refersto:="=" & selectrangeaddress end sub sub sample3() dim selectrangeaddress as string selectrangeaddress = selection.address names.add name:="アクティブセル", refersto:="=" & selectrangeaddress end sub 上記のものは、選択した位置に名前を定義するものです。 プログラムの流れとして、 1.セルを選択させるウィンドウを出す(対象の軸を選択してください。) ⇒きちんとした値が出るまで繰り返す きちんとした値が入力されたら、色を塗る 2.セルを選択させるウィンドウを出す(対象の中心?を選択してください)⇒きちんとした値が出るまで繰り返す きちんとした値が入力されたら、色を塗る 3.アクティブセルと軸?の対象位置を割り出す (offsetとか色々算出方法はある?) うーん、こんな流れですかねぇ... せめて、対称位置の割り出し方法は考えてもらえませんか?