字符串相关

判断单元格是否包含特定字符串，以"P"为例。

if cells(1,1) Like "*P*" Then 
    cells(1,2) = "haha"

'返回的是"P"在cells(1,1)中第一次出现的位置
if InStr(cells(1,1),"P") = 0 Then
    cells(1,2) = "wawa"

行列相关

已经使用的行列数

ActiveSheet.UsedRange.Rows.Count
ActiveSheet.UsedRange.Columns.Count

row_num = Range("A65536").End(xlUp).Row