VBA
エクセル VB に初挑戦、メソッド名とか変数名にやる気ゼロなのはご愛嬌。 Private Sub CommandButton1_Click() 'ディレクトリを指定する Dim openDir As String With Application.FileDialog(msoFileDialogFolderPicker) If .Show = False Then MsgBox "終了…
エクセル VB に初挑戦、メソッド名とか変数名にやる気ゼロなのはご愛嬌。 Private Sub CommandButton1_Click() 'ディレクトリを指定する Dim openDir As String With Application.FileDialog(msoFileDialogFolderPicker) If .Show = False Then MsgBox "終了…