愛用のMajestouch Stingray テンキーの「９」のみレスポンスが悪くて、反応しづらくなってしまいました。メカニカルスイッチは、スイッチ交換でも治せるようだし、修理に出すのも何だし、 分解方法はネットに転がっていないけど、まぁ挑戦ぐらいの気持ちで分…

Sub PrintCurrentPage() ActivePrinter = "プリンタ名" ActiveDocument.PrintOut Background:=True, Range:=wdPrintCurrentPage, Copies:=1 End Sub これをクイックアクセスツールバーや、リボンに置く。ワンクリックでそのページだけを印刷できて、便利。

excelのエンターを押した際の挙動コントロール アドイン化して、リボン等にいれるのがオススメ Sub RetruntoRight() Application.MoveAfterReturn = True Application.MoveAfterReturnDirection = xlToRight End Sub Sub RetruntoLeft() Application.MoveAft…

インターネット等からDLしたファイルのセキュリティ設定を解除するPowershellコマンドを VBSによるツール化し、かつD&Dで解除できるようにしたもの。docs.microsoft.com Option Explicit Dim wsh Dim GetPath Dim path Dim OPT Set wsh = CreateObject("wscr…