Use Temporary tables for quick analysis

PHOTO

Wed Nov 16 2022 09:06:10 GMT+0000 (UTC)

Saved by @paulbarry

Private Sub TestTemp()
On Error GoTo ErrorHandler
Dim strSQL as String
Dim strTable as String
strTable = "tblTempTest"
'Delete the table if it exists
DoCmd.DeleteObject  acTable, strTable
strSQL = "Select * INTO " & strTable & " FROM tblCustomers " & _
"Where CustomerState = 'ILL'"
Currentdb.Execute strSQL
'Insert more code here to do something with temp table
Exit Sub
ErrorHandler:
IF Err.Number = 7874 Then
Resume Next 'Tried to delete a non-existing table, resume
End If
End Sub

https://accessexperts.com/blog/2011/07/20/use-temp-tables-in-your-code-for-quick-and-easy-analysis/

Save snippets that work from anywhere online with our extensions

Available in the Chrome Web Store

Get Firefox Add-on

Get VS Code extension

Comments

More like this

VBA

@paulbarry

Regex for Access Build Pass through query using Regex to replace Form fields in query VBA to auto Refresh Linked Table Manager or linked tables - Microsoft Access / VBA QUESTION: Get All Procedure Names from Modules | Access World Forums MS Access DLookup Example MS Access Logging Split String or Text Run Update or Delete in MS Access SQL Access VBA custom Function to count substring in string Code to loop through all records in MS Access how-to-filter-an-existing-recordset check-if-textbox-is-empty http://azlihassan.com/apps/articles/visual-basic-for-applications-vba/vba-check-valid-email Email verification Use Temporary tables for quick analysis https://www.access-programmers.co.uk/forums/threads/setting-a-group-of-controls-visible-hidden-or-enabled-disabled.293412/ Templete For Notes Field - Hide on empty and display only when there is text. Filename with spaces running WScript.Shell how-pass-variable-one-form-another-form

Browse more snippets >>