ACCESS VBA table name as imported text file

[mansied]

Hello, I have this code which imports a *.txt file into a table.how can I say change the table to the name of the text file not a fixed name?

Private Sub ImportData_Click()

ImportCompleted = Empty

Dim path As String
path = FilePathText.Value & ""
Dim tblName As String

tblName = "ZM"
If path = "" Then
MsgBox "You need to select a file to import!"
Else
Call Importing.import_ZM(path, tblName)
End If
ImportCompleted = "Import Completed!"

End Sub

 

[Gasman]

Parse the Path variable with MID() and RevInstr() and remove the extension and pass that to your function. ?
Of course, the table will need to exist.

 

[theDBguy]

Hi. @Gasman probably meant to say InStrRev()...

 

[Gasman]

Hi. @Gasman probably meant to say InStrRev()...

Well I did, but I searched here for that string first before posting to mkae sure, and it came up several times, so I accepted it.

 

[theDBguy]

Well I did, but I searched here for that string first before posting to mkae sure, and it came up several times, so I accepted it.

Interesting...

InStrRev function (Visual Basic for Applications)

Office VBA reference topic

docs.microsoft.com

 

[Gasman]

Interesting...

InStrRev function (Visual Basic for Applications)

Office VBA reference topic

docs.microsoft.com

I was not saying I was correct, just that I viewed the posts below and took that to be the correct syntax, which is now obviously incorrect.?

 

[theDBguy]

I was not saying I was correct, just that I viewed the posts below and took that to be the correct syntax, which is now obviously incorrect.?

View attachment 86596

Ah, okay. Thanks for the clarification.