Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Excel / New Users / January 2008

Tip: Looking for answers? Try searching our database.

Round Function for Entire Sheet

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
mstjohn - 16 Jan 2008 03:55 GMT
I have a sheet with approx 50 formulas that links to other workbooks and
worksheets. Does anyone know how to round the entire sheet without adding the
round function to every cell?
Gord Dibben - 16 Jan 2008 05:06 GMT
You could use this macro to add the ROUND function to formulas in place.

Sub RoundAdd()
Dim myStr As String
Dim cel As Range
   For Each cel In Selection
       If cel.HasFormula = True Then
           If Not cel.Formula Like "=ROUND(*" Then
               myStr = Right(cel.Formula, Len(cel.Formula) - 1)
               cel.Value = "=ROUND(" & myStr & ",2)"
           End If
       End If
   Next
End Sub

Gord Dibben  MS Excel MVP

>I have a sheet with approx 50 formulas that links to other workbooks and
>worksheets. Does anyone know how to round the entire sheet without adding the
>round function to every cell?
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.