Dim a As String
Dim b As String
Dim c As String
Dim d As String
Dim e As string
Dim f As string
a = "'" 'need to seperate the special characters and denote them as a string
b = "*"
c = """"
d = "a14_"
e = Mid(c, 1, 1) ' takes just "
f = a & b & e & d & b 'Puts them all together as 1 long string
'*"a14_*'
Like Mid(f, 2, 9) 'the mid(f,2,9) takes out the quotes that vb adds in to denote that its a string.
Im trying to query in Access VBA for a query that works in the grid as like *A14 , when i try to run this as part of the VB modules/VBA it errors . have tried to run the string entrys, but to no avail any ideas what im doing wrong?.
The goal is to auto query the data and auto amend after modify then export to text file for input into another Database.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.