[[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


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.