Excel 指定されたフォルダ内のPDFファイルの個数をカウントする(サブフォルダ含む) Function CountPDFFiles(strFolderPath As String) As Long ' 機能概要: 指定されたフォルダ内のPDFファイルの個数をカウントする(サブフォルダ含む) ' 引数: strFolderPa... 2023.12.04 (月) 17:17 Excel
Excel オートフィルタを設定、特定キーワードで抽出 Sub prcFilterForContinuation() ' 機能概要: シートAのA列にオートフィルタを設定し、「●」という文字が含まれるセルを表示 ' 引数: なし ' 備考: フィルタの基準は「続」を含む Dim ws As Wo... 2023.12.04 (月) 10:46 Excel
Excel 指定フォルダ内(サブフォルダ含む)のPDFファイル名を取得、シートAのセルA1から行方向に出力し、ファイル名順に並び替える Sub prcOutputPDFNamesAndSort() ' 機能概要: 指定フォルダ内(サブフォルダ含む)のPDFファイル名を取得し、 ' シートAのセルA1から行方向に出力し、ファイル名順に並び替える ' 引数: なし ' 備考: ... 2023.11.30 (木) 17:37 Excel
Excel ブック内の全シート差分検証 二つのワークブック内の全てのシートを比較し、異なるセルの値、数式、表示形式、 フォントの属性、セル背景色、罫線の情報をイミディエイトウィンドウに出力 Sub prcCompareAllSheetsWithFormat() ' 機能概要: 二... 2023.11.30 (木) 16:25 Excel
Excel 定されたフォルダ内のPDFファイルの個数をカウントする(サブフォルダ含む) ' 機能概要: 指定されたフォルダ内のPDFファイルの個数をカウントする(サブフォルダ含む) ' 引数: strFolderPath - フォルダのパス ' 戻り値: PDFファイルの個数 Function fncCountPDFs(str... 2023.11.24 (金) 15:47 Excel
Excel 選択されたセル範囲内の全セルのインデントを解除する Sub prcRemoveIndentFromSelection() ' 機能概要: 選択されたセル範囲内の全セルのインデントを解除する ' 引数: なし ' 備考: 選択された範囲内のセルにのみ適用 Dim rngCell As Rang... 2023.11.17 (金) 14:01 Excel
Excel シートAから文字を読み取り、シートBに存在しない一意の文字リストを追加する Sub prcAppendUniqueNames() ' 機能概要: シートAから文字を読み取り、シートBにまだ存在しない一意の文字を追記する Dim rngSource As Range Dim rngCell As Range Dim ... 2023.11.16 (木) 10:22 Excel
Excel サブフォルダ内ファイルコピー Sub prcPDFファイルをコピーする() ' 機能概要: フォルダAのサブフォルダ内のPDFをフォルダBにコピーする ' 留意点: サブフォルダのみ対象、フォルダA直下は対象外 ' 変数宣言 Dim fso As Object ' ファ... 2023.11.10 (金) 17:02 Excel
Excel 入力されているRGB値でそのセルの背景色をセット Sub prcSetCellBackgroundColor() ' 機能概要: セルに入力されているRGB値でそのセルの背景色をセットする ' 留意点: RGB値はカンマ区切りの文字列として入力されている必要がある Dim strCellA... 2023.11.10 (金) 13:35 Excel
Excel RGB取得 ' 標準モジュールに追加 Declare PtrSafe Function GetCursorPos Lib "user32" (ByRef lpPoint As POINTAPI) As Long Declare PtrSafe Func... 2023.11.10 (金) 11:55 Excel