Recent content by inteliits

HI, this is my Code for Excel VBA. Private Sub CommandButton2_Click() Dim ac As Object Dim str As String Set ac = GetObject("", "Access.Application") ac.OpenCurrentDatabase "C:\Users\Janis\Desktop\db.accdb" ac.DoCmd.OpenForm "Pacienti" ac.UserControl = True Set ac = Nothing End Sub After...