[[20220608162413]]　『マクロを使用すると、コピー挿入等が出来ない』（お茶）　ページの最後に飛ぶ

『マクロを使用すると、コピー挿入等が出来ない』（お茶）

ネットの有識者様たちの記事を参考に
選択セルの、縦横軸ハイライトをすべく下記を実行しています。

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Calculate
End Sub

そうすると、列の挿入や、コピー等が出来なくなってしまいます。
マクロを有効としたまま、挿入コピーが出来るようになりますでしょうか。

お知恵をお貸しいただけますと幸いです。

＜使用 Excel：Excel2016、使用 OS：unknown ＞

思いつきで成功するのか解りません。
カット＆コピーモードの状態で振り分けとか？
（まかふぃ） 2022/06/08(水) 16:51

Calculateによって、クリップボードがクリアされるということなんでしょうかね。

＞選択セルの、縦横軸ハイライトをすべく
条件付き書式を併用した、例の手法ですか？
それなら再計算ではなく、
　Application.ScreenUpdating = True
を使うのがよいでしょう。

（γ） 2022/06/08(水) 16:59

例の方法とは下記の記事のことです。
[アクティブセルのある行・列を目立たせる]
https://www.relief.jp/docs/001406.html

# アンドリューという言葉が出てこなかった....
質問は部分的ではなく、背景も説明していただきたいですね。
「ネットの有識者様たちの記事」というのでなく具体的に。
（γ） 2022/06/08(水) 17:09

γ様

仰るとおり条件付き書式です。
言葉足らずを汲み取っていただき有難うございます。

ご教示いただいた内容で無事解決いたしました。
誠に有難うございました。
（お茶） 2022/06/08(水) 17:43

更に追加の質問で恐縮です。

下記条件付き書式を使用し、選択セルの縦横ハイライトをしていますが
=OR(CELL("row")=ROW(), CELL("col")=COLUMN())
特定のセルを選択した時のみ、列のハイライトを除外できればと考えております。

↓やりたいこと↓
C2:AN84を対象に縦横ハイライト条件付き書式設定しつつ
C列・D列のセルを選択した場合のみ、列をハイライトしない（行はハイライトのまま）

COLUMN()の中をいじるのかなと思い色々試しましたが、上手く行かず・・
恐れ入りますがよろしくお願いいたします。

（お茶） 2022/06/09(木) 16:35

条件を増やせばいいだけ。
条件成立時は何もしないが、第一条件。
（まかふぃ） 2022/06/09(木) 16:45

＞第一条件。
これ必要無かったな、優先順位と勘違いしてた。

優先順位で何もしないでも良いけど。

（まかふぃ） 2022/06/09(木) 16:51

まかふぃ様

有難うございます！
条件を増やして試したところ、上手く行きました。
目から鱗でした、ありがとうございます。
（お茶） 2022/06/09(木) 17:03

コメント返信：