のぶ

電機メーカー勤めです。C#やVBAを利用したツール作成などをしています。週末はよく山へ釣りに出かけます !!(=^・^=)!!

のぶ

電機メーカー勤めです。C#やVBAを利用したツール作成などをしています。週末はよく山へ釣りに出かけます !!(=^・^=)!!

最近の記事

VBA Outlook 重複送信先の削除

Outlookでメール送信する際に、送信先に設定したアドレス情報のうち、重複設定してしまったアドレスを削除したいというご要望がありました。 そこで、Outlookに組み込んだVBAプログラムで、送信先に設定されたアドレス情報のうち、アドレス表示名が一致するものを削除するものを作成しました。 実行時のイメージは下図となります。 Outlookに組み込むプログラムは次の通りです。 Option Explicit'重複送信先の削除Public Sub RemoveDupli

    • VSTOアドイン PowerPointのテキスト抽出

      以前、VBA PowerPointのテキスト抽出で、PowerPoint文書にVBAプログラムを組み込んで、スライド上で選択したテキストボックスなどから、テキストを抽出してクリップボードにコピーするツールを作成しました。 VBAプログラムは、自分で簡単にカスタマイズができ、動作確認もすぐに行えるので便利なのですが、PowerPoint文書にいちいちプログラムを組み込む手間があり面倒です。 アドインとしてPowerPointアプリケーションに組み込んでやれば、それぞれの文書

      ¥100
      • VBA PowerPointの全角半角変換

        PowerPoint文書中のテキストの英字・数字・カタカナ文字を全角または半角に変換するツールのご紹介です。 以前、PowerPoint文書テキストのフォントを一括変更するツール記事「VBA PowerPoint文書フォント変更(ツール添付)」を掲載しましたが、そのツールを使用されている方からのリクエストで作成してみました。 Excelに組み込んだVBAプログラムから、PowerPoint文書を編集するツールとしています。 ツールファイル添付VBAプログラムを組み込んだ

        ¥100
        • VBA PPTの書式保持カタカナ全角変換

          前回「VBA PPTのカタカナ全角変換」では、PowerPoint文書のテキストボックス文字列の中から、半角カタカナだけを対象に全角変換する処理を作成しました。しかし、文字列途中の書式などは全てリセットされてしまい、体裁が変換前とは変わってしまいました。 今回は、書式を保持したまま全角変換する処理に変えていきます。 書式保持したまま文字を変更するにはPowerPoint文書のテキストボックスの文字列は、1文字ごとに色を替えたり、下線を引いたり、文字サイズを変えるなど書式を

          VBA PPTのカタカナ全角変換

          前回「VBA 半角カタカナの全角変換」では、Excelシート上の文字列の中から、半角カタカナだけを対象に全角変換する処理を作成しました。 今回は、前回作成した処理を利用して、PowerPoint文書のテキストボックス文字列を対象に全角変換する処理に変えていきます。 プログラムの作成前回ファイルを流用してファイル名は「test3.xlsm」として、 Sheet1モジュールに「test3」関数を新規追加、 前回プログラムから「KatakanaZenkaku」関数はそのまま流用

          VBA PPTのカタカナ全角変換

          VBA 半角カタカナの全角変換

          前回「VBA 文字列の全角変換」では、テスト用の文字列全体を対象に全角変換する処理を作成しました。 今回は、文字列の中から、半角カタカナだけを対象に全角変換する処理に変えていきます。 半角カタカナの判定 半角カタカナは、文字コード一覧を見ると分かりますが、連続したコードで1つのブロック内に割り付けられています。 (参考ページ:「Halfwidth Katakana」) そのため、判定対象の文字を文字コードに変換したうえで、半角カタカナのブロック範囲内にあるかどうかを調べ

          VBA 半角カタカナの全角変換

          VBA 文字列の全角変換

          以前、PowerPoint文書テキストのフォントを一括変更するツールの記事「VBA PowerPoint文書フォント変更(ツール添付)」を掲載しました。 そのツールを使用されている方から、PowerPoint文書中の半角文字のカタカナを全角文字に変換するツールがあると便利そうですね、というリクエストを頂きました。半角カタカナは、フォントの横幅が小さく文字数を稼げるのですが、全角文字に比べると少し読みづらいし、体裁もあまりよくないので全角に揃えたいというのが理由のようです。

          VBA 文字列の全角変換

          VBA Outlook転送元ヘッダのコンパクト化

          転送メールを受け取った時、転送元メールに多くのメールアドレスが含まれたものだと、その情報だけで表示ウィンドウが埋め尽くされてしまい、転送メール本文までページスクロールさせるなど面倒になってきて、メールを読む気も失せてしまうことがあります。 そうならないための工夫として、転送メールの作成側で、転送元メールの宛先や写しに設定されたメールアドレス部分を削除したり、そのフォントサイズを小さく変更して行の高さを狭めることなどが考えられます。 ここでは、このフォントサイズを小さくする

          VBA Outlook転送元ヘッダのコンパクト化

          VBA PowerPoint文書Nin1

          PowerPointには「スライド一覧」の表示機能があり、ページ並びを編集したり、スライド全体の流れを把握したりする時に活用されると思います。 その「スライド一覧」イメージの文書ファイルを作成するツールを作りました。スライドイメージを縮小して、複数ページを1枚のスライドにN in 1形式で貼り付けたスライドを作成します。スライドを貼り付ける際のパラメータを、Excelシート上の表で指定できるよう、ExcelにVBAプログラムを組み込んだものとしています。 ツールファイル添

          ¥100

          VBA PowerPoint文書Nin1

          ¥100

          VBA Office文書のPDF保存

          最近のExcelやWord、PowerPointでは、文書ファイルをPDF形式で保存する機能があります。 その操作方法はとても簡単で、対象の文書ファイルを、それぞれのアプリケーションで開き、保存する際にPDF形式を指定するだけです。 しかし、対象ファイルの数が増えてくると、単純作業なだけに面倒になってきます。 そこで、VBAプログラムを作成して、この作業を自動化しましょう。 ツールファイル添付VBAプログラムを組み込んだExcelのツールファイルを添付します。 ツールの使

          ¥100

          VBA Office文書のPDF保存

          ¥100

          VBA Excel選択セルのテキストボックス化

          Excelを使ってデータ整理や分析を行った後、その内容をテキストボックスに埋め込んで、PowerPoint文書など他の文書に貼り付けて流用する場面ってあると思います。 それが数個程度であれば、それぞれにテキストボックスを作成してテキストを埋め込む作業も大して苦になりませんが、大量にあったり、テキストボックスの形がフローチャートのようにいくつかパターンあったりすると、単純作業だけに面倒になってきます。 そんな作業を少しでも楽にする補助ツールを作成したのでご紹介します。 ツ

          VBA Excel選択セルのテキストボックス化

          VBA Outlook PSTを開くメニュー化

          前回、Outlook データファイルを開く(閉じる)簡単なプログラムを作成しました。今回はその機能を拡張して、もう少し汎用性のあるものに仕上げていこうと思います。 ツールの使用イメージOutlookウィンドウで、クイックアクセスツールバーのコマンド(Project1.PSTMenu)ボタンを押すと、「PST Menu」が表示されます。 このメニューのボタン表示名は、PSTファイルのフルパスにOpen/Closeの操作を加えたものを表示します。Open/Closeの操作は、現

          VBA Outlook PSTを開くメニュー化

          VBA Outlook PSTを開く

          Outlookでやりとりしたメールが増えてくると、それを整理するために「Outlook データファイル (.pst)」を利用する場合があると思います。 さらにデータが増えてくると、「Outlook データファイル (.pst)」を複数作成して、分類分けしたり、年度別に分けたりして整理するようになると思います。 そんな複数作成した「Outlook データファイル (.pst)」を、簡単にOutlookに追加・削除するVBAプログラムを作っていきたいと思います。 Outloo

          VBA Outlook PSTを開く

          VBA PowerPoint文書フォント変更(ツール添付)

          以前の記事「10.VBA PowerPoint文書フォント変更の仕上げ」で、ExcelファイルにVBAプログラムを組み込むツールの作成方法をご紹介しましたが、手っ取り早くプログラムを組み込んだツールファイルが欲しいとのご要望を頂きました。 そこで、VBAプログラム組込み済で、すぐに実行することができるExcelツールファイルを添付します。 ツールの外観 ツールの使用方法①Excelツールファイルを起動します。 ②B3/C3セルで全角文字用/半角文字用の変更後のフォント名

          VBA PowerPoint文書フォント変更(ツール添付)

          VBA Outlookメール宛名書きメニュー化

          前回記事「VBA Outlookメール宛名書き」では、Outlookメールで宛名書きをする簡単なプログラムを作成しました。 今回はそのプログラムの機能を拡張します。アドレス情報に含まれる名前や所属、役職などの情報を組み合わせて様々なパターンの宛名を作成し、メニューで選べるようにします。また、Word機能を利用して宛名を書き込むことで、HTML形式やリッチテキスト形式のメールにも対応します。 ツールの使用イメージメッセージ編集ウィンドウで宛先やCCにアドレスを設定して、クイ

          VBA Outlookメール宛名書きメニュー化

          VBA Outlookメール宛名書き

          前回「VBA Outlook開発環境の整備」では、OutlookでVBAプログラムを開発するための準備を行いましたが、テストプログラムは無事動きましたでしょうか。今回は、その環境を使って、作成中のメールの宛名書きをするプログラムを作りたいと思います。 はじめに業務用のメールを出す時など、メールのネチケットとして、メール本文の先頭に送り先の方の宛名をきちんと書き込んだりします。 メールをたまにしか出さないような人は、この宛名書きの作業も大して苦ではないと思いますが、様々な人

          VBA Outlookメール宛名書き