Comando OpenForm, filtro e stampa

Question

Ciao a tutti Vi chiedo un aiuto Ciao a tutti vi chiedo un'aiuto

Ho due maschere una denominata CSDG e l'altra ORARIOSETTIMANALE (quest'ultima sottomaschera di CSGD con i campi CorsoAppartenenza e CorsoDanza collegati. Il primo master e il secondo secondario) 

Su un pulsante ho inserito la funzione di sotto ma quando l'avvio esce il seguente avviso: "Immettere valore parametro"

CorsoAvanzato

Ok     Annulla

Se inserisco il valore parametro suggerito (CorsoAvanzato) avviene il filtro e stampa correttamente.

Quando cambio record (che ha nel campo CorsoAppartenenza un valore diverso) e rieseguo la funzione esce un errore visual basic: Errore di sintassi (operatore mancante) nell'espressione della query '[CorsoDanza]=II°Corso'

Questa e la funzione

Private Sub StampaOrario_Click()

    Dim stDocName As String

    Dim stLinkCriteria As String

    stDocName = "OrarioSettimanale"

    stLinkCriteria = "[CorsoDanza]=" & Me![CorsoAppartenenza]

    DoCmd.OpenForm stDocName, , , stLinkCriteria

    DoCmd.PrintOut

    DoCmd.Close

End Sub

Answer 1

Ciao Andrea,

da quel che scrivi si direbbe che [CorsoDanza] sia un campo testuale, comncia col mettere a posto il criterio delimitando il valore testuale tra ""

---

stLinkCriteria = "[CorsoDanza]=""" & Me![CorsoAppartenenza] & """"

---

poi controlla nella query o tra i campi della maschera il campo CorsoAvanzato che probabilmente non esiste o è scritto in modo errato.

Ciao

Giorgio Rancati

Answer 2

Ciao Giorgio,

Infatti funziona,

come sempre il tuo aiuto è stato indispensabile.

ciao

Andrea Villano

Answer 3

Ciao Andrea,

ok, allora si spiega tutto, delimita il campo testuale e funzionerà.

Ciao

Giorgio Rancati

Answer 4

Ciao Giorgio,

Il campo CorsoDanza è un campo testuale come tu sostieni; riguardo a CorsoAvanzato non è un campo ma è un testo contenuto in CorsoAppartenenza (questo campo è una casella combinata). Domani mattina provo a mettere le "" a CorsoDanza e vedo come va.

Ciao e notte a tutti

Answer 5

"Immettere valore parametro"

CorsoAvanzato

Ok     Annulla

Quel messaggio significa che c'è da qualche parte una query  "zoppa"

( di cui non ci hai detto nulla )

_______________________________________________________________________

Poi hai anche un 2° problema con VBA e l'operatore mancante.

________________________________________________________________________

Ma non è escluso che anche il 2° problema dipenda dalla query "zoppa"

________________________________________________________________________

Postaci la query che cerchiamo di capire meglio.

.