ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Application vs WorksheetFunction (https://www.excelbanter.com/excel-programming/443512-application-vs-worksheetfunction.html)

Ron Rosenfeld[_2_]

Application vs WorksheetFunction
 
I'm not sure where this should go so I've posted to both the formula
and vba groups, as well as the old programming group.

Chip Pearson has written that the only difference, when calling an
Excel worksheetfunction, between using the Application object vs the
WorksheetFunction is error handling.

However, the following gives different results, for what appears to be
the same function. (The result is the same if SheetCredit is declared
as Double).

=========================
Option Explicit
Sub foo()
Const CashIn As Currency = 53.4
Const CashDue As Currency = 54.175
Dim SheetCredit As Currency

SheetCredit = CashIn - CashDue

Debug.Print "SheetCredit not Rounded", , SheetCredit

Debug.Print "WorksheetFunction.RoundDown:", _
WorksheetFunction.RoundDown(SheetCredit, 2)

Debug.Print "Application.RoundDown:", , _
Application.RoundDown(SheetCredit, 2)

End Sub
===============================

Immediate Window:

SheetCredit not Rounded -0.775
WorksheetFunction.RoundDown: -0.77
Application.RoundDown: -0.78

-----------------------------------------------------------------

Ron Rosenfeld[_2_]

Application vs WorksheetFunction
 
On Sun, 15 Aug 2010 21:22:01 -0400, Ron Rosenfeld
wrote:

(The result is the same if SheetCredit is declared
as Double).


That should read that the result of either Application.rounddown or
Worksheetfunction.RoundDown is the same ... In other words, it works
as expected if SheetCredit is Double.


All times are GMT +1. The time now is 06:11 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com