Maroは、デフォルトでExcelにデフォルトで常にコピー＆ペーストする

Question

書式設定なしでコピー＆ペーストを行うこのマクロをチェックするには、助けが必要です。それは正常に動作しません。

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) 
    On Error Resume Next 
    Target.PasteSpecial xlPasteFormulas 
    Application.CutCopyMode = True 
End Sub 

どのようにフォーマットせずに貼り付けるにはCtrl-Vを押しますか？私はExcelをきれいに整えたままにしておきたいので、ユーザーは書式設定せずに値と数式をコピーして貼り付けることができます。

ありがとうございます！

Answer 1

これを試してみてください：Assigning Macros to Short-Cut Keys in Excel

あなたは、ユーザーがマクロへのアクセスを持っているかうまくする必要があります

- 、これを行うには、いくつかの方法があると私はあなたの環境で動作するどのようなので、わからないでもこれらのオプションを動作させるアクセスレベル。

非常に単純なADD-INをビルドしてマクロを埋め込み、CTRL + Vをオーバーライドするマクロショートカットを割り当てたとします。その後、社内ポリシーに従ってADD-INを展開します。

しかし、ソリューションを完全に実装するには、より詳細な情報が必要です。

Answer 2

あなたは自身のようにしたい場合は、カスタムのCtrl-V、さて、あなたはこのようにそれを達成することができます：

' Code Module ThisWorkbook 
Private Sub Workbook_Open() 
    Application.OnKey "^v", "ThisWorkbook.PasteWithoutFormat" 
End Sub 
Private Sub PasteWithoutFormat() 
    If Application.CutCopyMode Then Application.Selection.PasteSpecial xlPasteFormulas 
End Sub 

Answer 3

私は最も簡単な方法のために行ってきました。 Ctr-vを設定して（マクロのオプションで）、次のコードを実行します。

Sub Pstfrmul() 
    Selection.PasteSpecial xlPasteFormulas 
End Sub 

多くの多くのご回答とご意見がありました。ベスト、 Gerónimo