Parametri Sub e Function con Elenco Opzioni

di il
9 risposte

Parametri Sub e Function con Elenco Opzioni

E' possibile inserire per i Parametri Optional di una Sub o Function con la scelta, per singolo parametro, dei valori previsti? 
(l'elenco dei possibili valori accettati per ogni parametro)
Per esempio come avviene in questi casi: Grazie

9 Risposte

  • Re: Parametri Sub e Function con Elenco Opzioni

    … https://www.spreadsheetsmadeeasy.com/vba-optional-arguments/

  • Re: Parametri Sub e Function con Elenco Opzioni

    Mi pare un Nick non sconosciuto… che di ci Franco, sbaglio…?

    Non ho capito se intendi valutare un Parametro con dei valori Opzionali predefiniti da te…?
    In quel caso devi generare una Pablic Enum ed associare il parametro a quella…

    Esempio:

    ' da mettere in un Modulo
    Public Enum eParam1
        valore1 = 0
        valore2 = 1
        valore3 = 2
    End Enum
    
    ' Questa può essere messa anche in una Form
    Private Function NomeFunction(mparam As eParam1) As Boolean
        Select Case mparam
            Case eParam1.valore1:    MsgBox "Valore=0 ---> " & mparam
            Case eParam1.valore2:    MsgBox "Valore=1 ---> " & mparam
            Case eParam1.valore3:    MsgBox "Valore=2 ---> " & mparam
        End Select
    End Function

    Attenzione che se la funzione è in una Maschera, l'ENUM deve essere dichiarata in un Modulo come Public affinchè funzioni l'intellisense.

    Se la metti nella Form, ancorchè dichiarata Public non si attiverà l'intellisense ma funziona ugualmente.

  • Re: Parametri Sub e Function con Elenco Opzioni

    Visto che  è il primo post qui, ben arrivato

  • Re: Parametri Sub e Function con Elenco Opzioni

    17/04/2023 - @Alex ha scritto:


    Mi pare un Nick non sconosciuto… che di ci Franco, sbaglio…?

    Non ho capito se intendi valutare un Parametro con dei valori Opzionali predefiniti da te…?
    In quel caso devi generare una Pablic Enum ed associare il parametro a quella…

    Esempio:

    ' da mettere in un Modulo
    Public Enum eParam1
        valore1 = 0
        valore2 = 1
        valore3 = 2
    End Enum
    
    ' Questa può essere messa anche in una Form
    Private Function NomeFunction(mparam As eParam1) As Boolean
        Select Case mparam
            Case eParam1.valore1:    MsgBox "Valore=0 ---> " & mparam
            Case eParam1.valore2:    MsgBox "Valore=1 ---> " & mparam
            Case eParam1.valore3:    MsgBox "Valore=2 ---> " & mparam
        End Select
    End Function

    Attenzione che se la funzione è in una Maschera, l'ENUM deve essere dichiarata in un Modulo come Public affinchè funzioni l'intellisense.

    Se la metti nella Form, ancorchè dichiarata Public non si attiverà l'intellisense ma funziona ugualmente.

    Ciaoooo carissimo e grandissimo Alex… come va ? 
    ne è passato di tempo, tanto tanto tanto tanto …. Sai, mi sono rimesso a programmare, però solo per diletto adesso,  e ieri mi son detto… perchè non rientrare in qualche Forum ? Allora ho ricercato su Google non tanto per trovare il miglior Forum, ma per trovare se gli @Alex, Willy55 etc… c'erano ancora e con la speranza ed il piacere di potervi ritrovare.  Quindi mi sono iscritto qui per merito vostro. ;)
    Veramente tanto felicissimo di averti ritrovato!!!

    Ma veniamo al quesito…. Enum… quello che ricercavo, perfetto…. grazie mille per lo spunto. So un po' arrugginito in merito, ma pian piano mi rimetto in forma, come si dice… è come andare in bicicletta, non si disimpara più  (basta pedalare)  ;))
    Grazie grazie ancora!!!!

  • Re: Parametri Sub e Function con Elenco Opzioni

    17/04/2023 - oregon ha scritto:


    Visto che  è il primo post qui, ben arrivato

    Grazieeeeeeee mille !!!!

  • Re: Parametri Sub e Function con Elenco Opzioni

    Benvenuto allora e ben risentito. 

  • Re: Parametri Sub e Function con Elenco Opzioni

    17/04/2023 - @Alex ha scritto:


    Benvenuto allora e ben risentito. 

    Grazieee Alex 

  • Re: Parametri Sub e Function con Elenco Opzioni

    Franco, mi fa piacere ritrovarti e sono contento che hai ripreso, dopo tanto tempo, anche solo per diletto, il computer che avevi appeso al chiodo.
    Ben arrivato in questo forum (ormai fra i pochi rimasti per gli informatici dei vecchi tempi).

  • Re: Parametri Sub e Function con Elenco Opzioni

    17/04/2023 - willy55 ha scritto:


    Franco, mi fa piacere ritrovarti e sono contento che hai ripreso, dopo tanto tempo, anche solo per diletto, il computer che avevi appeso al chiodo.
    Ben arrivato in questo forum (ormai fra i pochi rimasti per gli informatici dei vecchi tempi).

    Ciaoooo carissimo Willy, non sai quanto ti ho certato ;)) 
    ma non sono neanche riuscito a trovare le vecchie mail per contattarti
    Come stai ? è un vero piacere ritrovarti dopo tanto, e si… di tempo ne è passato e come dicevo ad @Alex, ho cercato voi, i vostri Nick, per entrare in un forum.
    Ci tenevo tantissimo rintracciarvi… ma nel vecchio luogo ?  ho cercato di entrare lì ma mi da pagina web non valida. Non esiste più?
    C'era Riccardo Riky e altri …. tutte persone formidabili, un bel gruppo affiatato e professionale di ottimo livello.

    Ho conservato tanti bei ricordi.
    Ti rinnovo un carissimo saluto, sentiamoci.
    Ciaoooooo

Devi accedere o registrarti per scrivere nel forum
9 risposte