Delete Query From VBA

[jo15765]

My code does not throw an error, but it is not deleting the query either. What is the proper way to delete a query if it exists in VBA?

    Dim qdf As QueryDef
    Dim queryName As String
    
    queryName = "vbaExportQuery"


    For Each qdf In CurrentDb.QueryDefs
        If qdf.Name = "queryName" Then
            CurrentDb.QueryDefs.Delete queryName
        End If
    Next

[Bob Fitz]

Remove the quotes from

If qdf.Name = "queryName" Then

Use:
If qdf.Name = queryName Then

[ranman256]

Or
.delete qdf.name

[knarfreppep]

My code does not throw an error, but it is not deleting the query either. What is the proper way to delete a query if it exists in VBA?

    Dim qdf As QueryDef
    Dim queryName As String
    
    queryName = "vbaExportQuery"


    For Each qdf In CurrentDb.QueryDefs
        If qdf.Name = "queryName" Then
            CurrentDb.QueryDefs.Delete queryName
        End If
    Next

If you know the query exists, delete ALL this unnecessary code and use just CurrentDb.QueryDefs.Delete "vbaExportQuery" ... if you're not sure the query exists, use the same code but trap/ignore Error 3265.