Excel VBAで組んだ処理でエラーが発生した時、デバッグモードに移ってしまうとどのモジュールのどのプロシージャでエラーが発生したのかよくわからなくなることがあります。 そのような場合、エラー発生箇所と内容を出力する画面をポップアップさせるようにしておくとデバッグが楽です。 方法としては、エラー内容レポート用の標準モジュールを用意しておき、エラートラップから当該モジュールを呼ぶというきわめて原始的な方法です。 エラーレポート用モジュール Option Explicit Public Sub displayError( _ plErrNum As Long, _ psErrDesc As String, _ psErrApl As String, _ psErrModule As String, _ psErrProc As String, _ Optional pvErrNote As

Err.Raiseステートメント C++やJava言語のようにtry-catchによる例外処理が必須な言語と比べるとVBAにはそこまで厳密な例外処理はまず要求されることはありません。 その理由で一番大きいのは、VBAはC++やJavaのように「絶対に異常終了してはいけない」とか「24時間常時稼働」などのような厳しい条件を付きつけられることがないことが挙げられます。 ちなみに、例外処理とは、ある関数内でなんらかの実行時エラーが発生した場合に、関数の呼び元でエラーを補足してもらい異常終了しないようにするための処理を言います。 VBAではC++やJavaのような厳しい条件を要求されることはほとんどないと思いますが、それでもある程度の性能を要求されることはあるでしょう。 そのような場合に、On Error Goto で「エラー発生しました。はい、異常終了で終わります」とするのではなく、エラーを事前

VBAは「Try-Catch」ができない！？ 「！？」なんて言ってますが、もちろんできないです。（笑） ちなみに、VB.NETならできます。 ただ、Try-Catchがあろうなかろうが、正しくエラーハンドリングができるかどうかは別です。 大事なのは、モジュールを構造化したときに、 正しい経路で、エラーを伝播できるか だと思います。 ということで、VBAにおけるエラーハンドリングについて説明していきます。 何もしなかったらどうなる？ こんな処理を考えてみましょう。 ' こいつは上位 Sub Main() ErrorMethod MsgBox "完了しました。" End Sub ' こいつは下位 Sub ErrorMethod() Err.Raise 513, "なにか起きた" End Sub このとき、Mainが上位、ErrorMethodが下位になります。 下位モジュールでエラーが起きてま

結論から言うと、VBAにはTry-Catch-Finallyが存在しない。 そこでOn Errorステートメントとラベルを使う。 一番簡単な例外処理（エラーハンドリング）は以下のとおり。 Sub ErrHandlingTest() On Error GoTo ErrorHandler Dim value As Long value = 2 / 0 '-- ゼロ除算のためエラー発生 Exit Sub ErrorHandler: '-- 例外処理 MsgBox Err.Number & ":" & Err.Description, vbCritical & vbOKOnly, "エラー" End Sub このようにすると、エラーが発生した時点で「On Error GoTo ラベル名」に指定したラベル名（上記の例ではErrorHandler）に飛ぶ。 エラーごとにキャッチしたい ひとつの例外しか

エクセルで大量のデータを扱う場合、シートの読み込みや書き込みで処理が非常に遅くなる場合がある。1000個程度のデータで問題なく動いているのに実際に使う数十万個のデータだと処理時間が長すぎて実用できないこともある。ここでは処理速度と使いやすさを意識したVBAプログラムのテクニックを紹介したいと思う。 エクセルのマクロやVBAと言うともう十数年と使われている言語であるため、様々な参考書が出ていたり、ネットで紹介されていると思う。ただ、あまり速度まで気にしてサンプルプログラムが書かれていることはあまりない。プログラムの組み方に関してはプログラマの好みでいいと思うが、VBAに関しては組み方によって処理速度が大きく変わるので、作るのであればなるべく最速で動くようにしたい。（エクセルと連携したVBAが特殊ではあるが、仕事などではよく使われるだろう） 現在のパソコンであれば処理速度を意識しなくてもいいん

► 2023 (1) ► 3月 (1) ► 2022 (3) ► 4月 (2) ► 2月 (1) ► 2021 (3) ► 7月 (2) ► 6月 (1) ► 2020 (1) ► 5月 (1) ► 2019 (1) ► 9月 (1) ► 2018 (2) ► 6月 (1) ► 3月 (1) ► 2017 (15) ► 7月 (1) ► 6月 (3) ► 5月 (2) ► 4月 (3) ► 3月 (1) ► 2月 (3) ► 1月 (2) ► 2016 (26) ► 12月 (5) ► 11月 (3) ► 10月 (3) ► 9月 (1) ► 8月 (3) ► 7月 (2) ► 6月 (1) ► 5月 (2) ► 4月 (4) ► 2月 (1) ► 1月 (1) ▼ 2015 (18) ► 12月 (1) ▼ 11月 (2) Excel でゼロ パディングしたい – 0で埋める Excel

Microsoft Query を使用して、外部ソースからデータを取得できます。 Microsoft Query を使用して会社のデータベースやファイルからデータを取得することで、Excel で分析するデータを再入力する必要はありません。 また、新しい情報でデータベースが更新されるたびに、元のソース データベースから Excel のレポートと概要を自動的に更新することもできます。 Microsoft Query を使用すると、外部データ ソースに接続し、それらの外部ソースからデータを選択し、そのデータをワークシートにインポートし、必要に応じてデータを更新して、ワークシートのデータを外部ソースのデータと同期させることができます。 アクセスできるデータベースの種類     Microsoft Office Access、Microsoft SQL Server、Microsoft SQL Se

UTF-8でCSVを書き出すプログラム ADODB.Streamオブジェクトを使ってUTF-8でCSVを書き出すプログラムはこちらになります。 Sub writeCSV_utf8() Dim ws As Worksheet Set ws = ThisWorkbook.Worksheets(1) Dim csvFile As String csvFile = ActiveWorkbook.Path & "\data_utf8.csv" 'ADODB.Streamオブジェクトを生成 Dim adoSt As Object Set adoSt = CreateObject("ADODB.Stream") Dim strLine As String Dim i As Long, j As Long i = 1 With adoSt .Charset = "UTF-8" .LineSeparator

パワーテクニックシリーズ［逆引き］Excel VBA パワーテクニック 525 ［2016/2013/2010/2007 対応］ 2016年5月28日紙版発売 2016年5月28日電子版発売 大村あつし，古川順平　著 四六判／672ページ 定価2,816円（本体2,560円＋税10%） ISBN 978-4-7741-8177-6 ただいま弊社在庫はございません。 Amazon 楽天ブックス ヨドバシ.com 電子版 Gihyo Digital Publishing Amazon Kindle ブックライブ 楽天kobo honto 本書のサポートページサンプルファイルのダウンロードや正誤表など この本の概要 Excelパワーユーザー向けの，すぐに使えるVBAサンプル集です。定番のテクニックから，目からウロコの達人ワザまで，目的別に参照しやすいよう体系的に整理しました。Excelの基本にな

Googleスプレッドシートは複数のメンバーによるデータ共有ができ、それをお互いに編集できるなどの利便性があることから、業務で使うケースが増えてきました。しかし、どのように使いこなせばいいのかわからない……と手を焼いている方も多いのではないでしょうか？安心してください！Googleスプレッドシートに隠された機能を活用すると、Excelを超えるような生産性を発揮できるのです。 そこで、真の力を解放するスゴ技を20個ご紹介します。ぜひ使いこなして、仕事の効率化を目指してください！ Excelとどう違う？スプレッドシートの基礎知識 GoogleスプレッドシートはGoogleが提供している無料のWebアプリの一つです。 Excelと同じような表計算を行ったり、リストを作成したりといったことが可能で、主な関数はExcelと同じものが使えます。作成したデータはすべてクラウド上のGoogleドライブに保

我が家のパソコンのメンテナンス記録の備忘録, macOSやWindowsを使っていて気づいた事なんかを書いています。 MacBook ProにはXubuntuも入れてます。 日頃仕事でExcel 2003のVBAのマクロを沢山作って使っているのだけど、どうにも不安定なマクロがいくつかある。そのマクロがあるファイルを開くと頻繁にExcelが落ちるのだけど、どうもオブジェクト型変数を使っているものが怪しい感じ。 今まではオブジェクト型変数を関数内で宣言して使ったあとはそのまま放置して関数を抜けていたのだけど、関数から抜ける時にその変数にNothingを代入するようにしてみたら安定して動作するようになった。 よく考えてみると、たぶんこういう事ではないかと。 Dim xx As Object として宣言したオブジェクト型変数は、使用時に Set xx = Workbook.Add などのようにSe

この記事は自分のための備忘録だが、他の人の役に立つ可能性もあると思って書いている。 先日、私の同僚で、「Excelマクロを書いたけれど処理が重くて困っているんだ」という人がいた。私の会社はIT企業なので、システムの導入支援サービスなども請け負っている。例えば、お客様が大量のデータをExcelで持っていたりした場合には、そのデータをシステムに登録する作業を代行したり、場合によってはツールを作成してそれをお客様に引き渡すこともある。その場合によく使用するのがExcelマクロである。 私は、Excelマクロだけは業務で使用できるレベルのスキルを持っている。なぜならExcelマクロは簡単だからである。最近は本格的な開発には携わっていないので、他のプログラミング言語のスキルは落ちる一方なのだが、とにかくExcelマクロだけはできる。（技術面に興味があるだけにもったいないことだと思う。） で、Exce