Sub openLinkedBook() Dim wb As Workbook Dim targetPath As String '参照するブックのパスを設定 targetPath = "C:\Users\デスクトップ\売上確定情報.xlsx" 'リンクを更新せずにブックを開く '開こうとするブックに他のブックを参照する式があった場合のエ…

■以下のコードはファイルパスを取得するコード Set objDialog = Application.FileDialog(msoFileDialogFilePicker) を Set objDialog = Application.FileDialog(msoFileDialogFolderPicker) に変更すればフォルダパスが取得できる Sub getFilePath() Dim obj…

■ExcelのB列3行目以降に記載したフォルダ名で親フォルダ内にサブフォルダを一括作成①ExcelのB列３行目以降に作成したいサブフォルダのフォルダ名を入力しておく。 ②ファイルダイアログでサブフォルダを作成する親フォルダを指定 ③指定したフォルダ内にサブフ…