Newsgroup: it.comp.appl.access
Titolo: Con casella combinata si può fare?

Ho una maschera fatture con una casella combinata che mi apre un report
(dopo aggiornamento) attraverso una macro, nella macro che apre questo
report vorrei inserire una condizione, che mi controlla uno dei campi della
casella combinata, esempio
1 campo NomeCliente
2 campo IDcliente (casella associata)
3 campo si/no Nota di accredito
se nel campo 3 il valore è no mi dovrebbe aprire il report Fattura, mentre
se nel campo 3 il valore è Si mi dovrebbe aprire il report NotaDiAccredito.
Per quanto riguarda la Macro non ho nessun problema la difficoltà è nel
sapere se potrò mai far si che con questa condizione si potrà far
riferimento ad un campo della casella combinata che non è la casella
associata, in quanto già usata per selezionare la fattura.
Io sono un novellino del NG e non so se si possono inserire link vari, ma
questo lavoro di qui chiedo aiuto l'ho inserito in internet come gestionale
gratuito e potrei quindi fornire a chiunque l'indirizzo esatto.
Grazie anticipatamente a tutti. e buon fine anno.

 ha scritto nel messaggio
news:RwjQ9.67296$Ou4.2...@twister2.libero.it...

Non sò se è fattibile con le Macro, e sinceramente ammetto di non essere
esperto nel loro utilizzo.
Io lo risolverei via codice:
Su evento After_Update della Casella Combinata inserisci:
Dim str as string
If me.NometuaCombo.Column(2) then 'Column 2 perchè anche se è la 3° parte da
0
    str="Fattura"
Else
    str="NotaDiAccredito"
end if
Docmd.Openreport str
Ciao.
@Alex.

 ha scritto nel messaggio
news:U0lQ9.67541$TC5.2...@twister1.libero.it...

Prima di tutto grazie per il codice, ma, mi ero dimenticato di dirti che non
so usare il vb, nonostante ciò sono ugualmente riuscito a mettere assieme
alcune righe, convertendo le macro in vb.
L'esempio che ti avevo sottoposto in realtà non è proprio cosi, l'ho scelto
per semplificarmi la spiegazione.
Per quanto riguarda la prima parte quella relativa alla condizione del campo
2 si/no, sono riuscito a farla funzionare, ma non riesco a farla funzionare
quando il campo 2 è No.
In pratica io vorrei che quando il campo 2 è no, si debba aprire una
maschera Aggiungi_DDT con lo stesso id fattura del campo 3 .
Ti allego il codice che ho fatto, il quale funziona quasi completamente ma
non nella parte dove dovrebbe aprire la maschera Aggiungi_DDT, filtrando
l'Id fattura relativo al campo 3 della combobox.
Private Sub cliente_AfterUpdate()
Dim str As String
If Me.cliente.Column(2) Then 'Column 2
    With CodeContextObject
        .[ID cliente] = .cliente
        .fineFattura = False
        .pagamento = .[MOD DI PAGAMENTO]
        .TipoEsente = .TipoEsenteC
        If (Forms!nuovo_DDT!EsenteSpese = 0) Then
            .SpeseRB = .speseriba
        End If
        If (Forms!nuovo_DDT!EsenteSpese = -1) Then
            .SpeseRB = 0
        End If
        .ScontoF = .ScontC
        Forms!nuovo_DDT!Intest_DDT_Nuovo.Form!data = Date
        .giorniInAggiuntaFatt = .giorniInAggiunta
        DoCmd.RunCommand acCmdRefresh
        DoCmd.GoToControl "[Intest_DDT_Nuovo]"
    End With
                    Fino a questo punto Tutto OK
Else
Dove devo inserire il  Column(3) ???
    DoCmd.OpenForm "Aggiungi_DDT", acNormal, "", "[id
fattura]=[Forms]![nuovo_DDT]!cliente", , acNormal
    DoCmd.GoToRecord , "", acNewRec
    DoCmd.Close acForm, "NUOVO_DDT"
     End If
End Sub
I campi della casella combinata, sono i seguenti
Campo 0 =Nome_societa
Campo 1 =IdCliente (casella associata)
Campo 2 =Si\No Bolle
Campo 3 =Id Fattura
Sperando di essere stato sufficentemente chiaro ti ringrazio e saluto BEPPE