conta quante volte



  • conta quante volte
    di umberto.minora data: 11/02/2013 12:12:26

    Buongiorno a Tutti,
    Vorrei cercare in una colonna di dati quante volte ricorre uno stesso numero. Il problema però è che il numero sono le ultime 3 cifre di una colonna di numeri da 7 cifre ciascuno.Mi spiego: nella colonna dove fare la ricerca ho numeri del tipo "2000273", "2011273", io vorrei cercare quante volte ricorre il numero "273" (le ultime 3 cifre appunto).
    Pensavo a una cosa tipo conta.se combinata ad un cerca.vert, ma ancora non ne sono riuscito a venire a capo...
    Spero possiate aiutarmi, grazie in anticipo!


  • CONTA.SE ULTIME 3=273
    di canapone (utente non iscritto) data: 11/02/2013 13:12:32


    Ciao,

    puoi provare (nell'esempio in a2:a1000 i numeri)

    =MATR.SOMMA.PRODOTTO(--(DESTRA(A2:A1000;3)="273"))

    Saluti



  • di RITA (utente non iscritto) data: 11/02/2013 13:51:38

    se vuoi una soluzione in vba vedi qui sotto
    la colonna esaminata e' la a
    ti viene restiuita la soluzione in ..num

     
    sub trova ()
    conta = Application.WorksheetFunction.CountA(Range("a1:a65000"))
    For i = 1 To conta
    x = Mid(Range("a" & i), Len(Range("a" & i)) - 2, 3)
    If x = 273 Then
    num = num + 1
    End If
    Next i
    MsgBox num
    end sub
    
    



  • di Riccardo (utente non iscritto) data: 11/02/2013 14:02:30

    Io ho fatto una versione più generale di quella già valida di Rita, perché accetta una stringa (ma vale anche per numeri) parametrica ed una zona di ricerca parametrica.
    La chiamata potrebbe essere:
    ContaStrZ(283, $A:$C) se i valori da ricercare sono nelle colonne A:C

    Riccardo
     
    Function ContaStrZ(Stringa As String, Zona As Range) 'Restituisce numero di volte che  stringa è contenuta in Zona
    Dim testo As String 
    Stringa = UCase(Stringa)
     For Each rng In Zona
      Testo = UCase(rng.Value)
      If InStr(Testo, Stringa) <> 0 Then
        i = i + 1
      End If
     Next
    ContaStrZ = i
    End Function



  • di umbe87 (utente non iscritto) data: 11/02/2013 15:43:42

    La soluzione non VBA (canapone) funziona egregiamente, grazie mille davvero!!!!
    Per la soluzione VBA: ho aperto per la prima volta la "console" e provato a fare un ciclo sulla colonna con un po'di funzioni, ma senza successo... Senz'altro mi metterò a imparare meglio il suo utilizo perché mi sembra davvero utilissima.
    Grazie mille a Tutti!