选择工作表A中如果AT列>0且BB列日期类型不等于今年的把AU、AV列清空
时间: 2024-02-27 08:55:44 浏览: 11
您好!根据您的问题,您需要使用Excel的VBA代码来实现所需的操作。您可以按照以下步骤进行操作:
1. 打开您需要操作的Excel文件,按下“Alt + F11”键,打开VBA编辑器;
2. 在VBA编辑器中,选择您需要操作的工作簿,右键单击,在弹出的菜单中选择“插入”->“模块”;
3. 在新建的模块中,输入以下代码:
```
Sub ClearColumns()
Dim lastRow As Long
Dim i As Long
lastRow = Worksheets("A").Cells(Rows.Count, "AT").End(xlUp).Row
For i = 2 To lastRow
If Worksheets("A").Cells(i, "AT").Value > 0 And Year(Worksheets("A").Cells(i, "BB").Value) <> Year(Date) Then
Worksheets("A").Cells(i, "AU").ClearContents
Worksheets("A").Cells(i, "AV").ClearContents
End If
Next i
End Sub
```
4. 修改代码中的“Worksheets("A")”为您需要操作的工作表的名称;
5. 执行代码,方法是在VBA编辑器中按下“F5”键,或者在Excel中按下“Alt + F8”键,选择“ClearColumns”并单击“运行”按钮。
注意事项:
1. 在执行代码前,请务必备份您的Excel文件;
2. 代码中的“AT”和“BB”列需要根据您的实际需求进行修改;
3. 如果您需要在其他条件下清空列,请修改代码中的if语句的条件部分。