自动创建和命名文件夹的输入框

Question

我在创建自动创建指定文件夹的宏时遇到了问题。

我想用按钮创建一个excel文件。当你点击按钮时， 将出现一个弹出问题，并要求提供日期（＆＃34;输入日期＆＃34;）。

然后它将在单元格B11中的目录中创建一个文件夹。 该文件夹的名称是sale +（＆＃34;输入日期＆＃34;） 非常感谢您的帮助。谢谢你:)）

Answer 1

这只是一个样本：

Sub FolderMaker()
    Dim s As String
    s = Application.InputBox(Prompt:="Please enter date in format yyyymmdd", Type:=2)
    s = Range("B11") & s
    MsgBox s

    On Error Resume Next
        MkDir s
    On Error GoTo 0
End Sub

B11 喜欢：

要自定义您将使用s = Range("B11") & "sale" & s