[VBA] Access: openform con query

[dasvidania]

Ho un pulsante con questo codice molto elementare:

Private Sub Comando2_Click()

Dim stDocName As String
Dim prod As String
CodProd.SetFocus
prod = CodProd.Text
MsgBox "Valore stringa:" & CodProd.Text, vbInformation, Test

DoCmd.OpenForm "Cella", acNormal, "Archivio2", " Prodotto.[Codice Prodotto] = prod ", acFormEdit, acWindowNormal

End Sub

CodProd è 1 casella di testo dove ottengo il codice da ricercare.
Tramite il pulsante Comando2 voglio far aprire la form principale con un filtro, e cioè la query Archivio2 (è 1 select totale dell'archivio) con la condizione del prodotto. In esecuzione ottengo 2 messaggi di input dati: Prodotto.[Codice Prodotto] e prod. Qualcuno mi sa dire qual'è la giusta sintassi da usare?. Grazie 1000

[alka]

Le domande relative ai linguaggi Visual Basic, VB.NET, VBA (per Access, Excel, ...) e i linguaggi Microsoft per il .NET Framework vengono trattati nell'apposito forum: Visual Basic e .Net Framework.
In futuro, poni in quel forum le tue domande relative ai linguaggi citati.

Questa discussione la sposto io, dopo aver modificato il titolo opportunamente.

Ciao!

[LeleFT]

Private Sub Comando2_Click()

    Dim stDocName As String
    Dim prod As String
    CodProd.SetFocus
     prod = CodProd.Text
    MsgBox "Valore stringa:" & CodProd.Text, vbInformation, Test
   
    DoCmd.OpenForm "Cella", acNormal, "Archivio2", " Prodotto.[Codice Prodotto] = " &  prod , acFormEdit, acWindowNormal
    
End Sub

Ciao.