Macro - Extract

Sub RunExtract()
'
' run an extract on a file using the following parameters
'
' Infile - name of the file to be checked
' Cond - the condition to be tested
' note that column names must be preceded with a $
' Extract - where the report is to be written
' Note that the sequence of parameters does not matter
'
Dim oEZ As New cEZ

oEZ.Extract _
Infile:=BASEDIR & "clmdensp.txt", _
Extract:=BASEDIR & "clmdensp.ext", _
Cond:="$paidamt < 100"

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

Set oEZ = Nothing

End Sub

Main Page

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