Risultati da 1 a 9 di 9

Discussione: Media Voti omettendo lo zero



  1. #1
    L'avatar di Kinoppi90
    Clicca e Apri
    Data Registrazione
    Sep 2016
    Località
    firenze
    Messaggi
    35
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    3

    Media Voti omettendo lo zero

    Eccomi qui di nuovo a disturbarvi.
    Piano piano sto imparucchiando un pò di VBA ma ancora ho qualche difficoltà e visto che riuscite sempre a risolvere i miei dubbi e problemi...
    Grazie a Cromagno che mi ha dato una grossissima mano sto procedendo nel mio piccolo progettino ma mi sono arenato su una media Voto quando creando una macro trovo un valore a zero.
    Vi allego il file con la macro attaccata al pulsante.
    Coemsi vede nel foglio Media Voti ho la media dei voti presenti nei fogli G1 e G2 ad esempio di Florenzi dove volutamente nel foglio G1 ho messo un bello 0 (Zero) ora schiacciando la macro giustamente mi fa la media tra il 6.8 di G2 e lo 0 di G1.
    Io invece vorrei che omettesse lo 0 e che mi desse come risultato il 6.8
    Per spiegarmi meglio vorrei che la macro quando incontra un valore pari a zero oppure un campo vuoto non lo prendesse
    in considerazione ma mi facesse la media solo con i valori diversi da nulla e da 0.
    Come sempre vi ringrazio in anticipo e buona giornata a tutti
    File Allegati File Allegati
    Ultima modifica fatta da:alfrimpa; 14/10/16 alle 13:27

  2. #2
    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    63
    Messaggi
    1995
    Versione Office
    2007 - 2013
    Mi Piace ricevuti
    249
    Mi Piace dati
    38

    Re: Media Voti omettendo lo zero

    Scusa Kinoppi ma non puoi usare la funzione MEDIA.SE disponibile anche in Excel 2007?

    Codice: 
    =MEDIA.SE(intervallo;"<>0")
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"
    Cit. Berna11: "Se ti piace la risposta di qualcuno, oltre a ringraziarlo, puoi cliccare su "Mi Piace" in basso a sinistra del loro messaggio."

  3. #3
    L'avatar di ninai
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Barcellona P.G.
    Età
    54
    Messaggi
    1380
    Versione Office
    2010 PC
    Mi Piace ricevuti
    695
    Mi Piace dati
    142

    Re: Media Voti omettendo lo zero

    ciao
    lato formule molti modi es. in C5:
    =(D5+E5)/CONTA.SE(D5:E5;">0")
    vedi di tradurlo in VBA


    Ciao Alfredo, non ti avevo letto
    "So che spiegare il proprio problema, in modo comprensibile, richiede un certo impegno ed è un lavoro "palloso", ma qualcuno lo deve pur fare ....., indovina chi?" (Cit. "Scossa")

  4. #4
    L'avatar di Kinoppi90
    Clicca e Apri
    Data Registrazione
    Sep 2016
    Località
    firenze
    Messaggi
    35
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    3

    Re: Media Voti omettendo lo zero

    Si si certo Alfreimpa ma ho fatto tutto con le macro assegnate ai pulsanti e volevo continuare così...
    Si tratta solo di implementare la macro che mi consigliò Cromagno

  5. #5
    L'avatar di Kinoppi90
    Clicca e Apri
    Data Registrazione
    Sep 2016
    Località
    firenze
    Messaggi
    35
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    3

    Re: Media Voti omettendo lo zero

    Grazie Ninai ci provo subito
    Abbiate pazienza sono veramente all'inizio

  6. #6
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    71
    Messaggi
    580
    Versione Office
    2010
    Mi Piace ricevuti
    72
    Mi Piace dati
    1

    Re: Media Voti omettendo lo zero

    invece di
    Codice: 
        Media = Application.WorksheetFunction.Average(RngAverage)
    usa
    Codice: 
        Media = Application.WorksheetFunction.AverageIf(RngAverage, "<>0")

  7. #7
    L'avatar di Kinoppi90
    Clicca e Apri
    Data Registrazione
    Sep 2016
    Località
    firenze
    Messaggi
    35
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    3

    Re: Media Voti omettendo lo zero

    Citazione Originariamente Scritto da patel Visualizza Messaggio
    invece di
    Codice: 
        Media = Application.WorksheetFunction.Average(RngAverage)
    usa
    Codice: 
        Media = Application.WorksheetFunction.AverageIf(RngAverage, "<>0")
    Grazie 1000 Patel, Ninai e Alfreimpa.... Perfetto Funziona alla grande !!!!!
    Una cosa...
    Esiste un libro oppure un sito ben fatto dove posso imparare da zero il VBA?
    Possiamo mettere il [Risolto] anche questa volta

  8. #8
    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    63
    Messaggi
    1995
    Versione Office
    2007 - 2013
    Mi Piace ricevuti
    249
    Mi Piace dati
    38

    Re: Media Voti omettendo lo zero

    Citazione Originariamente Scritto da Kinoppi90 Visualizza Messaggio
    Esiste un libro oppure un sito ben fatto dove posso imparare da zero il VBA?
    Possiamo mettere il [Risolto] anche questa volta
    Potresti iniziare da qui

    http://www.forumexcel.it/forum/51-im...l-vba-di-excel

    dove c'è un link ad un corso VBA molto ben fatto; nella discussione è anche scaricabile un PDF dell'intero corso.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"
    Cit. Berna11: "Se ti piace la risposta di qualcuno, oltre a ringraziarlo, puoi cliccare su "Mi Piace" in basso a sinistra del loro messaggio."

  9. #9
    L'avatar di Kinoppi90
    Clicca e Apri
    Data Registrazione
    Sep 2016
    Località
    firenze
    Messaggi
    35
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    3

    Re: Media Voti omettendo lo zero

    Perfetto grazie mille Alfre

Discussioni Simili

  1. [Risolto] Calcolo media equivalente
    Di Emax80 nel forum Domande su Excel in generale
    Risposte: 4
    Ultimo Messaggio: 28/11/16, 18:23
  2. Media ballerina!!
    Di Dillina nel forum Domande su Excel in generale
    Risposte: 13
    Ultimo Messaggio: 23/08/16, 11:36
  3. Calcolo media
    Di mdf91 nel forum Domande su Excel VBA e MACRO
    Risposte: 6
    Ultimo Messaggio: 11/08/16, 01:08
  4. Gestire lo spoglio dei voti dei candidati ad un'assemblea
    Di Rebil nel forum Domande su Excel in generale
    Risposte: 6
    Ultimo Messaggio: 01/03/16, 20:23
  5. Media voti
    Di cesare nel forum Domande su Excel in generale
    Risposte: 5
    Ultimo Messaggio: 17/09/15, 19:33

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •