タイトル通りです。 文字の均等割り付けは最初の文字だけ有効です。 ２個以上あった場合、２個目以降は均等されていません。 フォルダにあるワードファイルを全部開きます。 Sub テキストボックス内置換し均等割付() Dim PATH As String PATH = "C:＼hogehoge＼kakunin&qu...

上記タイトル通りです。 今日の日付とキーワード（この場合は「kuma」）が含まれているファイルを開き、シートのA1セルの文字をmsgboxで出します。 ファイルを探す方法は、エクセルレジェンドの田中先生のマクロを参考にさせていただきました。 Sub test() Dim path As String, buf As S...

outlookのvbaを使って、メールの添付ファイルを自動で取得する方法がやっと作れました。ウハウハ言っていたら、会社はいつの間にかもっと便利なファイル格納方法を採用していました。（何とか言うファイル格納管理ソフトが入っていた。本当にソフト名が思い出せない。） なんとも複雑な気分です。 どんどん色々な技術が押し寄せてく...

シートの名前に使っていた漢字が違ったため（爆）、シートの漢字を直したく、VBAで作りました。 お試しになる場合は、ファイルを保存するか、間違っても良いようにしてから、お試しください。（VBAは再生後、元に戻るができないため。） before_wordに置換前の文字列を、after_wordに置換後の文字列をお入れくださ...

会社のメールがoutlookになり、指定した受信日付の添付ファイルを取得したいため、悪戦苦闘しています。 下記サイトさんを参考にさせていただいております。 前の月に受信したメールのうち、特定のキーワードを含むメールをカウントするマクロ 指定した期間に受信したメールの情報を Excel ファイルに書き出し、さらに MSG...

↓「作業用」シートを用意していただき、A1セルに「シート名」とご入力なさってください。 ↓作業用ファイルにシート名を書き出した後、シート名を並べ替え、それに併せてシートを並べ替えました。 もう少しスマートな方法があるのかもしれませんが、取り急ぎ備忘まで。 Sub シートを並べ変える() With ActiveWorkb...

下図のように、セルＡ１～Ａ５内のデータで、Ｅ１～最終行の文字と同じものがあれば、そこだけ色を赤に変えるようにしました。 （以前は入っている文字を一つだけ変えるようにしていましたが、2020年2月12日より、検索文字が入っている分だけ、色が変わるように変更しました。 また、VBAは一回走らせると「元に戻す」ができません。...

アメリカ人は「親切心で殺す」!? 嫌なやつ対処法です。 マッチョな人は、戦わずしてポージングだけですが、 あれはもう戦わずに勝っているからですかね？ （己に勝つかどうかというか） 「より良く生きることが最良の復讐」 ということわざを思い出しました。...

鳥獣戯画の動物たちが、ごっこ遊びをしているという趣旨でかいてみました。 戯画そのまんまのものもありますが、ご愛敬で。 今回描いてみて、どれだけイラストを描くというのが大変か思い知らされました。 ネットの皆さん、天才か。 あと、突っ込まれる前にお伝えしておきますが、アーチェリーイラストのうさぎの横にあるのは、矢の束です...

The Diverさんの有料テーマを使っています。 以下、自分のカスタマイズしたことと参考サイトさんを備忘まで。 【Diver】カスタマイザー機能の設定項目とプレビュー画像 カテゴリーアイコンのカラーを変えたかったので、助かりました。 こちらは最近知ったサイトさんです。自分の中では本家越えです。とにかくかわいくて調べや...