|
Jaka 様
早速のご回答ありがとうございます。
当方の希望は、教えていただいた Application.CutCopyMode でかなえられました。
私は、Worksheet_SelectionChangeを働かなくさせるにはどうしたらよいのかと考えていたのですが、CutCopyModeの場合など条件を付け足していけば良いのですね。
勉強になりました。ありがとうございました。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.CutCopyMode Then
Else
With Target
TR = .Row
TC = .Column
TT = .Top
TL = .Left
End With
・
・
<前回掲載マクロ>
・
・
End If
End Sub
>質問の内容が全く理解できませんが、これ使ってみるとか...。
>でも、質問内容を理解してないので使えるのかわかりませんし、どう使うかのかも解りません。
>
>If Application.CutCopyMode Then
> MsgBox "カットかコピー"
>End If
|
|