VBA range

range(“A1”)=100
range(“A1”).value=100
range(“A1:A10”)=100
range(“A1:A10”).value=100
range(“date”).value=100 选中单元格已经被命名为date了
range(“A1:A10,B3:C6,G6:I8”).SELECT 选中这三个区域
range(“A1:A10 B3:C6 G6:I8”).SELECT 选中这个三个区域的公共区域
range(“A1:A10",“B3:C6”," G6:I8”).SELECT 选中一个大矩形,就是这三个小矩形围成的最小矩形

active.cells(3,4)
active.cells(3,“D”)

range(“B3:C9”).cells(2,3) 这个意思是,range区域里面的第二行第三列

range(cell(1,1),cells(10,5)).select
range(“A1”,“E10”).select
range(range(“A1”),range(“E10”)).select
这仨个等价的、

active.cells.select 选中所有的表格
range(“A1”,“E10”).cells.select

activesheet.rows(“3:3”).select 选中第三行
activesheet.rows(“3:5”).select 选中三至五行
rows(“3:10”).rows(“1:1”).select 选中第三行到第十行区域中的第三行

引用列的方式与行的方式一致,就是把数子换成了字母

application.union(range(“A1:A10”),range(“E10”)).select
把这两块的range的内容都选中

range(“E10”).offset(2,3).value=500
offset 错位。2就是往下2个,3就是往右3个

range(“B2”).resize(5,4).select
就是以B2为开头,往下5行,往右4行(包括其本身)

range(“B2:E6”).resize(2,1).select
就是将这个B2:E6这个区域里面的东西,以B2为开头,进行相应的放缩就是等同于range(“B2:E6”).cells(1,1).resize(2,1).select

activesheet.usedrange.select
已经使用的单元格选择,不管中间是不是有空格
range(“B5”).currentregion.select
已经使用的单元格选择,以空格的地方设置为边界

range(“C5”).end(xlup).select
等同于ctrl+方向键上
range.(“A1561561”).end(xlup).offect(1,0).value=111
代表的意思就是一直往下写的意思

range(“B4:F10”).count 计数有多少个单元格
activesheet.usedrange.row.count
activesheet.usedrange.columns.count

selection.address 知道某个或者某些单元格的位置

range(“C5”).select = range(“C5”).activate

清除单元格所有的内容,各种格式,批注等都不要
range(“C5”).clear
清除单元格的批注 range(“C5”).clearcomments
清除单元格内同 range(“C5”).clearcontents
清除单元格格式 range(“C5”).clearformates

range(“A1”).select
selection.copy
range(“C1”).select
activesheet.paste
复制的全过程
但是可以一句话替代 range(“A1”).copy range(“C1”)
其实是省略了range(“A1”).copy destination:=range(“C1”)
不确定大小的时候,可以用
range(“A1”).currentregion.copy range(“C1”)

cut和copy可以互相替代的

发布了13 篇原创文章 · 获赞 0 · 访问量 108

猜你喜欢

转载自blog.csdn.net/qq_34873913/article/details/104812645
vba