アスパLab

ExcelVBA（マクロ）で同じフォーマットのブックが複数ある。それぞれのブックには同じシート名のシートがあり、シートに配置された表を結合して、別のブックに出力する・・ということを少なからず求められることがあります。各シートの表を配列へ格納し、結合、出力シートに貼り付けみたいな動きをよくするため作りました。この関数は配列を結合して返します。

ExcelVBA（マクロ）による業務の自動化では、シートに入力されているデータを加工することが多いです。台帳や管理表に付属するマクロを考えるとき、ユーザーが行方向にデータを伸ばしていくことが想定されます。そんな時、何行目までデータが埋まっているか最終行を取得するため、セルのEndプロパティを使用して最終行を確認しましょうという記事が多いです。この関数は表に空白のレコードがある場合を想定してExcelの一番下の行からデータが入力されている行に向かってEndプロパティを実施した結果の行番号を返します。

この関数についてExcelVBA（マクロ）でフォルダを作成する場合、「MkDir」もしくは「FileSystemObject」を使用するのが一般的です。しかしすでに同名のフォルダ存在していたり、存在しない階層に新たなフォルダを作成しようとす...

ExcelVBA（マクロ）でシート名を変更することは簡単です。シートオブジェクトを作成し、Nameプロパティを書き換えます。しかし、手動で実施するシート名の変更と同じく、すでに存在しているシート名を指定するとVBAはエラーを吐きます。この関数は文字列をブック内で重複しないシート名へ変換します。

ExcelVBA（マクロ）でcsvデータの加工をしたいという需要は高いです。csvデータのを取り扱う際に注意したいことの一つが改行文字（改行コード）の取り扱いです。データの中に含まれる改行と1レコード（行）の終わりを表す改行はしっかり使い分ける必要があります。時にはセルに入力された改行コードを取り除いてからcsvデータに加工するという処理をすることもあるでしょう。この関数では、文字列に含まれる改行コードを取り除きます。

この関数についてExcelVBA（マクロ）でファイルやフォルダを扱う場合によく使用される「FileSystemObject」は参照設定をするか、CreateObjectを使用する必要があります。どちらも記憶を頼って記述するには「FileSy...

ExcelVBA（マクロ）でファイルやフォルダを扱う場合によく使用されるのは「FileSystemObject」は参照設定をするか、CreateObjectを使用する必要があります。どちらも記憶を頼って記述するには「FileSystemObject」の利用頻度も高いわけではなく、宣言の方法を毎度ネット検索に頼っている方は多いと思います。この関数は「FileSystemObject」の宣言ごと関数化しているため「FileSystemObject」の宣言や参照設定を意識することなくファイルの存在確認をすることができます。

ExcelVBA（マクロ）でフォルダやファイルの存在を確認するためには「Dir」という非常に便利な備え付けの関数があります。しかしこの関数を使用しないという人は多いです。前回の記事（指定のフォルダ内に存在するフォルダ名一覧をワイルドカードを指定して抽出する）でも解説したようにDir関数には落とし穴があるためです。このページで紹介する関数はDir関数を使用せずにフォルダ内にあるファイル名一覧を取得することができます。

ExcelVBA（マクロ）でフォルダやファイルの存在を確認するためには「Dir」という非常に便利な備え付けの関数があります。しかしこの関数には非常に重大な落とし穴があります。Dir関数はマクロの動作中にプロシージャが変わっても状態を保持し続けます。要は、呼び出し元でDir関数を使用した後、呼び出し先でもDir関数を使用すると呼び出し元のDir関数の状態を上書きしてしまいます。この特性を理解していればDir関数は非常に高速で強力な関数ですが、理解せずに使うと事故の元です。ここで紹介する関数はDir関数を使わずに、フォルダ内にあるフォルダの一覧を取得することができます。

ExcelVBA（マクロ）で業務を自動化するとき、マクロの実行結果でファイルを保存するということが少なからずあると思います。ファイルは命名規則を決めて整然と表示させたいところですが、ユーザーからの入力内容に応じてファイル名を設定する場合、注意が必要です。ExcelVBA（マクロ）では、ファイル名に使用できるか否かの判定をしないので、ユーザーが意図しない入力をした場合、実行時にエラーになります。この関数ではWindowsでファイル名に使用できない文字を半角→全角に変換して返します。