Far comparire Campi in base a valore di casella combinata

di alessandro.vitale il
11 risposte
Buongiorno,
Ho una maschera che fa riferimento ad una tabella
Nella maschera c'è una casella combinata che prende i valori da un'altra tabella. I valori di questa casella combinata sono :
Business Plan Minor
Business Plan Extended
Bilanci Previsionali
MCC Compliant
MCC Finance
CRIAS
CRIAS MT
RESTO AL SUD
RESTO AL SUD (%)

Nella maschera vorrei che mi spuntasse un campo denominato "Commissione Credimpresa" SOLO se vengono scelti CRIAS - CRIAS MT E RESTO AL SUD (%)

AIUTATEMI PER PIACERE

11 Risposte

  • Vuoi dire che [Commissione Credimpresa] è Visibile=Falso per default. Se la casella combinata compila uno di quei 3 valori, vuoi che Visible diventa True. Giusto?

    In visualizzazione struttura maschera, alla tua casella combinata, devi sfruttare l'evento "Dopo aggiornamento" e impostare
    If Me!NomeCasellaCombinata = "Valore 1" Or "Valore 2" Or "Valore 3" Then Me![Commissione Credimpresa].Visible=True
  • Ma devo mettere il campo Comissioni Credimpresa nascosto? e poi farlo rendere visibile con il VBA da te suggerito?

    Ho provato a fare questo che ho appena scritto... ma nulla non mi compare alcun campo.
  • alessandro.vitale ha scritto:


    Ma devo mettere il campo [Commissione Credimpresa] nascosto?
    Esatto, con la proprietà Visibile: No.

    alessandro.vitale ha scritto:


    e poi farlo rendere visibile con il VBA da te suggerito?
    Esatto.
    Si dà il caso che, nella fretta di scegliere un valore dalla casella combinata, potresti accidentalmente scegliere "questo" o "quel" valore. Io ritoccherei il codice che ti ho proposto così:
    Private Sub NomeCasellaCombinata_AfterUpdate()
    If Me!NomeCasellaCombinata = "Valore 1" Or "Valore 2" Or "Valore 3" Then
    Me![Commissione Credimpresa].Visible=True
    Else
    Me![Commissione Credimpresa].Visible=False
    End Sub
  • NON va..
    il codice messo è questo
    
    Private Sub Consulenza_AfterUpdate()
    If Me!Consulenza = "CRIAS" Or "CRIAS MT" Or "RESTO AL SUD (%)" Then Me!CommissioniCredimpresa.Visible = True
    
    Else
    Me!CommissioniCredimpresa.Visible = False
    End Sub
    
    ho tolto le Parentesi Quadre in CommissioniCredimpresa perché il campo non ha spazi.
  • Il campo si chiama CommissioniCredimpresa (con la i) o CommissioneCredimpresa (con la e)?

    Le parentesi quadre solo "facoltative" se non ci sono spazi. "Obbligatorie" se ci sono spazi.
  • Vai in visualizzazione struttura maschera e controlla, al campo CommissioniCredimpresa la proprietà "Nome controllo": cosa c'è scritto?
  • Sia in Nome elemento che in Origine Controllo : CommissioniCredimpresa
  • alessandro.vitale ha scritto:


    Nella maschera vorrei che mi spuntasse un campo denominato "Commissione Credimpresa"
    Mio dubbio delle cento pistole. Quando dici "mi spuntasse" vuoi dire che vuoi VEDERE APPARIRE oppure devi METTERE LA SPUNTA?

    Io credo si tratti di VEDERE APPARIRE.
    Ho fatto vari test e quello che mi dà esito coerente sarebbe il seguente (avevo anche dimenticato End If prima)
    Private Sub Consulenza_AfterUpdate()
    If (Me!Consulenza = "CRIAS") Or (Me!Consulenza = "CRIAS MT") Or (Me!Consulenza = "RESTO AL SUD (%)") Then 
    Me!CommissioniCredimpresa.Visible = True
    Else
    Me!CommissioniCredimpresa.Visible = False
    End If
    End Sub
  • Risoltoooo
    Grazie Mille
  • Perché però non mi va a scrivere l'importo che inserisco nel campo nella tabella di riferimento in cui è inserito il campo stesso?
Devi accedere o registrarti per scrivere nel forum
11 risposte