ynkf.net
当前位置:首页 >> vBA清除单元格数据 >>

vBA清除单元格数据

Sheets(4).Range("D7:D11").ClearContents

区域有ClearContents方法可以清除内容,例如: Range("a1:b10").ClearContents

Public Sub 清除本工作表() Worksheets("sheet1").UsedRange.ClearContentsEnd SubPublic Sub 清除所有表() Dim WS As Worksheet For Each WS In Worksheets WS.UsedRange.ClearContents NextEnd Sub

区域.ClearContents 如:sheet1.range("A1:B1").ClearContents 类似的需求可以直接复制宏,再查看宏代码。 excel软件教程专题来自:系统圣地

最下面那行一定是总计吧? MyRow=Range("A65536").End(xlUp).Row -1 Sheet1.Range("B2:H" & MyRow).ClearContents

Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim I% For I = 2 To 490 If Cells(I, 1) = "" Then Cells(I, 2) = "" End If Next End Sub 或 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 And ...

软件版本:Office2007 方法如下: 1.下面单元格中存在填充底色、文字颜色、边框以及条件格式等等诸多格式: 2.Alt+F11,在当前工作表中输入代码如下: 3.F5执行代码,返回Excel,就看到所有格式都没有了:

ActiveSheet.Cells.Interior.Colorindex = 0

删除单元格内容:vba中输入:Range("A1").ClearContents,可清除单元格内容 删除单元格,下面的单元格向上:Range("A1").Delete Shift:=xlUp

Private Sub Worksheet_Activate() Columns("C:D").Select Selection.ClearContents Range("A1").Select End Sub 在EXCEL工作簿中的工作表名字处右击,然后查看代码,然后粘贴该代码,以上代码将执行:打开该工作表时自动清除C到D列的内容(单列...

网站首页 | 网站地图
All rights reserved Powered by www.ynkf.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com