Excel【VBA】

Sub test() Dim r As Range Dim str As String For Each r In Range("B2:B2000") str = r.Value r.Offset(0, 1).Value = GetData...

いろんなやり方があるみたいだが、大量データとなった場合は、Findメソッドを使うか Valiantの配列にセルの情報を格納（メモリに展開）するパターンが早いらしい。 以下の例は、仮にA〜N行に大量データ(20000行程度)があるシート1（J...

・ ・ ここのブログのWebスクレイピングのサンプルがマルチ処理の参考になったのでメモ サンプルコードはここのブログの文中にあるリンクからダウンロードした。 ソースを見ると、マルチ処理を実現する手法としては、 ポイント①Excel VBAか...

簡易的なアクセスログの元情報を取得するためのメモ。 ブログのサンプルコードやmsdn等を参考にさせていただいた。 Accessで、管理DBを作る必要があるのだが、アクセスログや変更ログをとる仕組みがまったく思いつかない（Accessをそもそ...

ユーザーフォームを利用した①ファイルを開いて、②指定したシートを自分自身にコピーさせる処理の自動化のサンプル ワークシートの指定を簡単化するため、リストボックスを利用している。 このサンプルコードを実行するには、ユーザーフォームにリストボッ...

「MakeErrorCodeList.zip」をダウンロードFormatMessage（エラーコードから内容を引くAPI）を利用して、エラーコード一覧を取得するマクロ。 サンプル結果として、自分のPC（Windows8　64bit）の結果も...

AccessからExcelワークシートをリンクテーブルとしてリンクさせる際のサンプル リンクテーブルを追加する リンクテーブルを削除する リンクテーブルのリンク先を変更する 上記３点に絞って実装。 Option Compare Databa...

MSDNや、Accessのヘルプを参考にトランザクション、エラー処理を実装したExcelとAccess2010との連携サンプル

「ExcelCorpus.zip」をダウンロードExcelファイルコーパス（Corpus：各Excelファイルを串刺し抽出して、その結果をリスト形式で表示させる）のサンプル。 まだアップデートするべきところは多いけど、ほぼ核となる部分はでき...

「RevisionCheck.zip」をダウンロードmsdnのサンプルを参考にした、指定ディレクトリ内Word文章毎の変更履歴一覧取得マクロ 他人の作ったWord文章のどこが変わったのか一括でチェックする時を考えて作成 ■ソース（事前に参照...