やりたいこと
仕事では、Excelで[Ctrl] + [V]なんて滅多に使わない。
Excelの悪仕様のおかげで、うっかりふつーに貼ったら、無駄にリンクされちゃったり。
書式とか入力規則とか、モレなくおまけで付いてこられても嬉しくないし。
むしろ迷惑。
おまけはいらん。
Excelでの貼り付けの95%は値 or 式です。
でも、毎回毎回右クリックして[値]ボタン押すの、めんどくさい。
[Ctrl] +[Shift] + [V]で値貼り付けできるようにしましょ。
コード
標準モジュール
Sub PasteOnlyValues()
On Error Resume Next
Selection.PasteSpecial xlPasteValues
End Sub
※コピーが行われていない状態で実行するとエラーが発生するため、「On Error Resume Next」で回避
クラスモジュール
Private Sub Workbook_Open()
Application.OnKey "+^v", "PasteOnlyValues"
End Sub
※[Ctrl] + [Shift] +[V]で貼り付けた場合、アンドゥ(元に戻す)は効きません。
※いつでも使いたいので、PERSONAL.XLSBに保存するか、.xlamでアドイン化しておきましょう。
特殊キー
キー | コード |
Shift | + (正符号) |
Ctrl | ^ (カレット) |
Alt | % (パーセント記号) |
一般キー
キー | コード |
BackSpace | {BACKSPACE} または {BS} |
Break | {BREAK} |
CapsLock | {CAPSLOCK} |
Clear | {CLEAR} |
Delete または Del | {DELETE} または {DEL} |
↓ | {DOWN} |
End | {END} |
Enter (テンキー) | {ENTER} |
Enter | ~ (チルダ) |
Esc | { ESCAPE} または {ESC} |
Help | {HELP} |
Home | {HOME} |
Ins | {INSERT} |
← | {LEFT} |
NumLock | {NUMLOCK} |
PageDown | {PGDN} |
PageUp | {PGUP} |
Return | {RETURN} |
→ | {RIGHT} |
ScrollLock | {SCROLLLOCK} |
Tab | {TAB} |
↑ | {UP} |
F1 〜 F15 | {F1} 〜 {F15} |
すみません。
へなちょこはhtml初心者です。
表もキレイ書けないし、Syntax HighLightも入れ方わかりません。
見ずらくってほんとにすみません。
いつか、コードをカラーリングしたいなぁ・・・。
タグ:ExceVBA
【このカテゴリーの最新記事】
-
no image
この記事へのコメント
コメントを書く
この記事へのトラックバックURL
https://fanblogs.jp/tb/7222917
※ブログオーナーが承認したトラックバックのみ表示されます。
この記事へのトラックバック
プロフィール
都内に出没するOLっぽい何か。大好物はExcelと効率化。独学でVBAやAccessをいじり始め、早10年。
5歩歩くと忘れてしまうので、ここにメモしていきます。
記事ランキング
- 1. 【Excel VBA】ユーザーフォームのCaptionが文字化け
- 2. 【Office365 SharePoint】Notesへのリンクを貼りたい
- 3. 【Excel VBA】StatusBarが表示されない
- 4. 【Excel VBA】入力規則でアプリケーション定義エラー
- 5. 【Excel】最大化で起動してくれない件
- 6. 【Excel VBA】Workbook_openで「パス名が無効です」
- 7. 【Excel VBA】.xlsm→.xlsx保存でエラー
- 8. 【Win10】タスクバーのプレビューを非表示にしたい
- 9. 【Win10】エクスプローラーがフリーズする
- 10. 【Win10】再発!!PC再起動すると、クイック起動バーが消える
ファン