Excel 指定フォルダ内（サブフォルダ含む）のPDFファイル名を取得、シートAのセルA1から行方向に出力し、ファイル名順に並び替える
Sub prcOutputPDFNamesAndSort() ' 機能概要: 指定フォルダ内（サブフォルダ含む）のPDFファイル名を取得し、 ' シートAのセルA1から行方向に出力し、ファイル名順に並び替える ' 引数: なし ' 備考: ...
VBA侍-SAMURAI
Excel Excel ブック内の全シート差分検証
二つのワークブック内の全てのシートを比較し、異なるセルの値、数式、表示形式、フォントの属性、セル背景色、罫線の情報をイミディエイトウィンドウに出力Sub prcCompareAllSheetsWithFormat() ' 機能概要: 二つの...
Excel 定されたフォルダ内のPDFファイルの個数をカウントする（サブフォルダ含む）
' 機能概要: 指定されたフォルダ内のPDFファイルの個数をカウントする（サブフォルダ含む）' 引数: strFolderPath - フォルダのパス' 戻り値: PDFファイルの個数Function fncCountPDFs(strFol...
Excel 選択されたセル範囲内の全セルのインデントを解除する
Sub prcRemoveIndentFromSelection() ' 機能概要: 選択されたセル範囲内の全セルのインデントを解除する ' 引数: なし ' 備考: 選択された範囲内のセルにのみ適用 Dim rngCell As Rang...
Excel シートAから文字を読み取り、シートBに存在しない一意の文字リストを追加する
Sub prcAppendUniqueNames() ' 機能概要: シートAから文字を読み取り、シートBにまだ存在しない一意の文字を追記する Dim rngSource As Range Dim rngCell As Range Dim ...
Excel サブフォルダ内ファイルコピー
Sub prcPDFファイルをコピーする() ' 機能概要: フォルダAのサブフォルダ内のPDFをフォルダBにコピーする ' 留意点: サブフォルダのみ対象、フォルダA直下は対象外 ' 変数宣言 Dim fso As Object ' ファ...
Excel 入力されているRGB値でそのセルの背景色をセット
Sub prcSetCellBackgroundColor() ' 機能概要: セルに入力されているRGB値でそのセルの背景色をセットする ' 留意点: RGB値はカンマ区切りの文字列として入力されている必要がある Dim strCellA...
Excel RGB取得
' 標準モジュールに追加Declare PtrSafe Function GetCursorPos Lib "user32" (ByRef lpPoint As POINTAPI) As LongDeclare PtrSafe Functi...
Word WordVBA-各行の先頭にハイフン追加
Sub prc各行の先頭にハイフン追加() ' 機能概要: Wordの文章の各行の先頭に「-」を追記し、処理中の行番号をステータスバーに表示する ' 留意点: 文章が空の場合、追記は行われない Dim rngLine As Range ' ...
共通 フォルダ内のファイルと同じ名前のテキストファイルを別フォルダに作成
このVBAコードは、指定されたフォルダA内の全ファイル名を取得し、それと同名のテキストファイルを別のフォルダBに自動生成します。フォルダAとBは同一階層に配置する必要があります。コード内には、各変数と処理の詳細コメントも記載しています。