CASELLA COMBINATA E AGGIORNAMENTO DATA

di Anonimizzato20891 il
6 risposte
Buona sera ragazzi. Ho 4 Campi:
Decorrenza
Frazionamento (Casella Combinata) (Elenco valori : Annuale , semestrale)
Scadenza rata
Scadenza.

Quando inserisco su Decorrenza la data del 01/01/2017 e su Frazionamento seleziono il valore semestrale vorrei che su scadenza rata uscisse 01/07/2017 e su scadenza contratto 01/01/2018. Quale codice VBA devo inserire?

Grazie !!!

6 Risposte

  • Funzione dateadd ..... +6 mesi e +12 mesi
  • Si lo so ma la digitura esatta qual è?
  • Io ho inserito questo codice:

    Dim P_Scadenza As Date
    'P_Scadenza = Me.Scadenza
    Select Case Me.Frazionamento

    Case "Semestrale"
    Me.Scadenza = DateAdd("m", 6, Me.Decorrenza)

    Case "Annuale"
    Me.Scadenza = DateAdd("m", 12, Me.Decorrenza)

    End select

    Così mi aggiorna la scadenza quando clicco su semestrale o su annuale ESEMPIO: decorrenza 01/01/2017 se clicco su semestrale la scadenza viene 01/07/2017 e se clicco su annuale 01/01/2018. Ora vorrei avere quest altro risultato. Quando su decorrenza inserisco decorrenza 01/01/2017 frazionamento semestrale vorrei che la scadenza rata fosse 01/07/2017 e scadenza 01/01/2018. Che codice devo inserire?
    Grazie!
  • Scusa, ma non vedi che è la medesima logica che hai già applicato?
  • Si . Ho risolto. GraZie!
Devi accedere o registrarti per scrivere nel forum
6 risposte