好莱坞喜剧大片:请问高手,有什么问题
来源:百度文库 编辑:高校问答 时间:2024/07/17 19:07:08
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
看上去没问题啊,你什么问题啊