今天将继续给大家分享VBA中的一些常用语句,希望有学习VBA的朋友要仔细的理解掌握,对于自己的工作会帮助很大,这些语句是我从众多的VBA代码中筛选出来,最为一些特定的通用语句来讲解的,当然,以后还会陆续的给大家讲。
1 Range("A65536").End(xlUp).Row 单元格的选择
语句说明:返回A列最后一行(即记录的总条数)。
备注:等于A65535单元格向上,最后一个非空的单元格的行号。A65535单元格是03版本的EXCEL的最后一行单元格,从此单元格向上查找到非空的单元格,相当于:CTRL+向上的箭头。
2 ActiveCell.Row 行号的求出
语句说明:活动单元格所在的行号,ActiveCell.Column为活动单元格所在的列数,在写语句的时候经常会用到"活动""当前",如活动单元格,当前单元格,活动工作表,当前工作表等,其实基本是一个意思,就是当前进行操作的工作表和单元格,主要用到ACTIVE。
3 ActiveWindow.ScrollRow = 2 滚轮的应用
语句说明:将当前工作表窗口滚动到第2行
备注:ActiveWindow是指文档的活动窗口。 ScrollRow是指活动窗口滚动条滚动到的位置,row是指行,Column 是指列。
4 ActiveWindow.ScrollColumn = 5 滚轮的应用
语句说明:将当前工作表窗口滚动到第5列
备注:ActiveWindow是指文档的活动窗口。 ScrollRow是指活动窗口滚动条滚动到的位置,row是指行,Column 是指列。
5 ActiveSheet.Cells(1, 1).Font.Bold = TRUE 字体的设置
语句说明:Bold属性用于设置字体是否为加粗, Size属性设置字体大小, ColorIndex属性设置字体颜色(其值为颜色索引号), Italic属性设置字型是否为倾斜, Name属性设置字体名称
备注:单元格的属性有很多种,我们可以从代码窗口中获得,如下截图:
当我们录入RAGNE.后系统会自动的弹出属性窗口,再次录入"FO"后会弹出以FO为开头的属性。读者可以自己试试。
6 ActiveSheet.Cells(1, 1).Interior.ColorIndex = 3 颜色的设置
语句说明:将单元格的背景色设置为红色
备注:Interior.ColorIndex是单元格的颜色属性,这个值在我前面的文章中已经讲过了,这里不再多说。
7 IsEmpty (ActiveCell.Value) 单元格的判断
语句说明:判断活动单元格中是否有值
备注:Excel VBA中,IsEmpty函数是判断单元格是否为空的最好的方法,使用方法为IsEmpty(Cells(Row,Col)),当单元格为空时,返回True,否则返回Fal。需要注意的是IS函数在VBA中和EXCEL中是不同的。
8 ActiveCell.Value = UCa(ActiveCell.Value) 大小写的转换
语句说明:将当前单元格中的字符转换成大写
备注:Uca()是VB中的一个函数,函数作用是将一个字符串中的小写字母转化为大写字母,而不对其中的数字,大写字母进行处理,其中的字母U是英文单词Upperca(中文意思为大写字母)的第一个字母。
9 ActiveCell.Value = StrConv(ActiveCell.Value, vbLowerCa) 大小写的转换
语句说明:将活动单元格中的字符串转换成小写
备注:
StrConv 函数,返回一个variant 类型的值(字符串)转换为指定。
语法StrConv(字符串,转换,LCID )
StrConv函数语法具有下面这些命名参数:vbUpperCa 将字符串转换为大写字符; vbLowerCa 将字符串转换为小写字符;vbProperCa ;将字符串中每个词的第一个字母转换为大写; vbWide 将字符串中的窄(单字节)字符转换为宽(双字节)字符;vbNarrow 将字符串中的宽(双字节)字符转换为窄(单字节)字符。
10 Range("A1:D8").Copy Range("H1") 单元格的复制
语句说明:将指定单元格区域复制到从H1开始的区域中,用Cut方法可以实现剪切操作
备注:单元格的复制粘贴方法。
今日内容回向:
1 单元格的属性有哪些?
2 活动单元格的意义是什么?
3 用单元格的属性如何设置字体的颜色?
本文发布于:2023-02-28 20:12:00,感谢您对本站的认可!
本文链接:https://www.wtabcd.cn/zhishi/a/167766157881171.html
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,我们将在24小时内删除。
本文word下载地址:empty.doc
本文 PDF 下载地址:empty.pdf
留言与评论(共有 0 条评论) |