文章分类 - VBA
VBA
摘要:1 数组 1.1 静态数组 Sub static_arr() '静态数组 Dim a(10) As Integer ' Dim a(0 To 10) As Integer'与上一种定义方法相同 For i = 0 To 10 a(i) = i * 15 Next MsgBox a(3) End Su
阅读全文
摘要:方法一:使用WorkSheet对象的UsedRange属性直接获取: 最大行号 = ActiveSheet.UsedRange.Rows.Count 方法二:使用Range对象的End属性间接获取: 选择一个远离使用范围的单元格,如:Range("A10000"),按下“End+方向上”,选区就会自
阅读全文
摘要:1.VBA减少缩进量:shift+tab Sub Mycode() Dim i As Integer Dim isbool As Boolean Dim a As String For i = 2 To 10 a = Cells(i, 1).Value MsgBox a isbool = Cells
阅读全文

浙公网安备 33010602011771号