Size of Files

[kamalmalek]

Dear Supporters,

i did small task in macro "not VBA" to create 10 excel files by name (1.xls 2.xls etc....)
now in VBA i treat those files (1.xls 2.xls etc....)
problem some files are duplicated in sizes
i need formula to do in VBA without open those files!
if same size of 1.xls or 2.xls or 3 .xls etc..... then msgbox "check extraction files"
else
call task()
end if

Thank you.

[werafa]

Hi your actual question is rather unclear, but some thoughts for you are:

what can you get out of

Set myObject = Application.FileDialog(msoFileDialogOpen)

?

I've used this to specify a file without opening it as per

    With myObject
        .Title = "Choose File"
        .InitialFileName = myPath & "\"
        .AllowMultiSelect = False
        If .Show <> -1 Then
            MsgBox ("No File Selected")
            Exit Sub
        End If
        fileSelected = .SelectedItems(1)
    End With