Tag: 文件名文件

在vba中设置FilePath和FileName

好吧，我想我已经弄糊涂了，怎么做，也许我做了一些明显的错误？ 这是我的代码： Private Sub CommandButton1_Click() Dim wbI As Workbook, wbO As Workbook, wb1 As Workbook Dim wsI As Worksheet, wsO As Worksheet, ws1 As Worksheet filelocation1 = "C:\Users\Public\Desktop_" & Format(Date, "ddmmyyyy") & "Production.xls" Set wbI = ThisWorkbook Set wsI = wbI.Sheets("Production") Set wbO = Workbooks.Add With wbO Set wsO = wbO.Sheets("Sheet1") *****ActiveWorkbook.SaveAs Filename:=filelocation1 wsI.Range("A1:C100").Copy wsO.Range("A1").PasteSpecial […]