[[20221202111236]]　『コピー＆ペーストについて』（roarke）　ページの最後に飛ぶ

『コピー＆ペーストについて』（roarke）

無知な質問で大変恐縮ですが、教えていただきたいことがあります。

ネットで調べて、excel行列のハイライトを条件付書式と
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Calculate
End Sub
でおこなっています。
ただ、例えばセルa1の文字をコピーしてセルb2に貼り付けたい時に
a1をコピーしてb2へ移動した時点で貼り付けできないのです。
これをコピー＆ペーストできるようにするには、上記のマクロ記述を変更したら可能でしょうか？
初心者が余計なことをするからだと笑わずに、ご教示をお願いいたします。

＜使用 Excel：Office365、使用 OS：Windows10 ＞

再計算しているから、カット＆コピーモードが解除される。
（半端） 2022/12/02(金) 12:18:50

 ＞　ActiveSheet.Calculate

 　　　↓に変えたらどうですか？（それだと、別の問題が発生しますか？）

     Application.ScreenUpdating = True

（半平太） 2022/12/02(金) 12:26:07

クリップボードに残ってれば、クリップボードから選択すれば貼り付けできた。
（半端） 2022/12/02(金) 12:30:22

 わたしも同じようにしてカーソルのある行をハイライト表示させているシートがあるがそのシートでコピー、
 貼り付けを行う際には開発-コントロール-デザインモードをクリックして一時的にイベントマクロを停止させている。
（ねむねむ） 2022/12/02(金) 12:44:23

返信が遅くなりました。

半平太様
　Application.ScreenUpdating = Trueにすると、
　実行時エラー'438'
　オブジェクトはこのプロパティまたはメソッドを　
　サポートしていません
　とエラーになってしまいます。
　
半端様
　その手がありましたね
　確かにペーストできました。

ねむねむ様
　そういう方法もあるのですね
　使い分けて実施してみたいと思います。

皆様本当にありがとうございました。
何とかクリップボードからの貼り付けで
やってみたいと思います。
また何かありましたらよろしくお願いいたします。

（roarke） 2022/12/05(月) 19:43:00

コメント返信：

[ 一覧(最新更新順) ]

[[20221202111236]] 『コピー＆ペーストについて』（roarke） ページの最後に飛ぶ

[[20221202111236]]　『コピー＆ペーストについて』（roarke）　ページの最後に飛ぶ