VBA Subs and Functions with Arrays

Array bidirecional

more easy code and work for any number of rows you enter data..


Sub sumofnumbers()
Dim i As Integer
Dim counter As Integer
Dim sum As Integer
counter = Range("A1", Range("A1").End(xlDown)).Rows.Count

For i = 1 To counter

sum = Cells(i, 1).Value + sum

Next i

MsgBox "Sum of all numbers is" & " " & sum

End Sub

Poor method of explaining

Thank you so much！！！！

Why do "Option Base 1"? Why not leave it as default of 0?

Sir , I am learning VBA by myself , I just wanted do know how much VBA is used in current industry . Should I stick to leaning VBA or concentrate more on other programming languages . Which are the industries where VBA is maximum used ?