Pagina 1 di 2 12 UltimaUltima
Risultati da 1 a 30 di 40

Discussione: Testi e numeri



  1. #1
    L'avatar di geomax
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    sicilia
    Età
    52
    Messaggi
    12
    Versione Office
    Excel 2003
    Likes ricevuti
    0
    Likes dati
    0

    Testi e numeri

    Ciao a tutti, vorrei sapere come fare ad eliminare, in una colonna dove sono riportati centinaia di valori alfanumerici, solo i numeri in modo che il testo rimanga nella sua cella originale

  2. #2
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2133

    Re: Testi e numeri

    Ciao Geomax, allega un file con pochi dati, specificando il risultato che vuoi ottenere.
    Ciao.

  3. #3

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7132
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1299

    Re: Testi e numeri

    Ciao,
    visto che non sappiamo come sono "ingarbugliati" i numeri con il testo ti segnalo un Function col vba, da inserire in un modulo standard, che dovrebbe andare bene in qualunque occasione.
    Codice: 
    Function ESTRAI_NUMERI(Stringa As String) As String
        Application.Volatile
        Dim numeri As Long, y As Long
        Stringa = StrConv(Stringa, vbUpperCase)
        y = 1
        numeri = "0"
        For y = 1 To Len(Stringa)
            numeri = Asc(Mid(Stringa, y, 1))
            Select Case numeri
            Case "48" To "57"
                ESTRAI_NUMERI = ESTRAI_NUMERI & Chr(numeri)
            Case Else
            End Select
        Next
        Exit Function
    End Function
    In pratica, ponendo che le stringhe mischiate ai numeri siano nella colonna A, come se stessi utilizzando una formula, in un'altra cella basta che scrivi

    =ESTRAI_NUMERI(A1)

    e trascini in basso.

    File Allegati File Allegati
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  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

    Re: Testi e numeri

    Ciao
    Una alternativa con le formule in B1

    =MATR.SOMMA.PRODOTTO(STRINGA.ESTRAI(0&A1;GRANDE(INDICE(VAL.NUMERO(--STRINGA.ESTRAI(A1;RIF.RIGA($1:$25);1))*RIF.RIGA($1:$25);0);RIF.RIGA($1:$25))+1;1)*10^RIF.RIGA($1:$25)/10)




    Un saluto a tutti

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


  6. #5

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7132
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1299

    Re: Testi e numeri

    Ciao Gerardo,
    mi era sfuggita questa vecchia discussione .... pensare che l'avevo aperta io! :98:
    Ultimamente - come te ne sarai accorto - ho la mente spesso nel vba!:186:
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  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

    Re: Testi e numeri

    Citazione Originariamente Scritto da ges Visualizza Messaggio
    Ciao Gerardo,
    mi era sfuggita questa vecchia discussione .... pensare che l'avevo aperta io! :98:
    ciao ges
    Ho tolto il link perchè non era la stessa cosa, ma comunque questa formula era stata trattata in questo forum perchè io come al solito m conservo le vecchie formule e adesso sto iniziando a conservarmi anche i codici VBA
    Un saluto:41:

  8. #7
    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

    Re: Testi e numeri

    ho la mente spesso nel vba!
    Meglio cosi, è sbagliato fossilizzarsi come ho fatto io solo con le formule e dintorni, ma la programmazione è completamente un'altra cosa e io per una serie di motivi la respingo, so che in molti casi è indispensabile ma mi ci vuole troppo tempo e volontà

    Un Saluto

  9. #8
    L'avatar di ninai
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Barcellona P.G.
    Età
    55
    Messaggi
    1661
    Versione Office
    2010 PC
    Likes ricevuti
    892
    Likes dati
    184

    Re: Testi e numeri

    ciao a tutti
    ma io dalla richiesta avevo capito che voleva ELIMINARE i numeri e lasciare il testo. la formula (che non conoscevo) fa il contrario.
    "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")

  10. #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

    Re: Testi e numeri

    Ciao Ninai come al solito capisco al contrario, mi sono fidato del risultato della macro di ges :60:, vabbè allora sotto a studiare ....

  11. #10

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7132
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1299

    Re: Testi e numeri

    Ciao,
    hai ragione ninai, ho letto velocemente e ho mandato Gerardo fuori strada.

    Rimedio subito, rimanendo nel vba, altra Function da salvare in un modulo standard.

    Codice: 
    Function ESTRAI_TESTO(valore As Variant) As Variant
        Dim y As Integer
        Dim outValue As Variant
        Dim testo As Variant
        ESTRAI_TESTO = ""
        If Not valore Is Nothing Then
            For y = 1 To Len(valore)
                testo = Mid(valore, y, 1)
                If Asc(testo) >= 97 And Asc(testo) <= 122 Then
                    ESTRAI_TESTO = ESTRAI_TESTO & testo
                End If
            Next
        End If
    End Function
    Formula da usare:

    =ESTRAI_TESTO(A1)


    File Allegati File Allegati
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  12. I seguenti utenti hanno dato un "Like"


  13. #11
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2133

    Re: Testi e numeri

    Ciao Geomax, una variante con le formule alla soluzione proposta da Ges, che cordialmente saluto, supponendo che le stringhe di testo si trovino in colonna "A" e che le soluzione le si vogliano in colonna "C" potrebbe essere la seguente:

    In C1:
    =SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(ANNULLA.SPAZI(SOSTITUISCI(A1;" ";""));"0";"");"1";"");"2";"");"3";"");"4";"");"5";"");"6";"");"7";"");"8";"");"9";"")

    da tirare giù alla bisogna.
    Allego il file di prova.
    Fa sapere se va bene.
    File Allegati File Allegati

  14. I seguenti 2 utenti hanno dato un "Like" a pkrome59 per questo post:


  15. #12
    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

    Re: Testi e numeri

    PkRome59
    Fantastica questa formula semplice ed intuitiva :97:

  16. #13

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7132
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1299

    Re: Testi e numeri

    Complimenti anche da parte mia ancora a pkrome, che saluto con cordialità, che ci stupisce ogni giorno con semplici ma efficaci soluzioni. :97:
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  17. #14
    L'avatar di rollis13
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Cordenons
    Messaggi
    812
    Versione Office
    2016 64bit
    Likes ricevuti
    147
    Likes dati
    53

    Re: Testi e numeri

    Se ti servono anche le maiuscole oltre alle minuscole, nella macro di ges nel suo post #10 puoi cambiare così:
    Codice: 
    da (per le sole minuscole):
    If Asc(testo) >= 97 And Asc(testo) <= 122 Then
    
    per maiuscole e minuscole (compresi 6 segni):
    If Asc(testo) >= 65 And Asc(testo) <= 122 Then
    
    per sole maiuscole:
    If Asc(testo) >= 65 And Asc(testo) <= 90 Then

  18. #15
    L'avatar di geomax
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    sicilia
    Età
    52
    Messaggi
    12
    Versione Office
    Excel 2003
    Likes ricevuti
    0
    Likes dati
    0

    Re: Testi e numeri

    Scusate se rispondo solo ora ma non trovavo la pasw di accesso. :-(
    Proverò a utilizzare la stringa , nel caso contrario invio il file.
    :286:

  19. #16
    L'avatar di dracoscrigno
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    ferrara
    Età
    41
    Messaggi
    2074
    Versione Office
    office pro 2010
    Likes ricevuti
    440
    Likes dati
    241

    Re: Testi e numeri

    Non posso esimermi dall' inserire una funzioncina fai da te :262:

    Codice: 
    Function SenzaCifre(ContenutoCella As String) As String
        Dim RegEx As Object
        Set RegEx = CreateObject("VBScript.RegExp")
        
        With RegEx
            .Global = True                            ' Trova tutte le occorrenze
            .MultiLine = True                         ' Se ci sono valuta tutte le linee
            .ignorecase = True                        ' Ignora maiuscole e minuscole
            .Pattern = "\d+"                          ' cerca Una o più cifre
            SenzaCifre = .Replace(ContenutoCella, "") ' sostituisci le cifre con una stringa vuota
        End With
        Set RegEx = Nothing
    End Function
    Unica pecca, sento la mancanza di chi potrebbe bastonarmi :275:

    ... aspetta che, rieditando, la snelliamo ancora di più ...
    Codice: 
    Function SenzaCifre(ContenutoCella As String) As String
        With CreateObject("VBScript.RegExp")
            .Global = True                            ' Trova tutte le occorrenze
            .MultiLine = True                         ' Se ci sono valuta tutte le linee
            .ignorecase = True                        ' Ignora maiuscole e minuscole
            .Pattern = "\d+"                          ' cerca Una o più cifre
            SenzaCifre = .Replace(ContenutoCella, "") ' sostituisci le cifre con una stringa vuota
        End With
    End Function

  20. #17
    L'avatar di geomax
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    sicilia
    Età
    52
    Messaggi
    12
    Versione Office
    Excel 2003
    Likes ricevuti
    0
    Likes dati
    0

    Re: Testi e numeri

    non vorrei complicarvi la vita ma devo precisare alcune cose: si tratta di un file dbf, che vorrei inviarvi per dirvi esattamente la colonna " incriminata", ma non ho capito bene come si fa e/o se devo prima trasformarlo necessariamente in file excel

  21. #18
    L'avatar di geomax
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    sicilia
    Età
    52
    Messaggi
    12
    Versione Office
    Excel 2003
    Likes ricevuti
    0
    Likes dati
    0

    Re: Testi e numeri

    Invio il file. Devo eliminare nella colonna P solo i numeri (si alternano al testo). Si tratta di un file dbf. Grazie :-))
    File Allegati File Allegati

  22. #19
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2133

    Re: Testi e numeri

    Ciao Geomax, se ho capito bene, al tuo file allegato ho aggiunto una colonna la "Q" in cui estrapolo i testi, per cui copia la seguente:

    In Q2:
    =SE.ERRORE(INDICE($P$2:$P$15666;AGGREGA(15;6;((RIF.RIGA($C$2:$C$15666)-RIF.RIGA($C$2)+1)/(($C$2:$C$15666<>"L014")*($C$2:$C$15666<>"L013")*($C$2:$C$15666<>"L015")));RIGHE($C$2:$C2)));"")

    da tirare giù fino alla riga15666.
    Allego il file di prova.
    Ciao.

    Chiedo scusa per l'allegato, supera le dimensioni ammesse, mi accorgo adesso, che utilizzi la versione 2003, per cui copia la seguente:

    In Q2:
    =SE.ERRORE(INDICE($P$2:$P$100;PICCOLO(SE((($C$2:$C$100<>"L014")*($C$2:$C$100<>"L013")*($C$2:$C$100<>"L015"));(RIF.RIGA($C$2:$C$100)-RIF.RIGA($C$2)+1));RIGHE($C$2:$C2)));"")

    da tirare giù fino alla riga 100
    da adattare alla bisogna
    Ciao.

  23. #20
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Testi e numeri

    Citazione Originariamente Scritto da geomax Visualizza Messaggio
    Invio il file. Devo eliminare nella colonna P solo i numeri (si alternano al testo). Si tratta di un file dbf. Grazie :-))
    L'allegato ha estensione .pbf
    Non si riesce ad aprirlo.

  24. #21
    L'avatar di dracoscrigno
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    ferrara
    Età
    41
    Messaggi
    2074
    Versione Office
    office pro 2010
    Likes ricevuti
    440
    Likes dati
    241

    Re: Testi e numeri

    MA sei sicuro che le celle della colonna "P", denominata "TESTO" sia occupate da carattreri AlfaNumerici?

    Io ho aperto il file è ci vedo
    O del testo Oppure DEi numeri ma mai tutti ambedue nelal stessa cella.
    Tutta la colonna è, comunque in formato testo.


    87.6
    8.0
    SCALETTA
    ZANCLEA
    42.9
    SUPERIORE
    65.1
    DIVIETO
    143.9
    SCALETTA
    71.7
    50
    43.0
    139.2
    9.4
    106.2
    100
    FERROVIA

    ... MA! fors enon ho capito un piffero :166:

  25. #22
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2133

    Re: Testi e numeri

    Ciao Geomax, se ho capito bene, al tuo file allegato ho aggiunto una colonna la "Q" in cui estrapolo i testi, per cui copia la seguente:

    In Q2:
    =SE.ERRORE(INDICE($P$2:$P$15666;AGGREGA(15;6;((RIF.RIGA($C$2:$C$15666)-RIF.RIGA($C$2)+1)/(($C$2:$C$15666<>"L014")*($C$2:$C$15666<>"L013")*($C$2:$C$15666<>"L015")));RIGHE($C$2:$C2)));"")

    da tirare giù fino alla riga15666.
    Allego il file di prova.
    Ciao.

    Ho ridotto le dimensioni dell'allegato, mi accorgo che utilizzi la versione 2003, per cui copia la seguente:

    In Q2:
    =SE.ERRORE(INDICE($P$2:$P$100;PICCOLO(SE((($C$2:$C$100<>"L014")*($C$2:$C$100<>"L013")*($C$2:$C$100<>"L015"));(RIF.RIGA($C$2:$C$100)-RIF.RIGA($C$2)+1));RIGHE($C$2:$C2)));"")

    da tirare giù fino alla riga 100
    da adattare alla bisogna
    Ciao.
    File Allegati File Allegati

  26. #23
    L'avatar di dracoscrigno
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    ferrara
    Età
    41
    Messaggi
    2074
    Versione Office
    office pro 2010
    Likes ricevuti
    440
    Likes dati
    241

    Re: Testi e numeri

    Citazione Originariamente Scritto da ProgrammD69 Visualizza Messaggio
    L'allegato ha estensione .pbf
    Non si riesce ad aprirlo.
    DA excel:

    File -> Apri file -> seleziona TUTTI I FILE (*.*) -> seleziona il file interessato

    Cliccando con il destro sul file -> Apri con -> Scegli Excel

  27. #24
    L'avatar di geomax
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    sicilia
    Età
    52
    Messaggi
    12
    Versione Office
    Excel 2003
    Likes ricevuti
    0
    Likes dati
    0

    Re: Testi e numeri

    Vi ringrazio tutti per la pazienza che state avendo nei miei confronti.
    In effetti non mi sono spiegato molto bene, ma con il file inviato ( sarebbe molto più pesante ma ho più che dimzzato i dati) possiamo ragionare un po:
    la colonna P contiene o caratteri numerici o caratteri testo. Dovrei eliminare solo i numeri in modo tale che le predette celle restino vuote ( bianche) e i testi non "slittino" in altre celle ma permangano dove sono. Vi ringrazio ancora, siete fantastici. :286:

  28. #25

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7132
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1299

    Re: Testi e numeri

    Ciao a tutti,
    non so se ho capito bene, se vuoi eliminare solo i numeri dalla colonna P basterebbe questa semplice sub.
    Codice: 
    Sub elimina_numeri()
        For Each cella In Range("P2:P100")
            If IsNumeric(cella) = True Then
                cella.ClearContents
            End If
        Next
    End Sub
    File Allegati File Allegati
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  29. I seguenti utenti hanno dato un "Like"


  30. #26
    L'avatar di dracoscrigno
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    ferrara
    Età
    41
    Messaggi
    2074
    Versione Office
    office pro 2010
    Likes ricevuti
    440
    Likes dati
    241

    Re: Testi e numeri

    quoto Ges. in toto.

  31. #27
    L'avatar di geomax
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    sicilia
    Età
    52
    Messaggi
    12
    Versione Office
    Excel 2003
    Likes ricevuti
    0
    Likes dati
    0

    Re: Testi e numeri

    Perfetto Ges ! E' il risultato che desideravo !

  32. #28
    L'avatar di geomax
    Clicca e Apri
    Data Registrazione
    Apr 2016
    Località
    sicilia
    Età
    52
    Messaggi
    12
    Versione Office
    Excel 2003
    Likes ricevuti
    0
    Likes dati
    0

    Re: Testi e numeri

    l'unico problema è che non riesco ad importare ( per mia ignoranza) la macro nel file originario :223:

  33. #29
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2133

    Re: Testi e numeri

    Ciao Geomax, un'alternativa alla soluzione proposta da Ges, con le formule, che saluto, potrebbe essere la seguente:

    In Q2:
    =SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(SOSTITUISCI(ANNULLA.SPAZI(SOSTITUISCI(P2;".";""));"0";"");"1";"");"2";"");"3";"");"4";"");"5";"");"6";"");"7";"");"8";"");"9";"")

    da tirare giù alla bisogna.
    Allego il file di prova.
    Ciao.
    File Allegati File Allegati

  34. #30

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7132
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1299

    Re: Testi e numeri

    Ciao Pkrome,
    per come ho capito io, Geomax non vuole sostituire TUTTI i numeri presenti in ciascuna cella, ma vuole eliminare SOLO quelle celle che contengono SOLO numeri.

    Per eliminarli veramente l'unica soluzione è il vba con il codice che ho proposto sopra, in alternativa, se vuole escluderli in un'altra colonna, propongo un'altra formula, in Q2 da trascinare in basso:

    =SE(VAL.NUMERO(SOSTITUISCI(P2;".";",")+0);"";P2)
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

Discussioni Simili

  1. Editor che scrive i testi tutti attaccati
    Di Powerwin nel forum Problemi, suggerimenti e Novità del forum
    Risposte: 20
    Ultimo Messaggio: 23/02/17, 18:01
  2. Quali testi consigliate.
    Di Ninola1982 nel forum Domande su Excel in generale
    Risposte: 7
    Ultimo Messaggio: 26/06/16, 00:06
  3. Risposte: 15
    Ultimo Messaggio: 16/03/16, 01:07
  4. Confrontare e restituire valori e testi
    Di Ale64 nel forum Domande su Excel in generale
    Risposte: 8
    Ultimo Messaggio: 10/03/16, 23:15
  5. Se formula con più Testi = Cella X
    Di M4x1m1l14n nel forum Domande su Excel in generale
    Risposte: 46
    Ultimo Messaggio: 08/02/16, 17:36

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
  •