2018-01-01から1ヶ月間の記事一覧

vbe_隠れショート_ctrl+E

モジュール(basファイル)のエクスポート

Workbook_OpenとAuto_Open

Workbook_Open → 「Microsoft Excel Objects」内の「ThisWorkbook」 Auto_Open → 標準モジュールに

カテゴリー設定

管理画面で、1つの記事に対して、複数のカテゴリーを設定できるなんて、 素敵☆彡

ワード読上げ2

ドラッグ選択した文字列を読み上げてくれる、コマンドボタンです。 ショートカットも使えるんですね^^ ◆ Alt+Ctrl+Space 2つの「読み上げ」ボタンの違いは、 左の「吹き出し」の方は、 ショートカットは無くて、読んでいるところを示してく…

読上げボタン

ユーザー設定リボンに、便利なボタンを追加しましょう♪ リボンの「ホーム」上で右クリックして、 「リボンのユーザー設定」をクリックします。 Wordのオプションダイアログが出てきます。 中央の「コマンドの選択」で、 「すべてのコマンド」または、「リボ…

最強!Chrome_Bookmarkとか

ひと手間いります! まず、 ◆ Alt+D(アドレスバーにカーソル移動) その後に、すかさず、 ◆ Ctrl+D です。 これで、☆が黄色に変わって、ブックマークされます。 ちなみに、 ◆ Ctrl+Shift+B で、 「ブックマークバー」が、アドレスバ…

DLL HELL

デ◯ヘルではありません! DLL地獄なるものが、あるらしい、、 https://ja.m.wikipedia.org/wiki/DLL地獄

Up!スタートアップ!_shell:startup

Win+X→R(ファイル名を指定して) →shell:starup と入力して、Enter!

最強!1人読み合わせ!

SAPIの参照設定。 SAPI(Speech Application Programming Interface) Windowsアプリケーションで音声認識や音声合成を使うためのAPI。 これをすっかり!うっかり!な状態で、 SenKeysなんか余計なことをしていたよ^^; Microsoft Speech Object Library…

SAPIの参照設定

SAPI(Speech Application Programming Interface) Windowsアプリケーションで音声認識や音声合成を使うためのAPI。 これをすっかり!うっかり!な状態で、 SenKeysなんか余計なことをしていたよ^^; Microsoft Speech Object Library に早速チェックを入れ…

speechオブジェクトのspeakメソッド

分からん!(笑)

vba キー操作_SendKeysメソッド

Application.SendKeys(Keys, Wait)

keydownでも関数

作ると面白いな☆

keydownイベントとkeypressイベント

の違いがあるそうですので、ご興味がある方はぜひ!紹介されている方の転載とかは、よろしくなかったりするので、 ご容赦をm(__)m ◆ KeyDownは、どのキーでもOK! ▼ KeyPressは、アスキーコードのみで☆ なので、ShiftキーやFnキーなどは、ダメなん…

召喚!ゲームバー!!

Windows10に標準搭載_動画録画(画面キャプチャ)機能です。 Win+G_ゲームバー召喚! Win+Alt+R=録画を開始! 録画機能の調整設定です。 Win+X→N(設定)です。 「ゲーム」を選択して、 これで、録画ソフトなしでも、手軽にエクセル操作とかを …

最強!列番号!

Function cNo(Optional ByVal clmS As String, Optional ByVal wsNm As String) As Long If wsNm = "" Then wsNm = ActiveSheet.Name If cNo = "" Then clmS = "A" Dim ws As Worksheet: Set ws = Worksheets(wsNm) cNo = ws.Range(clmS & 1).ColumnEnd Func…

最強!最終列

Function cEnd(Optional ByVal clmS As String, Optional ByVal rowT As Long, _ Optional ByVal wsNm As String) As Long If wsNm = "" Then wsNm = ActiveSheet.Name If clmS = "" Then clmS = "A" If rowT = "" Then clmS = 1 Dim ws As Worksheet: Set w…

最強!最終行

Function rEnd(Optional ByVal clmS As String, _ Optional ByVal wsNm As String) As Long If wsNm = "" Then wsNm = ActiveSheet.Name If clmS = "" Then clmS = "A" Dim ws As Worksheet: Set ws = Worksheets(wsNm) rEnd = ws.Range(clmS & Rows.Count).…

dell_screenLock_excel

Fn+S~ ********* Dellノートには、ScreenLockのキーが見当たらない。 Fnとの組合せも表示されていない。 ScreenLockの頭文字Sと覚えておこっと☆ なかなか押さない組み合わせだから、何かの拍子でなると焦っちゃう(笑)

最強if

もしも、条件が1つなら、一度は試してみたいものです。 ifの一行書き。 ”If 今日が晴れ then 外出する。” If 今日が晴れ then 外出する。 else if 今日が雨 then 家で遊ぶ end if の場合、 ”If 今日が晴れ then 外出する。” ”If 今日が雨 then 家で遊ぶ。”…

召喚!出でよっ、何とかプロシージャ!

なんとか、呼び出しに成功! • Application.Run "ファイル名!プロシージャ名" 別ファイルのプロシージャを実行。 同じファイルの正攻法は、 • Call プロシージャ名。 もしくは、 • プロシージャ名のみ 精巧にできているものですね。

ショートカットキーの覚え方の教え方2

ある会社の先輩と後輩の会話。 「Ctrlキーの後に、アルファベットのキーを押すと、 ショートカットで、ちょ~楽になるよ。 検索だと、FindのF、 ジャンプは、「Go」のG、だよ。」 「ありがとうございます!それは、便利ですね^^ それじゃぁ、…

Dim FSO as New FileSytemObject

一行で書けるってすてき~(≧▽≦)

ショートカットキーの覚え方の教え方

コピーのC+Ctrl なんて、よく言われます。 下線は、「アンダーバーのU」 太字は、「BoldのB」と来て、 斜体は、「イタリックのI」と言われても、そもそもイタリック字体が、斜めということ自体知らない、という事態。 「あ、ピサの斜塔が、イタリアだ…

最速!最強!ファイル閉じ!!

左手元にある、3キーで、一瞬で消し去ることができちゃいます♪ あの、「alt+F4」よりも速い! ★ Alt → Space → C 薬指 → 人差し指 → 中指 です☆彡

Windowsスナップ

Windows10でのグチ対策1つ目☆彡 ショートカットキー「Win+←↑↓→」で、 ウィンドウを左半分にしたり、右半分にしたりできますが、、、 いちいち、横に、開いているファイルの一覧が出てきて、 選択しないといけない手間があって、とってもめんどいです! …

隠しショートカットキー

エクセルの隠しショートカットキーです。 天井ライン:T_top 水平ライン:H_horizon 底のライン:B_botom 右のライン:R_right 左のライン:L_light 垂直ライン:V_verticle 右下り罫線:D_down 右上り罫線:U_up 一本目の時は、altキーを一緒に押…