メインコンテンツへスキップ

ExcelでCtrl + Vを使用するときに、貼り付け値をデフォルトの貼り付けとして設定するにはどうすればよいですか?

著者:シャオヤン 最終更新日:2020年04月26日

通常、Excelでは、ある範囲またはワークシートからデータをコピーし、Ctrl + Vで別の範囲に貼り付けると、デフォルトで書式も貼り付けられます。 ただし、データを貼り付けるときに、フォーマットせずに値として貼り付けたい場合があります。 ここでは、ExcelでCtrl + Vを使用するときに、デフォルトの貼り付けとしてのみ貼り付け値を設定する簡単な方法を紹介します。

Ctrl + VをVBAコードで使用する場合のデフォルトの貼り付けとして貼り付け値を設定する


Ctrl + VをVBAコードで使用する場合のデフォルトの貼り付けとして貼り付け値を設定する

データを値としてのみ貼り付ける場合は、データを貼り付けた後、選択範囲の隅にある小さな四角をクリックし、毎回[値]オプションを選択する必要があります。 次のVBAコードは、デフォルトの貼り付けを変更して値を貼り付けるのに役立ちます。

1。 を押し続けます Alt + F11 キーを押して Microsoft Visual Basic forApplicationsウィンドウ.

2に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュール 窓。

VBAコード:Ctrl + Vを使用する場合のデフォルトの貼り付けとして貼り付け値を設定します

Sub PasteasValue()
Selection.PasteSpecial Paste:=xlPasteValues
End Sub

3。 次に、コードを保存して閉じ、を押します Altキー+ F8 キーを押して マクロ ダイアログボックス。

4。 の中に マクロ ダイアログで、使用するマクロ名を選択します ペースト値 [OK]をクリックします オプション ボタン、スクリーンショットを参照してください:

ドキュメント貼り付け値のデフォルト-1

5。 その後、 マクロオプション ダイアログボックス、下 ショートカットキー セクション、入力してください v 、スクリーンショットを参照してください:

ドキュメント貼り付け値のデフォルト-2

6。 そして、 OK を閉じる マクロオプション ダイアログを閉じて、 マクロ ダイアログ。

そして今、あなたがデータを貼り付けるとき Ctrlキー+ V、データはデフォルトで値として貼り付けられます。


関連記事:

外部コンテンツをExcelに貼り付ける方法は、常に宛先の書式と一致しますか?


デモ:ExcelでCtrl + Vを使用する場合、貼り付け値をデフォルトの貼り付けとして設定します

Kutools for Excel:300以上の便利なExcelアドインがあり、30日以内に制限なしで無料で試すことができます。 今すぐダウンロードして無料トライアル!

最高のオフィス生産性向上ツール

🤖 Kutools AI アシスタント: 以下に基づいてデータ分析に革命をもたらします。 インテリジェントな実行   |  コードを生成  |  カスタム数式の作成  |  データを分析してグラフを生成する  |  Kutools関数を呼び出す...
人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup    複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー    ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化    リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット12 テキスト ツール (テキストを追加, 文字を削除する、...)   |   50+ チャート 種類 (ガントチャート、...)   |   40+ 実用的 (誕生日に基づいて年齢を計算する、...)   |   19 挿入 ツール (QRコードを挿入, パスから画像を挿入、...)   |   12 変換 ツール (数字から言葉へ, 通貨の換算、...)   |   7 マージ&スプリット ツール (高度な結合行, 分割セル、...)   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

説明


Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (24)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Saved module - called "module 2" but nothing shows up in macros - no 'PasteasValue'. Seems like a step is missing?
This comment was minimized by the moderator on the site
I want to learn if there is a way to work in a sheet, not in a module.

If not, is there a way to work in particular sheet I determine?
This comment was minimized by the moderator on the site
It is working but after pasting you cannot undo
This comment was minimized by the moderator on the site
Same here.
This comment was minimized by the moderator on the site
Hello, guys,
I am sorry, may be there is no other good way for solving this problem, if you have any other good ideas, please comment here.
Thank you!
This comment was minimized by the moderator on the site
Save as binary .xlsb,
Then you can use ctrl+z with macros.
This comment was minimized by the moderator on the site
what do you mean "save as binary. xlsb"?
This comment was minimized by the moderator on the site
I agree Graham, just tried this in Excel 2016. When I click the Run button in the Macro dialog, I get the error message:

Run-tme error '1004':
PasteSpecial method of Range class failed

which is a shame as this really would have helped me today. I also tried Dejvid's macro below, but nothing happened when pasting from one book to another.
This comment was minimized by the moderator on the site
Make sure you have something selected in copy mode. dont even bother entering his code
This comment was minimized by the moderator on the site
Unless I missed something (and the instructions are *very* good), this does not work in Excel 2016.
This comment was minimized by the moderator on the site
I use Microsoft office Standard 2016, at it works.
This comment was minimized by the moderator on the site
Thank You, Sir...
This comment was minimized by the moderator on the site
nice tip, but the macro should look like this, because the code above give you an error statement, if you push ctrl+v and you didn't previously select something with ctrl+c Sub PasteAsValues() On Error GoTo err_handler: Selection.PasteSpecial Paste:=xlPasteValues Exit Sub err_handler: End Sub
This comment was minimized by the moderator on the site
The solution from Mikael seems to nice replicate the 2013 solution offered by this page in a 2016-Excel-friendly way. Unfortunately, it also replicates the inability to undo (through Ctrl-Z or other "undo" actions) a paste action while this macro is enabled.
This comment was minimized by the moderator on the site
To get the undo function to work after you have use a macro is quite difficult unfortunately. Can't help you with that, sorry.
This comment was minimized by the moderator on the site
Hi, solution works great but control+z not working after pasting :( . any additional help?
This comment was minimized by the moderator on the site
This coding does not work with the latest version of Excel 2016. Running the script gives an error code for the line Paste:=xlPasteValues
This comment was minimized by the moderator on the site
Try using this code with Excel 2016: Sub Paste_Special() Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False End Sub
This comment was minimized by the moderator on the site
Excellent solution
this code should be written directly into the VBA command box not in module box and I selected its place to be in the workbook so you make sure to END every sub opened, and ignore any message that pops up
This comment was minimized by the moderator on the site
Thanks Mikael, but your code didn't work. Microsoft must have changed the VBA coding language too much in their last update. Even the text "Paste:=" results in a compiling error. If there's an answer out there, it must be in a different generation of Excel VBA.
This comment was minimized by the moderator on the site
The macro i sent is recorded in the latest version of MS Excel 2016, so maybe the problem lies within your installation? Besides that the sub I wrote won't work without the "Selection.PasteSpecial" part.
This comment was minimized by the moderator on the site
I just ran into the same problem.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations