Mega Code Archive

 

Categories / VisualBasic Script / Application

 

Calling the Report from VBA

Sub runReport()     Dim con As ADODB.Connection      Set con = New ADODB.Connection      con.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _        "Data Source=C:\mydb.mdb;"      DoCmd.OpenReport "rptCustomer", acViewPreview End Sub