反选EXCEL数据区域已选定的单元格

原创 2007年09月23日 13:57:00

Sub 反选()
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Dim raddress As String, taddress As String
raddress = Selection.Address
taddress = ActiveSheet.UsedRange.Address
With Sheets.Add
.Range(taddress) = 0
.Range(raddress) = "=0"
raddress = .Range(taddress).SpecialCells(xlCellTypeConstants, 1).Address
.Delete
End With
ActiveSheet.Range(raddress).Select
Application.ScreenUpdating = True
End Sub

 
版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

2、Power Query-动态汇总单元格区域数据

数据来源之单元格区域数据(动态汇总单元格区域数据) 这次主要讲解power query的基本操作界面。 任务:求出各个行业第一、二季度的总数据。 例子非常简单,聪明的朋友可能会认为用透视图更加简...

java将数据导出,带有合并单元格的excel--jxls技术

jxls技术可以生成各种样式的报表,非常好用,深深地喜欢上了这个。说起用这个还是比较有意思的,当时项目有个导出表格的功能,但是没能合并单元格,客户不是很满意,当时项目中大家都说弄不了,我想着自己网上查...

根据结果集的数据来动态的合并EXCEL单元格

将结果集中的数据按照大的分组后,将相同的值进行合并操作。
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)