1、颜色
excel的颜色可以使用三种方式获取,1:excel内置颜色;2:利用QBColor方法;3:使用RGB方法
内置颜色
excel共有56中内置颜色,可用过ColorIndex属性设置,如expression.ColorIndex = 1
QBColor 方法
一共有15中颜色,可通过Color属性设置,如expression.Color = QBColor(1)
RGB 方法
excel实际并不能全部支持RGB的所有颜色,只能支持其中一部分,RGB的设置也是于Color属性一起,如expression.Color = RGB(255,0,0)
2、单元格判断
2.1、判断是否空单元格
if Range("a1") = "" Then
if Len([a1]) = 0 Then
if VBA.IsEmpty([a1]) Then
2.2、判断是否为数字
if VBA.IsNumeric([a2]) And [a2] <> "" then # IsNumberic方法将空单元格也判断为数字
if Application.IsNumber([a2]) then # 使用工作表的IsNumber函数判断
2.3、判断是否为文本
If Application.IsText([a3]) Then
If VBA.TypeName([a3].Value) = "String" Then
2.4、判断是否为汉字
利用ASCII来判断
if [a4] > "z" Then
2.5、判断错误值
IsError(range对象)
3、设置单元格自定义格式
NumberFormatLoccal 属性
以用户语言字符串返回或设置对象的格式代码。Variant 类型,可读写。
语法
expression.NumberFormatLocal
参数
expression 必需。该表达式返回上面的对象之一。
示例
[a1].NumberFormatLocal = "0.00"
4、单元格合并
Merge 方法
通过指定 Range 对象创建合并单元格。
语法
expression.Merge(Across)
参数
expression 必需。该表达式返回一个 Range 对象。
Across Variant 类型,可选。如果该值为 True,则将指定区域内的每一行合并为一个合并单元格。默认值为 False,合并指定区域。
说明
1、合并区域的值在该区域左上角的单元格中指定。
MergeAree 属性
返回一个 Range 对象,该对象代表包含指定单元格的合并区域。如果指定的单元格不在合并区域内,则该属性返回指定的单元格。只读。Variant 类型。
语法
expression.MergeArea
参数
expression 必需。该表达式返回“应用于”列表中的对象之一。
说明
MergeArea 属性只应用于单个单元格区域。
MergeCells 属性
如果区域或样式包含合并单元格,则该值为 True。Variant 类型,可读写。
说明
1、选定包含合并单元格的区域时,所选定的区域可能与所期望选定的区域不同。可用 Address 属性检验选定区域的地址。
2、如果指定区域不包含合并单元格,返回Null
网友评论