Test Benford's Law

Sub RunByBenford()
'
' run the RN report by the specified sort keys
'
Dim oEZ As New cEZ
oEZ.AnalyzeBenford _
Infile:=BASEDIR & "clmdensp.srt", _
Report:=BASEDIR & "clmdensp.ben", _
SortKeys:="billprov + a", _
Column:="paidamt", _
BenType:="F1"

' macro to load a report file to a worksheet

LoadSheet _
ToSheet:="$Debug", _
Infile:=BASEDIR & "clmdensp.ben"

Set oEZ = Nothing
End Sub

Main Page

Complete Auditor resources
Links \| Privacy Policy \| FAQ \| Downloads \| Trademarks