Dismiss Notice
Join Physics Forums Today!
The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

VBA not calculating how I want it to

  1. Aug 6, 2010 #1
    I've just been messing around on VBA and am trying to write a summation that estimates pi. It doesn't add anything to the sum within the do while. I tried a for loop also, but it just takes whatever i initialize sum to and multiplies it by 4 and adds one. I just want it to add continually to sum the new values of n given j. Need help it seems like such a simple problem...


    Sub pi()
    Dim j As Integer
    Dim sum As Integer
    Dim n As Integer

    sum = 0
    j = 2

    Do While j <= 100
    n = (1 / (2 * j - 1)) * ((-1) ^ (2 * j - 1))
    sum = sum + n
    j = j + 1
    Loop
    sum = 4 * sum + 1
    Range("E2:E100").Cells(2).Value = sum

    End Sub
     
    Last edited: Aug 6, 2010
  2. jcsd
  3. Aug 6, 2010 #2

    Mark44

    Staff: Mentor

    Your variables sum and n should not be declared as integer. There might be other problems in your code, but this jumped out at me right away.
     
Know someone interested in this topic? Share this thread via Reddit, Google+, Twitter, or Facebook




Similar Discussions: VBA not calculating how I want it to
  1. VBA help (Replies: 2)

Loading...