Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x
?
Solved

Rounding in formula

Posted on 2014-03-05
9
Medium Priority
?
136 Views
Last Modified: 2014-03-06
I need to add rounding to the two columns below.  I tried to do it by adding another row, but got an #value error.

G and H

 Range("G" & srow).FormulaR1C1 = "=SUMIFS('Prior BDay'!C[-2],'Prior BDay'!C[-5],Summary!RC[-5],'Prior BDay'!C[-4],Summary!RC[-4])"
                    Range("G" & srow).FormulaR1C1 = "=ROUND(RC[-1],9)"


                    Range("H" & srow) = sp.ItemValue("M04")
                    Range("H" & srow).FormulaR1C1 = "=ROUND(RC[-1],9)"
0
Comment
Question by:leezac
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 3
  • 2
9 Comments
 
LVL 4

Expert Comment

by:aa-denver
ID: 39907208
Excel will automatically round the number displayed up if you change the number of decimal points displayed.   If that is not exactly what you need, then you can use the round function to specify exactly how much to round up, like to the nearest 5, 10, etc.

Here is a link that explains the all this in more detail:

http://office.microsoft.com/en-us/excel-help/round-a-number-HP003056144.aspx
0
 

Author Comment

by:leezac
ID: 39907383
I changed the rounding as you suggesed in the cell,  it shows 0.000000274 but when I click on it is shows 0.000000273985  

There is this formulat that looks at the cell and shows a valued based on the rounding.

  Range("J" & srow).FormulaR1C1 = "=IF(RC[-1]=0,0,IF(RC[-3]=0.000000274,""Check"",IF(RC[-2]>0.000000274,""Valid"",""Check"")))"

I believe because of the 0.000000273985 still being there that the formula for J shows incorrect.  It should say "Valid" but says "Check"
0
 

Author Comment

by:leezac
ID: 39907628
In reference to my last comment.  It may work.  Testing.
0
What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

 
LVL 4

Expert Comment

by:aa-denver
ID: 39907855
If you are printing the spreadsheet, the "display rounding" will be good enough.  If you are wanting to truncate the trailing digits, then you will need to use the round formula.

Removing trailing digits may be important to you.  One place this is commonly needed is in money calculations where the trailing digits can make a column total higher than if they are not there.  Your numbers don't appear to be related to financial totals, but whatever your application, it may not tolerate the trailing digits.

I don't understand your need for using a range.  You could just create a new column, create a formula for the first line and then copy it to all the other lines below.

Here is a simple example.  This example uses only 1 decimal place.  You would need to change the value to 9.   H1 = round(G1,9) instead of H1 = round(G1,1)


http://spreadsheets.about.com/od/excelfunctions/qt/070809_round.htm
0
 
LVL 31

Expert Comment

by:gowflow
ID: 39909682
I see this question still hanging. Did you get your solution ? If not, could you pls post the workbook that have the data together with this code so we can look it up closer ?
gowflow
0
 

Author Comment

by:leezac
ID: 39909965
No.  Is there vba code i can use to loop through Columns G and H to end of row and round to 9 digits ??
0
 

Author Comment

by:leezac
ID: 39909989
Sub test()
    Sheets("Sheet1").Range("G1:H").Select
    Selection.NumberFormat = "0.000000000"
  End Sub

Would something like this work - to just replace the values?
0
 
LVL 31

Expert Comment

by:gowflow
ID: 39910006
No not this way. Please post sample workbook with the data and I will do it for you. Don't give me bits of codes it is not this way.

gowflow
0
 
LVL 31

Accepted Solution

by:
gowflow earned 2000 total points
ID: 39910045
Not sure but is this what you want ??

Sub test()
    Sheets("Sheet1").Range(Range("G1"), Range("H" & Rows.Count).End(xlUp)).Select
    Selection.NumberFormat = "0.000000000"
End Sub

Open in new window


gowflow
0

Featured Post

Hire Technology Freelancers with Gigs

Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article will guide you to convert a grid from a picture into Excel format using Microsoft OneNote and no other 3rd party application.
When you see single cell contains number and text, and you have to get any date out of it seems like cracking our heads.
This Micro Tutorial demonstrate the bugs in Microsoft Excel for Mac with Pivot Charts.
This Micro Tutorial will demonstrate how to use longer labels with horizontal bar charts instead of the vertical column chart.

650 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question