我正在尝试编写一个宏,将一个选项卡导出到一个新文件,然后使用基于2个单元格值的自定义文件名和文件路径保存它。我在保存部分期间一直收到运行时错误。我试图在这里使用类似问题的答案,但作为我的菜鸟,似乎无法让他们为我的问题工作。我能得到的所有帮助真的很值得赞赏。
这是我到目前为止的代码:
Sub Export()
Sheets("Form").Select
Sheets("Form").Copy
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Dim fname As String
fname = Range("C1")
Dim fpath As String
fpath = Range ("G1")
ActiveWorkbook.SaveAs Filename:=fpath & fname & ".xls"
Windows("Form.xlsm").Activate
End Sub
答案 0 :(得分:1)
想通了。用户使用" \"在C1中输入值。它现在保存得很好。你给的是现在的工作。谢谢!