How Do I Assign SQL Results to VBA Variables?

[deepgrewal22]

How do I query a table using SQL in a VBA module and return the result into a VBA variable?

Dim intCount as Integer
Dim strSQL as String

strSQL = "SELECT COUNT(*) FROM <table_name>;"
DoCmd.RunSQL (strSQL)

'How does intCount get set to the result of strSQL?

Deep Grewal
"Microsoft Works" - oxymoron

 

[dhookom]

Dim intCount As Integer
intCount = DCount("*","table_name")

Duane
Hook'D on Access
MS Access MVP

 

[acent]

I would take a look at a recordset.

Hope this helps.

"If it's stupid but works, it isn't stupid."
-Murphy's Military Laws

 

[deepgrewal22]

Thank you, Sir!

Deep Grewal
"Microsoft Works" - oxymoron