Quantcast
Channel: Active questions tagged excel - Stack Overflow
Viewing all articles
Browse latest Browse all 88854

Excel VBA Compile Error:Sub or Function not defined

$
0
0

this is my code and it keeps getting sub or function not defined error, im pretty sure its a simple fix but i just can't find the solution, big thanks to anyone who offers any help.                     

Sub RDB_Filter_Data()
Dim myFiles As Variant
Dim myCountOfFiles As Long

myCountOfFiles = Get_File_Names( _
                 MyPath:="C:\Users\Desktop\Tryout\", _
                 Subfolders:=True, _
                 ExtStr:="*.txt*", _
                 myReturnedFiles:=myFiles)


If myCountOfFiles = 0 Then
    MsgBox "No files that match the ExtStr in this folder"
    Exit Sub
End If

Get_Filter _
        FileNameInA:=False, _
        SourceShName:="", _
        SourceShIndex:=1, _
        FilterRng:="A1:D3500"& Rows.Count, _
        FilterField:=1, _
        FilterValue:="Ended", _
        myReturnedFiles:=myFiles

End Sub

Viewing all articles
Browse latest Browse all 88854


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>