コード Sub メールにファイルを一括添付する() Dim objOutlook As Object Dim objNamespace As Object Dim objFolder As Object Dim objMailItem As Object Dim objAttachment As Object Dim strFolderPath As String Dim strPDFPath As String Dim strFileN…

メールで同じ文章を氏名とか個別情報だけを変えて、それぞれのメールアドレスに送りたいときの操作方法 まず、送りたい文章のひな型をワードで作成する。 同時にエクセルでメールアドレスと氏名など、各自で変更したいことのリストを作成する。 今回は、部署…

フォルダ内のパスワード付きエクセルを パスワードリストに沿って解除するマクロ コード Sub 個別パスワード一括解除() Dim FolderPath As String Dim wb As Workbook Dim ws As Worksheet Dim lastrow As Long Dim i As Long Dim FilePath As String ' フォ…

マクロエクセルと同じフォルダにあるエクセルファイルに リストに沿ってそれぞれ個別のパスワードを付与するマクロ コード Sub 個別パスワード一括設定() Dim FolderPath As String Dim wb As Workbook Dim response As VbMsgBoxResult Dim ws As Worksheet …

同じフォルダの中にあるパスワードが同じエクセルのパスワードを インプットボックスに一回入力するだけで一括して解除するマクロ Sub パスワード一括解除() Dim FolderPath As String Dim Password As String Dim Filename As String Dim wb As Workbook ' …

フォルダ内にあるエクセル（拡張子がxlsxのもの）に インプットボックスで入力したパスワードを 一括で設定するマクロ コード Sub パスワード一括設定() Dim FolderPath As String Dim Password As String Dim Filename As String Dim wb As Workbook Dim re…

複数のワークシートがタブごとに分けられてるブックで それぞれのワークシートをコピーして分割して 新しいブックとして保存するマクロ コード Sub 各ワークシートをコピーして新しいブックに保存する() Dim SourceWorkbook As Workbook Dim SourceWorksheet…