Tag: 存档

问：归档后如何清除单元格？

我已经把一个macros，使我可以将数据从一张表格存档到另一张，但是我有麻烦了之后清除信息。 第一列包含我不想清除的数字，现在只是清除B列中的数据。 如果有人可以看看这个，我会非常感激。 'Sub archive() Dim i, lastrow Dim mytext As String lastrow = Sheets("Rooms").Range("A" & Rows.Count).End(xlUp).Row For i = 1 To lastrow mytext = Sheets("Rooms").Cells(i, "F").Text If InStr(mytext, "yes") Then Sheets("Rooms").Cells(i, "A").EntireRow.Copy Destination:=Sheets("Archive").Range("A" & Rows.Count).End(xlUp).Offset(1) Sheets("Rooms").Cells(i, "B").Clear End If Next i End Sub'

如何在VBA代码中执行“另存为”，使用datestamp保存当前的Excel工作簿？

我有一个Excel工作簿，在窗体button单击我想保存工作簿的副本与文件名是当前date。 我继续尝试下面的ActiveWorkbook.SaveAs ("\\filePath\FormFlow To MSExcel\" & Left(Now(), 10))但接收Run-time error '1004': Method 'SaveAs' of object'_Workbook' failed. 任何人都可以帮助我吗？ 对于Excel开发，我还是很新的。