VbA question ( function)

  • Thread starter rose_55
  • Start date
  • #1
1
0

Main Question or Discussion Point

help pleaase . here is the problem :If a number in a cell is 10, then the total should be 55 which is: 1+2+3+4+5+6+7+8+9+10 , how do i write a module-level( function) like that .this is what i have so far:
Public Function myfunction()
Dim sum As Double
Dim i As Integer
For i = 1 To 1000 Step 1
sum = sum + cells(i,1)....( THIS IS THE PART THAT I'M STUCK , I'M NOT GOOD AT MATH )
Next
myfunction= sum
End Function
 
Last edited:

Answers and Replies

  • #2
Integral
Staff Emeritus
Science Advisor
Gold Member
7,198
55
Your function sums up the contents of the first column for 1000 rows. You need the upper limit of your loop to be determined by the cell which contains 10.


For i = 1 to Cells( row, column of cell where 10 lives)

sum = sum+i

next i
 

Related Threads for: VbA question ( function)

  • Last Post
Replies
1
Views
11K
  • Last Post
Replies
3
Views
8K
Replies
2
Views
2K
  • Last Post
Replies
8
Views
7K
  • Last Post
Replies
18
Views
4K
  • Last Post
Replies
2
Views
7K
  • Last Post
Replies
2
Views
3K
  • Last Post
Replies
5
Views
3K
Top