共通

VBAであれば共通する項目。

共通

モジュールエクスポート

Sub ExportSheetNamesAndDefinedNames() Dim ws As Worksheet Dim nm As Name Dim FileNum As Integer Dim Sfx As String Dim FN...
共通

シートのタイトルが期待する値になっているか確認する関数

Function fncCheckSheetTitles(wst As Worksheet) As Boolean Dim expectedTitles As Variant Dim actualTitle As String Dim i ...
共通

フォルダを開く(Shell関数を使用)

Sub prcOpenFolderInExplorer() Dim strFolderPath As String ' フォルダパス strFolderPath = "C:\指定のパス" ' 開きたいフォルダのパスを指定 ' Shell関数...
共通

アルファベットをカナに変換

事前設定:Microsoft Scripting Runtimeへの参照設定 Function ConvertAlphabetToKatakana(str As String) As String Dim alphaToKana As Di...
共通

処理に要した所要時間を取得

Sub CalculateProcessTimeWithoutSeconds() Dim startTime As Double Dim endTime As Double Dim elapsedTime As Double Dim hou...
共通

コーディングルール

変数名はデータタイプを示す3文字の接頭辞とCamelCaseを使用(例: 'strExample')。 プロシージャ名には 'prc' の接頭辞、関数名には 'fnc' の接頭辞を使用。 処理の概要、引数、備考をプロシージャ名の上に記載(引...
共通

拡張子がついたファイル名から拡張子の部分を返す

' 機能概要: 拡張子がついたファイル名から拡張子の部分を返す ' 引数: ' strFileName - ファイル名(拡張子含む) ' 戻り値: ' String - ファイルの拡張子 Function GetFileExtension(...
共通

フォルダ内のファイルと同じ名前のテキストファイルを別フォルダに作成

このVBAコードは、指定されたフォルダA内の全ファイル名を取得し、それと同名のテキストファイルを別のフォルダBに自動生成します。フォルダAとBは同一階層に配置する必要があります。コード内には、各変数と処理の詳細コメントも記載しています。
共通

選択フォルダ内のファイル一覧をテーブルに格納

Sub prc選択フォルダ内のファイル一覧をテーブルに格納() Dim fdlg As FileDialog ' ファイルダイアログ Dim strFolderPath As String ' 選択されたフォルダのパス Dim objFSO...
共通

指定したフォルダ内の全ファイルを削除

Sub Prc指定フォルダ内の全ファイル削除() Dim strFolderPath As String ' 削除対象のフォルダパス Dim objFSO As FileSystemObject ' ファイルシステムオブジェクト Dim o...