Risultati da 1 a 15 di 15

Discussione: Quiz di Santo Stefano



  1. #1

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    LocalitÓ
    Verona Provincia
    EtÓ
    57
    Messaggi
    1017
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0

    Quiz di Santo Stefano

    Visto che il quiz di Natale giÓ Ŕ stato proposto .....

    scrivere in F1 una formula che restituisca la (prima) parola pi¨ lunga tra quelle della colonna A
    La formula, copiata con Ctrl-C Ctrl-V in G1, H1, I1 riporterÓ le parole pi¨ lunghe, rispettivamente, delle colonne B, C e D.


    A
    B
    C
    D
    E
    F
    G
    H
    I
    1
    Nel Ahi Tanto per ritrovai selvaggia trattar etterno
    2
    mezzo quanto Ŕ me
    3
    del a amara si
    4
    cammin dir che va
    5
    di qual poco ne
    6
    nostra era Ŕ lo
    7
    vita Ŕ pi¨ etterno
    8
    mi cosa morte dolore
    9
    ritrovai dura ma per
    10
    per esta per me
    11
    una selva trattar si
    12
    selva selvaggia del va
    13
    oscura e ben tra
    14
    chÚ aspra chi la
    15
    la e vi perduta
    16
    diritta forte trovai gente
    17
    via che dir˛
    18
    era nel de
    19
    smarrita pensier le

    P.S.: ispirato da una domanda posta in altro forum da un utente che chiedeva una soluzione VBA.

    BUONE FESTE!
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

  2. #2

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    LocalitÓ
    Cosenza
    EtÓ
    45
    Messaggi
    2809
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    979
    in VBA oppure in formule?

    in VBA:

    Function LunghezzaTesto(Selezione As Range) As String
    Dim Cella As Range
    Dim Lunghezza As Integer


    For Each Cella In Selezione
    If Len(Cella) > Lunghezza Then
    LunghezzaTesto = Cella
    Lunghezza = Len(Cella)
    End If
    Next
    End Function

  3. #3

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    LocalitÓ
    Verona Provincia
    EtÓ
    57
    Messaggi
    1017
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Ciao,

    in questa sezione solo formule... poi si pu˛ riproporre nell'altra sezione per una soluzione con VBA.

    EDIT: i guru sono pregati di attendere per proporre la loro soluzione!
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

  4. #4
    L'avatar di Gerardo ZuccalÓ
    Clicca e Apri
    Data Registrazione
    May 2015
    LocalitÓ
    Milano, Italy
    EtÓ
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    Ciao Scossa! e tutti gli amici del forum
    Buone feste anche a te
    Visto che nella stessa riga ci potrebbero essere stringe con la stessa dimensione ho fatto una formula un po complessa che comunque ci restituisce tutte le stringhe

    In F1 da confermare con i tasti CTRL+SHIFT+ENTER
    Copia in basso e a destra
    Si potrebbe fare anche con l'AGGREGA

    =SE.ERRORE(INDICE(A$1:A$19;PICCOLO(SE(MAX(LUNGHEZZA(A$1:A$19))=LUNGHEZZA(A$1:A$19);RIF.RIGA($A$1:$A$19)-RIF.RIGA($A$1)+1);RIGHE($F$1:F1)));"")


    A
    B
    C
    D
    E
    F
    G
    H
    I
    1
    Nel Ahi Tanto per ritrovai selvaggia trattar etterno
    2
    mezzo quanto Ŕ me smarrita perduta
    3
    del a amara si
    4
    cammin dir che va
    5
    di qual poco ne
    6
    nostra era Ŕ lo
    7
    vita Ŕ pi¨ etterno
    8
    mi cosa morte dolore
    9
    ritrovai dura ma per
    10
    per esta per me
    11
    una selva trattar si
    12
    selva selvaggia del va
    13
    oscura e ben tra
    14
    chÚ aspra chi la
    15
    la e vi perduta
    16
    diritta forte trovai gente
    17
    via che dir˛
    18
    era nel de
    19
    smarrita pensier le





  5. I seguenti 2 utenti hanno dato un "Like" a Gerardo ZuccalÓ per questo post:


  6. #5

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    LocalitÓ
    Verona Provincia
    EtÓ
    57
    Messaggi
    1017
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Citazione Originariamente Scritto da Gerardo ZuccalÓ Visualizza Messaggio
    Visto che nella stessa riga ci potrebbero essere stringe con la stessa dimensione ho fatto una formula un po complessa che comunque ci restituisce tutte le stringhe
    Bravo Gerardo, ma sei andato oltre il richiesto:
    scrivere in F1 una formula che restituisca la (prima) parola pi¨ lunga tra quelle della colonna A
    :176:
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

  7. #6
    L'avatar di Gerardo ZuccalÓ
    Clicca e Apri
    Data Registrazione
    May 2015
    LocalitÓ
    Milano, Italy
    EtÓ
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    Oppss!! che distratto che sono
    Prova questa! ovviamente ci potrebbero essere anche altre soluzioni e di conseguenza fatevi avanti!!

    CTRL+SHIF+ENTER
    =INDICE(A$1:A$19;CONFRONTA(MAX(LUNGHEZZA(A$1:A$19));LUNGHEZZA(A$1:A$19);0))

    ​Ciao a tutti e auguroni!!

  8. I seguenti 2 utenti hanno dato un "Like" a Gerardo ZuccalÓ per questo post:


  9. #7

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    LocalitÓ
    Cosenza
    EtÓ
    45
    Messaggi
    2809
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    979
    Citazione Originariamente Scritto da scossa Visualizza Messaggio

    in questa sezione solo formule... poi si pu˛ riproporre nell'altra sezione per una soluzione con VBA.
    Sorry!
    Ultima modifica fatta da:Gerardo ZuccalÓ; 20/12/15 alle 22:03

  10. #8

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Como
    EtÓ
    53
    Messaggi
    7149
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2064
    Likes dati
    1300
    Ciao Scossa, siamo giÓ arrivati a santo Stefano?? :288:

    La formula di Gerardo mi sembra ottima, propongo solo un'alternativa:

    =SCARTO(A$1;CONFRONTA(MAX(LUNGHEZZA(A$1:A$19));LUNGHEZZA(A$1:A$19);0)-1;)
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se pu˛ sembrare improbabile, non pu˛ che essere quella giusta!

  11. I seguenti utenti hanno dato un "Like"


  12. #9
    L'avatar di Gerardo ZuccalÓ
    Clicca e Apri
    Data Registrazione
    May 2015
    LocalitÓ
    Milano, Italy
    EtÓ
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    Ciao ges, in attesa che Scossa ci da il benestare, auguro a tutti buon natale e " santo Stefano"

  13. #10

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Como
    EtÓ
    53
    Messaggi
    7149
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2064
    Likes dati
    1300
    Citazione Originariamente Scritto da Gerardo ZuccalÓ Visualizza Messaggio
    Ciao ges, in attesa che Scossa ci da il benestare, auguro a tutti buon natale e " santo Stefano"
    Grazie Gerardo, tanti auguri anche da parte mia.
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se pu˛ sembrare improbabile, non pu˛ che essere quella giusta!

  14. #11

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    LocalitÓ
    Sardegna
    EtÓ
    37
    Messaggi
    4020
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923
    Ciao a tutti,
    vedo che son giÓ state date ottime soluzioni :246:

    Propongo un alternativa (che non preferirei usare rispetto alle formule di ges & Gerardo)...

    In F1 (matriciale):

    =INDIRETTO(INDIRIZZO(MIN(SE(LUNGHEZZA(A$1:A$19)=MAX(LUNGHEZZA(A$1:A$19));RIF.RIGA(A$1:A$19);""));RIF.COLONNA(A1)))

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno pu˛ immaginare."

  15. #12

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    LocalitÓ
    Verona Provincia
    EtÓ
    57
    Messaggi
    1017
    Versione Office
    .
    Likes ricevuti
    366
    Likes dati
    0
    Ottime soluzioni.

    La mia Ŕ praticamente uguale a quella di Gerardo (senza i riferimenti assoluti di riga).

    Per completezza posto anche la versione non matriciale, da confermare col semplice invio:

    =INDICE(A1:A19;CONFRONTA(MAX(INDICE(LUNGHEZZA(A1:A19);));INDICE(LUNGHEZZA(A1:A19););0))
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

  16. I seguenti 2 utenti hanno dato un "Like" a scossa per questo post:


  17. #13
    L'avatar di Gerardo ZuccalÓ
    Clicca e Apri
    Data Registrazione
    May 2015
    LocalitÓ
    Milano, Italy
    EtÓ
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    Ottima soluzione!
    non ci avevo pensato ad INDICE e CONFRONTA per evitare lo stato matriciale

    PS I riferimenti di cella misti ($ sui numeri) li avevo lasciati dalla formula precedente #4 perchŔ avevo la necessitÓ di incollare la formula in basso in caso di duplicati, ma poi per fare veloce non ho tolto i riferimenti perchŔ giustamente non servono
    Cioa scossa grazie per la puntualizzazione
    In attesa del tuo prossimo quiz un grande augurio di buon Natale

  18. #14
    L'avatar di Vincenzo Damiani
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Molfetta
    EtÓ
    58
    Messaggi
    419
    Versione Office
    2010
    Likes ricevuti
    13
    Likes dati
    637
    Scusate se mi intrometto nelle vostre discussioni....
    lo faccio solo per augurare a tutti voi un Buon Natale e felice anno....

    P.S. per le formule cerco solo di imparare dai vostri esempi.....Grazie
    Windows8.1 office 2010

  19. I seguenti utenti hanno dato un "Like"


  20. #15
    L'avatar di Gerardo ZuccalÓ
    Clicca e Apri
    Data Registrazione
    May 2015
    LocalitÓ
    Milano, Italy
    EtÓ
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    Ciao Vincenzo buone feste anche a te

Discussioni Simili

  1. [Risolto] Quiz
    Di Anthony nel forum Domande su Excel in generale
    Risposte: 35
    Ultimo Messaggio: 22/11/16, 15:02
  2. Quiz
    Di Anthony nel forum Domande su Excel VBA e MACRO
    Risposte: 0
    Ultimo Messaggio: 19/11/16, 14:16
  3. Quiz
    Di Anthony nel forum Domande su Excel in generale
    Risposte: 59
    Ultimo Messaggio: 08/11/16, 02:18
  4. Quiz di Santo Stefano (VBA)
    Di scossa nel forum Domande su Excel VBA e MACRO
    Risposte: 7
    Ultimo Messaggio: 21/12/15, 15:34
  5. Quiz Natalizio
    Di Marius44 nel forum Domande su Excel VBA e MACRO
    Risposte: 12
    Ultimo Messaggio: 19/12/15, 02:24

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
  •