スポンサーリンク
VBA

Excel VBA | ADOで郵便番号から住所を検索して別シートに出力するバッチ処理の応用例

大量の顧客リストを処理するとき、郵便番号から住所を検索して別シートにまとめるバッチ処理は非常に便利です。ここでは、日本郵便公式の KEN_ALL.CSV をADOで読み込み、郵便番号をキーに住所を検索し、結果を別シートに出力する例を紹介しま...
VBA

Excel VBA | ADOで郵便番号から「都道府県+市区町村+町域」まで抽出する完全版の応用例

日本郵便が公開している KEN_ALL.CSV(全国郵便番号簿)を利用すれば、郵便番号から 都道府県・市区町村・町域 を正確に判定できます。ADO(ActiveX Data Objects)を使うと、CSVを「テーブル」として高速に検索でき...
VBA

Excel VBA | ADOで郵便番号から市区町村まで抽出する完全版の応用例

日本郵便が公開している KEN_ALL.CSV(全国郵便番号簿)を使えば、郵便番号から市区町村まで正確に判定できます。ここでは ADO(ActiveX Data Objects) を利用してCSVを高速に読み込み、郵便番号から市区町村を抽出...
VBA

Excel VBA | CSVをADOで高速に読み込む方法 + 郵便番号から都道府県だけ抽出する高速版

大量の郵便番号データ(日本郵便公式の KEN_ALL.CSV など)を扱う場合、FileSystemObject で1行ずつ読む方法は遅くなりがちです。そこで ADO(ActiveX Data Objects) を使うと、CSVを「データベ...
VBA

Excel VBA | 2次元配列を使った表データ処理の実務サンプル集

こちらに「2次元配列を使った表データ処理の実務サンプル集」をまとめました。Excelの表データを一括で配列に読み込み、加工してから書き戻すことで、処理速度と効率が大幅に向上します。実務サンプル集(2次元配列)1. セル範囲を配列に読み込むS...
VBA

Excel VBA | 入力チェック+一覧出力+グラフ化」を一括で行う総合マクロ

こちらに「入力チェック+一覧出力+グラフ化」を一括で行う総合マクロのサンプルをまとめました。未入力・数値・日付のチェックを行い、結果を一覧シートに出力し、さらにエラー種別ごとの件数を集計してグラフ化します。総合マクロコードSub Check...
VBA

Excel VBA | エラー種別ごとに系列を分けた複数折れ線グラフを作成するマクロ

エラー種別ごとに系列を分けた複数折れ線グラフを作成するVBAサンプルです。日付ごとに「エラー種別別の件数」を集計し、各種別を1本の折れ線として描画します。サンプルコードSub ErrorTrendByType() Dim wsSrc As ...
VBA

Excel VBA | エラー件数推移を時系列で折れ線グラフ化するマクロ

こちらが「エラー件数推移を時系列で折れ線グラフ化する」VBAサンプルです。日付ごとにエラー件数を集計し、その推移を折れ線グラフで可視化します。サンプルコードSub ErrorTrendLineChart() Dim wsSrc As Wor...
VBA

Excel VBA | エラー種別ごとに件数を集計してグラフ化するマクロ

こちらが「エラー種別ごとに件数を集計してグラフ化する」VBAサンプルです。チェック結果シートに「行番号・列名・エラー内容」を一覧化した後、その「エラー内容」ごとに件数を集計し、棒グラフで可視化します。サンプルコードSub Summarize...
VBA

Excel VBA | 入力チェック結果を一覧表にまとめるマクロ集

こちらに「入力チェック結果を一覧表にまとめるマクロ集」をご紹介します。セルを色付けするだけでなく、別シートに「どの行・どの列で・どんなエラーがあったか」を一覧化することで、後から確認・修正がしやすくなります。サンプル1:未入力・数値・日付チ...
VBA

Excel VBA | セル全体を対象にした入力チェックマクロ集

セル全体を対象にした入力チェックマクロ集をまとめました。未入力・数値・日付・文字数など、よくあるチェックを網羅しています。入力チェックマクロ集1. 未入力チェック(必須項目)Sub CheckMissing() Dim ws As Work...
VBA

Excel VBA | 複数範囲をHTML化して1通のメールに埋め込むサンプル

複数のセル範囲をそれぞれHTMLテーブルに変換し、1通のOutlookメール本文にまとめて埋め込む実務向けVBAです。書式(罫線・色・フォント)も保持されます。コード全体Option Explicit' 指定したセル範囲をHTML(<tab...
VBA

Excel VBA | Excelの範囲をそのままHTML表に変換してOutlookメールで送信する

こちらに「Excelの範囲をそのままHTML表に変換してOutlookメールで送信する」サンプルをまとめました。Excelのセル範囲をコピーしてHTML形式に変換し、メール本文に埋め込む方法です。サンプルコード:Excel範囲をHTML表に...
VBA

Excel VBA | メール本文をHTML形式にして表やリンクを埋め込む

こちらに「メール本文をHTML形式にして表やリンクを埋め込む」VBAサンプルをまとめました。OutlookメールをHTML形式で作成すれば、文字装飾・表組み・リンク挿入が可能になります。サンプル1:HTML形式で文字装飾Sub SendHt...
VBA

Excel VBA | 日本郵便の公式CSVをVBAで読み込んで判定する実務的な応用例

日本郵便は公式サイトで 郵便番号データ(CSV形式) を公開しています。これをVBAで読み込めば、郵便番号から都道府県や市区町村を正確に判定できます。実務では「顧客リストの郵便番号から住所を自動補完する」などに活用されます。コード例(CSV...
VBA

Excel VBA | Cells を使った「郵便番号から市区町村まで自動判定する」応用例

郵便番号は 日本郵便の公式データベースに「郵便番号 → 市区町村」の対応表が存在します。Excel VBAでは、この対応表を簡易的に辞書(Dictionary)に登録しておき、郵便番号から市区町村を自動判定することができます。コード例(簡易...
VBA

Excel VBA | Cells を使った「郵便番号から都道府県を自動判定する」応用例

郵便番号は 先頭の数字(または前半3桁)で地域が決まる 仕組みになっています。これを利用して、郵便番号から都道府県を自動判定する VBA の例を紹介します。コード例Sub PostalCodeToPrefecture() Dim i As ...
VBA

Excel VBA | 正規表現で郵便番号を抽出して住所と分離する応用例

顧客リストやアンケートデータでは「郵便番号+住所」が一緒に入力されているケースがよくあります。例:〒123-4567 東京都江東区亀戸1-1-1これを 郵便番号と住所に分離 すると、データベース化や郵送ラベル作成が効率化されます。コード例S...
VBA

Excel VBA | 正規表現を使ってより精度高く住所を分割する応用例

住所を「都道府県」「市区町村」「番地以降」に分けるとき、単純な文字検索では限界があります。正規表現(RegExp) を使うと、より柔軟で精度の高い分割が可能です。コード例(住所を3分割)Sub SplitAddressWithRegex()...
VBA

Excel VBA | Cells を使った「住所を都道府県・市区町村・番地に3分割する」完全版の応用例

顧客リストやアンケートデータを整理するときに、住所を「都道府県」「市区町村」「番地以降」に分割すると、地域別集計や配送業務がとても効率化されます。ここでは VBA を使って A列の住所を自動的に3分割して B列〜D列に出力する例を紹介します...
VBA

Excel VBA | Cells を使った「住所から番地以降を抽出する」応用例

住所データを整理するときに「都道府県+市区町村」と「番地以降」を分けたい場面があります。例えば「東京都江東区亀戸1-1-1」から 「亀戸1-1-1」 を取り出すような処理です。コード例Sub ExtractStreetAddress() D...
VBA

Excel VBA | Cells を使った「住所から市区町村を抽出する」応用例

住所データから 市区町村だけを取り出す のは、地域別集計やマーケティング分析でよく使われます。Excel VBAでは、都道府県を除いた残りの部分から市区町村を抽出する方法が可能です。コード例Sub ExtractCityWardTown()...
VBA

Excel VBA | Cells を使った「住所から都道府県だけ抽出する」応用例

顧客リストやアンケートデータでは「住所」から 都道府県だけを取り出したい 場面がよくあります。Excel VBAで簡単に「住所の先頭に含まれる都道府県名」を抽出する方法を紹介します。コード例Sub ExtractPrefecture() D...
VBA

Excel VBA | Cells を使った住所クリーニング(全角→半角、不要なスペース削除)

住所データは「全角と半角が混じる」「スペースがバラバラ」などの問題がよくあります。これを Cells を使って一括整形すると、郵送や顧客管理がスムーズになります。コード例Sub CleanAddress() Dim i As Long, l...
VBA

Excel VBA | Cells を使った郵便番号クリーニング(ハイフン削除+7桁チェック)

日本の郵便番号は 7桁の数字 が基本です。入力データには 123-4567 や 123-4567 のようにハイフンや全角数字が混じることが多いので、ハイフン削除+桁数チェック を行うときれいに整えられます。コード例Sub CleanPost...
VBA

Excel VBA | Cells を使った電話番号クリーニング(ハイフン削除+桁数チェック)

実務でよくあるのが「電話番号の入力がバラバラ」問題です。例:03-1234-5678、090-1111-2222、08012345678 など。これを ハイフンを削除して桁数チェック すれば、データをきれいに整えられます。コード例Sub C...
VBA

Excel VBA | 実務で超使う VBA 自動化パターン

「実務で超使う VBA 自動化パターン」を整理してみます。現場でよく使われるのは 繰り返し作業の自動化・条件付き処理・複数シート/ブックの一括処理・配列で爆速処理 です。以下に代表的なパターンをまとめます。実務で超使う VBA 自動化パター...
VBA

Excel VBA | UnionやAreasでまとめた範囲をさらにクラス化して再利用する

ここまでの Union / Areas を使った離れたセル範囲処理 をさらにクラス化して、再利用可能な形にしてみましょう。これにより「複数の離れた範囲をまとめて処理する」ロジックを一箇所に集約でき、プロジェクト全体で使い回せます。クラスモジ...
VBA

Excel VBA | UnionやAreasを使って離れたセル範囲をまとめて処理する

「Union」や「Areas」を使うと、離れたセル範囲をまとめて一括処理できるので、実務で非常に便利です。ここでは VBA の具体例をいくつか紹介します。基本例:Unionで離れたセルをまとめて処理Sub Unionで離れたセルまとめ処理(...
VBA

Excel VBA | 条件に一致する離れたセルを自動検出して、高速で一括書き換え

これは セルごとにループするのではなく、配列に一括読み込み → 条件判定 → 一括書き戻し というパターンを使うと爆速になります。基本パターン(例:金額=0 のセルを「未入力」に書き換え)Sub 条件一致セル高速書換() Dim ws As...
スポンサーリンク