she stoops to conquer:请问高手,有什么问题
来源:百度文库 编辑:查人人中国名人网 时间:2024/05/10 09:18:05
Sub 清除文件()
Dim c As Integer '定义c为整型变量
For c = 1 To 6
Sheets("文件提交以及查询").Cells(7, c).Value = ""
Next c '依次清除商品入库资料输入与查询区
End Sub
Dim c As Integer '定义c为整型变量
For c = 1 To 6
Sheets("文件提交以及查询").Cells(7, c).Value = ""
Next c '依次清除商品入库资料输入与查询区
End Sub
看上去没问题啊,你什么问题啊