VBA常用函数大全1

(2023-01-31 10:20:34)

标签：

分类： office技巧

NUMBERVALUE函数

TRIM函数用于去掉字符前后和字符之间的空格；当用于去掉字符前后空格时，只要是正常的空格，不管有多少个都能去掉，但用于去掉字符之间的空格时，会留下一个空格，不管字符是文本还是数字。

我们需要使用NUMBERVALUE函数实现将含空格的数值转换为纯数值格式。弥补TRIM函数的不足之处。

获取最后一行行号/列号

Range("C1000").End(xlUp).Row

Range("A1") = Range("A3").End(xlToRight).Column

Range("b1") = Range("M3").End(xlToLeft).Column

Range("c1") = Range("A3").End(xlDown).Row

取消筛选

If ActiveSheet.FilterMode = True Then

ActiveSheet.ShowAllData

End If

添加批注

Sub 宏添加批注()

For i = 2 To 12

Cells(i, 1).Select

Selection.ClearComments

Cells(i, 1).AddComment

Cells(i, 1).Comment.Visible = False

Cells(i, 1).Comment.Text Text:="USER:" & Chr(10) & Cells(i, 2).Value

Next i

End Sub

用数组批量将文本转数值

'最后50个文本转数值

dim aRow, arr()

Sheets("详单").Select

aRow = Range("B65536").End(xlUp).Row

arr = Range(Cells(aRow - 50, 1), Cells(aRow, 24)).Value

Range(Cells(aRow - 50, 3), Cells(aRow, 3)) = arr

公式换行

函数CHAR（10）可以返回换行符，不过要展示换行效果，还需要将单元格格式设置为自动换行。

举例说明：F1公式=D1&CHAR(10)&E1

阅读┊ 收藏 ┊ 喜欢 ▼ ┊打印┊举报/Report