Risultati da 1 a 22 di 22

Discussione: Come estrarre un testo da una stringa di testo



  1. #1
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Come estrarre un testo da una stringa di testo

    In A1 ho la frase: "dal fornitore alfa srl ho acquistato merce"
    In A2 ho la frase: "ho acquistato merce dal fornitore beta srl"
    In A3 ho la frase: "la merce Ŕ stata venduta al cliente zeta srl di Milano"

    In B1 voglio il testo: "fornitore"
    In B2 voglio il testo: "fornitore"
    In B3 voglio il testo: "cliente"

    In C1 voglio il testo: "alfa srl"
    In C2 voglio il testo: "beta srl"
    In C3 voglio il testo: "zeta srl"

    Si tratta di estrapolare dalle frasi in colonna A solo alcune parole per metterle in colonna B e C. Formula o VBA ??

    Si tenga presente che la posizione, nelle frasi, pu˛ cambiare e la lunghezza del nome del cliente/fornitore pu˛ variare.
    Ho giÓ usato la formula =stringa.estrai(A1;Trova("fornitore";A1);9) ed ottengo "fornitopre" in B1; per˛ quale formula Ŕ utile per il nome cliente/fornitore considerando che varia di rigo e di lunghezza ?

  2. #2
    L'avatar di Marius44
    Clicca e Apri
    Data Registrazione
    Sep 2015
    LocalitÓ
    Catania
    EtÓ
    73
    Messaggi
    3222
    Versione Office
    Excel2010
    Likes ricevuti
    627
    Likes dati
    155

    Re: Come estrarre un testo da una stringa di testo

    Ciao
    penso si possa fare con due UDF come sotto
    Codice: 
    Function EstraiNome1(cell As Range) As String  'by Marius44
    Dim R
        R = Split(cell, " ")
        For i = 0 To UBound(R)
            If R(i) = "fornitore" Or R(i) = "cliente" Then
                EstraiNome1 = R(i)
                Exit For
            End If
        Next i
        Set R = Nothing
    End Function
    Function EstraiNome2(cell As Range) As String  'by Marius44
    Dim R
        R = Split(cell, " ")
        For i = 0 To UBound(R)
            If R(i) = "fornitore" Or R(i) = "cliente" Then
                EstraiNome2 = R(i + 1) & " " & R(i + 2)
                Exit For
            End If
        Next i
        Set R = Nothing
    End Function
    Ovviamente in B1 scrivi =EstraiNome1(A1) e trascini gi¨ e in C1 scrivi =EstraiNome2(A1) e trascini gi¨
    Prova e fai sapere. Ciao,
    Mario
    File Allegati File Allegati

  3. #3
    L'avatar di Cuc¨^_^
    Clicca e Apri
    Data Registrazione
    Jun 2016
    LocalitÓ
    TrentoGallipoliTaranto
    EtÓ
    46
    Messaggi
    311
    Versione Office
    2010
    Likes ricevuti
    57
    Likes dati
    18

    Re: Come estrarre un testo da una stringa di testo

    Citazione Originariamente Scritto da Marius44 Visualizza Messaggio
    Ciao
    penso si possa fare con due UDF come sotto
    Codice: 
    Function EstraiNome1(cell As Range) As String  'by Marius44
    Dim R
        R = Split(cell, " ")
        For i = 0 To UBound(R)
            If R(i) = "fornitore" Or R(i) = "cliente" Then
                EstraiNome1 = R(i)
                Exit For
            End If
        Next i
        Set R = Nothing
    End Function
    Function EstraiNome2(cell As Range) As String  'by Marius44
    Dim R
        R = Split(cell, " ")
        For i = 0 To UBound(R)
            If R(i) = "fornitore" Or R(i) = "cliente" Then
                EstraiNome2 = R(i + 1) & " " & R(i + 2)
                Exit For
            End If
        Next i
        Set R = Nothing
    End Function
    Ovviamente in B1 scrivi =EstraiNome1(A1) e trascini gi¨ e in C1 scrivi =EstraiNome2(A1) e trascini gi¨
    Prova e fai sapere. Ciao,
    Mario
    Ciao Mario
    ottimo lavoro complimenti, ma credo che per essere proprio fatto bene bisognerebbe avere a disposizione una lista di tutti i clienti/fornitori poichŔ se per esempio la frase in colonna A Ŕ del tipo "dal fornitore denominato alfa srl ho acquistato merce" la funzione da te creata non restituisce il valore desiderato del nome del fornitore...
    Ciao
    Cuc¨

  4. #4
    L'avatar di Marius44
    Clicca e Apri
    Data Registrazione
    Sep 2015
    LocalitÓ
    Catania
    EtÓ
    73
    Messaggi
    3222
    Versione Office
    Excel2010
    Likes ricevuti
    627
    Likes dati
    155

    Re: Come estrarre un testo da una stringa di testo

    Ciao Cuc¨ ^_^
    e ben ritrovato.

    Premesso che ho utilizzato quanto "descritto" dall'Utente (ma perchŔ non allegano mai un file in modo da avere una casistica completa?) la tua affermazione
    del tipo "dal fornitore denominato alfa srl ho acquistato merce"
    non dovrebbe trovare applicazione perche in campo commerciale, credo, si tenda sempre a ridurre (non ha senso mettere fornitore denominato; si mette la ragione sociale e basta).

    Non sei d'accordo?
    Ciao,
    Mario

  5. #5

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    LocalitÓ
    Como
    EtÓ
    53
    Messaggi
    7153
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2064
    Likes dati
    1300

    Re: Come estrarre un testo da una stringa di testo

    Ciao a tutti,
    visto che Mario ha pensato al vba (un saluto), propongo una soluzione con le formule:

    In B1 da tirare in basso:

    =SE.ERRORE(SE.ERRORE(SE(RICERCA("cliente";A1)>0;"cliente");SE(RICERCA("fornitore";A1)>0;"fornitore"));"")

    In C1 da tirare in basso:

    =SE.ERRORE(ANNULLA.SPAZI(SINISTRA(SOSTITUISCI(STRINGA.ESTRAI(A1;SE.ERRORE(SE(RICERCA("cliente";A1)>0;RICERCA("cliente";A1));SE(RICERCA("fornitore";A1)>0;RICERCA("fornitore";A1)));RICERCA("srl";A1)-1);B1;"");RICERCA("srl";SOSTITUISCI(STRINGA.ESTRAI(A1;SE.ERRORE(SE(RICERCA("cliente";A1)>0;RICERCA("cliente";A1));SE(RICERCA("fornitore";A1)>0;RICERCA("fornitore";A1)));RICERCA("srl";A1)-1);B1;""))+2));"")

    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!

  6. I seguenti 2 utenti hanno dato un "Like" a ges per questo post:


  7. #6
    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: Come estrarre un testo da una stringa di testo

    un saluto a tutti.

    l idea della udf Ŕ interessante ma la cambierei un pochino:
    al posto di splittare la stringa datagli in pasto, ne cercherei una specifica sottostringa da cercare in un secondo argomento (un range di celle dove segnare tutte le occorrenze volute.

  8. #7
    L'avatar di Cuc¨^_^
    Clicca e Apri
    Data Registrazione
    Jun 2016
    LocalitÓ
    TrentoGallipoliTaranto
    EtÓ
    46
    Messaggi
    311
    Versione Office
    2010
    Likes ricevuti
    57
    Likes dati
    18

    Re: Come estrarre un testo da una stringa di testo

    Citazione Originariamente Scritto da Marius44 Visualizza Messaggio
    Ciao Cuc¨ ^_^
    la tua affermazione non dovrebbe trovare applicazione perche in campo commerciale, credo, si tenda sempre a ridurre (non ha senso mettere fornitore denominato; si mette la ragione sociale e basta).

    Non sei d'accordo?
    Ciao,
    Mario
    Era solo un esempio....
    l'utilizzatore (sempre molto imprevedibile) potrebbe anche scrivere:

    1. dal fornitore, alfa srl ho acquistato merce
    2.
    dal fornitore-alfa srl ho acquistato merce
    3.
    dal fornitore " alfa srl " ho acquistato merce
    etc etc

  9. #8
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Come estrarre un testo da una stringa di testo

    Citazione Originariamente Scritto da ges Visualizza Messaggio
    Ciao a tutti,
    visto che Mario ha pensato al vba (un saluto), propongo una soluzione con le formule:

    In B1 da tirare in basso:

    =SE.ERRORE(SE.ERRORE(SE(RICERCA("cliente";A1)>0;"cliente");SE(RICERCA("fornitore";A1)>0;"fornitore"));"")

    In C1 da tirare in basso:

    =SE.ERRORE(ANNULLA.SPAZI(SINISTRA(SOSTITUISCI(STRINGA.ESTRAI(A1;SE.ERRORE(SE(RICERCA("cliente";A1)>0;RICERCA("cliente";A1));SE(RICERCA("fornitore";A1)>0;RICERCA("fornitore";A1)));RICERCA("srl";A1)-1);B1;"");RICERCA("srl";SOSTITUISCI(STRINGA.ESTRAI(A1;SE.ERRORE(SE(RICERCA("cliente";A1)>0;RICERCA("cliente";A1));SE(RICERCA("fornitore";A1)>0;RICERCA("fornitore";A1)));RICERCA("srl";A1)-1);B1;""))+2));"")


    Le formule funzionano, in particolare la seconda, lunga e precisa.
    Grazie mille.

  10. #9
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Come estrarre un testo da una stringa di testo

    Citazione Originariamente Scritto da Marius44 Visualizza Messaggio
    Ciao
    penso si possa fare con due UDF come sotto
    Codice: 
    Function EstraiNome1(cell As Range) As String  'by Marius44
    Dim R
        R = Split(cell, " ")
        For i = 0 To UBound(R)
            If R(i) = "fornitore" Or R(i) = "cliente" Then
                EstraiNome1 = R(i)
                Exit For
            End If
        Next i
        Set R = Nothing
    End Function
    Function EstraiNome2(cell As Range) As String  'by Marius44
    Dim R
        R = Split(cell, " ")
        For i = 0 To UBound(R)
            If R(i) = "fornitore" Or R(i) = "cliente" Then
                EstraiNome2 = R(i + 1) & " " & R(i + 2)
                Exit For
            End If
        Next i
        Set R = Nothing
    End Function
    Ovviamente in B1 scrivi =EstraiNome1(A1) e trascini gi¨ e in C1 scrivi =EstraiNome2(A1) e trascini gi¨
    Prova e fai sapere. Ciao,
    Mario
    Ho provato entrambe le functions su un mio file. Non funzionano !!

  11. #10
    L'avatar di Marius44
    Clicca e Apri
    Data Registrazione
    Sep 2015
    LocalitÓ
    Catania
    EtÓ
    73
    Messaggi
    3222
    Versione Office
    Excel2010
    Likes ricevuti
    627
    Likes dati
    155

    Re: Come estrarre un testo da una stringa di testo

    Ciao programmD69

    Premesso che ho utilizzato quanto "descritto" dall'Utente (ma perchŔ non allegano mai un file in modo da avere una casistica completa?)
    Cosa intendi
    Ho provato entrambe le functions su un mio file. Non funzionano !!
    Che errore danno? Quale Ŕ la stringa che crea l'errore^

    Potresti essere pi¨ preciso? Grazie. Ciao,
    Mario

  12. #11
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Come estrarre un testo da una stringa di testo

    Citazione Originariamente Scritto da Marius44 Visualizza Messaggio
    Ciao programmD69


    Cosa intendi
    Che errore danno? Quale Ŕ la stringa che crea l'errore^

    Potresti essere pi¨ preciso? Grazie. Ciao,
    Mario
    Ho inserito il codice VBA delle due function sul foglio1; una function di nome EstraiNome1 ed un'altra function EstraiNome2.
    Poi, nella cella B1 ho scritto =EstraiNome1 (dopo averla trovata tra le funzioni definite dall'utente) ed il risultato Ŕ una cella vuota.

    Nessun errore in particolare. Solo cella vuota.

    Ciao.

  13. #12
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Come estrarre un testo da una stringa di testo

    Allego file.
    File Allegati File Allegati

  14. #13
    L'avatar di Marius44
    Clicca e Apri
    Data Registrazione
    Sep 2015
    LocalitÓ
    Catania
    EtÓ
    73
    Messaggi
    3222
    Versione Office
    Excel2010
    Likes ricevuti
    627
    Likes dati
    155

    Re: Come estrarre un testo da una stringa di testo

    Ciao
    ma allora vuoi "giocare sporco"
    Nel tuo primo post hai indicato tutto in lettere minuscole. Ora l'esempio Ŕ in lettere MAIUSCOLE!!!

    Beh, tagliamo la testa la toro.
    Nel modulo dove hai inserito le due Function, all'inizio prima di ogni cosa, scrivi Option Compare Text.

    Basta questo e, comunque siano scritti, ti trova tutto.
    Ciao,
    Mario

  15. #14
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Come estrarre un testo da una stringa di testo

    Citazione Originariamente Scritto da Marius44 Visualizza Messaggio
    Ciao
    ma allora vuoi "giocare sporco"
    Nel tuo primo post hai indicato tutto in lettere minuscole. Ora l'esempio Ŕ in lettere MAIUSCOLE!!!

    Beh, tagliamo la testa la toro.
    Nel modulo dove hai inserito le due Function, all'inizio prima di ogni cosa, scrivi Option Compare Text.

    Basta questo e, comunque siano scritti, ti trova tutto.
    Ciao,
    Mario

    Funziona ottimamente. Ti ringrazio.


  16. #15
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Come estrarre un testo da una stringa di testo

    Discussione chiusa.

  17. #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: Come estrarre un testo da una stringa di testo

    Vedo che avete gia risolto. Tanto meglio.

    Vorrei comunque condividere una funzione un p˛ pi¨ versatile di modo da non doverne scrivere una per ogni occorrenza (in questo caso ne abbiamo una per "fornitore" ed una per "cliente"

    La funzione proposta prende in esame due argomenti.
    - Il primo Ŕ la stringa dove andare a cercare una data sottostringa.
    - Il secondo argomento, invece, Ŕ un range dove andare a pescare tutte le eventuali occorrenze del caso.

    Il concetto Ŕ cosý pensato:

    in una data tabella, abbiamo una sequela di frasi scritte pi¨ o meno ordinatamente
    In una seconda tabella abbiamo un elenco di possibili rapporti di lavoro (fornitore, cliente, postino, ladro, ..., )
    in una terza tabella abbiamo un elenco di ragioni sociali ( Alfa Spa, Zeta S.r.l., kappa, S.pA, Gino e Figli,...)
    In un ennesima tabella abbiamo un' altra sequela di nomi di cose, di azioni, quello che ci pare...

    La funzione, deve restituire una sottostringa della stringa data, qual' ora questa sia presente nell' elenco...


    Avrei gia voluto postarla ieri ma poi mi sono accorto che non bastava cercare una sottostringa ma bisognava trovare un modo per far si che piccoli errori fossero filtrati.

    Per esempio, Se io scrivo "AlfaS.p.A" e cerco "alfa spa" non trover˛ un riscontro per svariati motivo:

    - Differenza tra minuscole e maiuscole
    - interpunzione e spazi differentementi disposti

    Come ovviare a questo problema che il nostro cervello capisce ma che la macchina non vuol comprendere?

    Bisogna cercare un compromesso perchŔ se uno scrive "ciambella" e vuol trovare "mortadella" non Ŕ cosa semplice. per˛...


    Ecco la funzione... Anzi.. sono due funzioni incapsulate una dentro l' altra...

    La pi¨ esterna, Ŕ quella che riceve i dati e li elabora per restituirci il valore giusto tra quelli elencati.
    La pi¨ interna, viene utilizzata dalla prima per trasformare le varie stringhe a confronto in concatenamenti di sole lettere dell' alfabeto.

    di fatto se cerchiamo "KappA s p. A." nella frase " l' azienda kappa S.p.A, dopo svariati solleciti, continua a non rispondere"
    Il confronto verrÓ effettuato su:

    "KAPPASPA" e LAZIENDAKAPPASPADOPOSVARIATISOLLECITICONTINUAANONRISPONDERE"

    e verrÓ restituito il valore scritto nelal cella: "KappA s p. A."


    vabbŔ passiamo al codice da inserire in un modulo standard RINOMINATO in FunzioniStringa

    Codice: 
    Option Explicit
    Public Function EstraiStringa(ByVal StringaDaDoveEstrarre, ByVal StringheDiConfronto As Range, Optional ByVal RisultatoAlternativo As String = "") As String
        Dim Cella As Range 'Variabile Oggetto utilizzata nel ciclo for
        Dim Posizione As Long 'Posizione del primo carattere della parola cercata nella stringa data
        Dim lunghezza As Long 'Lunghezza della parola cercata
        Dim StringaDaDoveEstrarreNormalizzata As String
        Dim StringaDiConfrontoNormalizzata As String
        
        StringaDaDoveEstrarreNormalizzata = UCase(SoloAlfabeto(StringaDaDoveEstrarre))
        
        For Each Cella In StringheDiConfronto.Cells
            StringaDiConfrontoNormalizzata = UCase(SoloAlfabeto(Cella.Value))
            Posizione = InStr(StringaDaDoveEstrarreNormalizzata, StringaDiConfrontoNormalizzata)
            If Posizione <> 0 Then
                lunghezza = Len(Cella.Value)
                Exit For
            End If
        Next
        If Posizione <> 0 Then
            EstraiStringa = Cella.Value
        Else
            EstraiStringa = RisultatoAlternativo
        End If
    End Function
    
    
    Private Function SoloAlfabeto(ByVal StringaDaElaborare As String) As String
        Dim carattere As String
        Dim ciclo As Long
        For ciclo = 1 To Len(StringaDaElaborare)
            carattere = Mid(StringaDaElaborare, ciclo, 1)
            If (Asc(UCase(carattere)) >= 65) And (Asc(UCase(carattere)) <= 90) Then
                SoloAlfabeto = SoloAlfabeto & carattere
            End If
        Next
    End Function
    Provata qualche volta pare che funzioni benone ma Ŕ sempre meglio fare qualche test in pi¨ e, soprattutto, cercare di migliorarla imparando cosa combina ;)


    Ecco il file funzionante nel quale, per praticitÓ, ho utilizzato la formattazione come tabelle, solo per semplificare l' immisiine dei dati (basta aggiungere un dato sotto le tabelle per far si che ne faccano parte e basta utilizzare il tasto destro per eliminare un record di ogni tabella.

    Credo si a superfluo dirlo ma per utilizzare la funzione basta scrivere:
    =EstraiStringa([CellA contenente la stringa da analizzare]; [range di celle dove pescare le occorrenze])


    File Allegati File Allegati

  18. I seguenti 4 utenti hanno dato un "Like" a dracoscrigno per questo post:


  19. #17
    L'avatar di Marius44
    Clicca e Apri
    Data Registrazione
    Sep 2015
    LocalitÓ
    Catania
    EtÓ
    73
    Messaggi
    3222
    Versione Office
    Excel2010
    Likes ricevuti
    627
    Likes dati
    155

    Re: Come estrarre un testo da una stringa di testo

    Ciao Dracoscrigno

    Complimenti Veramente un ottimo lavoro.

    Ciao,
    Mario

  20. #18
    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: Come estrarre un testo da una stringa di testo

    ottimo non direi. ho appena notato un baco. Da me non ci si pu˛ certo aspettare che tutto fili lisci o come l' olio
    Non Ŕ gravissimo ma potrebbe diventare insinuoso, anceh se con in IF... End If si corregge.

  21. #19
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Come estrarre un testo da una stringa di testo

    Citazione Originariamente Scritto da dracoscrigno Visualizza Messaggio
    ottimo non direi. ho appena notato un baco. Da me non ci si pu˛ certo aspettare che tutto fili lisci o come l' olio
    Non Ŕ gravissimo ma potrebbe diventare insinuoso, anceh se con in IF... End If si corregge.

    A me sembra che funziona bene. Poi il codice non fa differenza tra maiuscole e minuscole.

  22. #20
    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: Come estrarre un testo da una stringa di testo

    prova, nel file allegato, vuotare una cella delle due tabelline. noterai, a seconda di quale cella sia quella vuota, dei cambiamenti nei risultati.

    una possibile correzione Ŕ quella di intercettare questo caso e trattarlo separatamente oppure filtrarlo di modo che non entri nel processo di elaborazione o, ancora, eliminare le celle vuote che, in questo contesto, magari, non devo esserci.

  23. #21
    ProgrammD69
    Ospite L'avatar di ProgrammD69

    Re: Come estrarre un testo da una stringa di testo

    Citazione Originariamente Scritto da dracoscrigno Visualizza Messaggio
    prova, nel file allegato, vuotare una cella delle due tabelline. noterai, a seconda di quale cella sia quella vuota, dei cambiamenti nei risultati.

    una possibile correzione Ŕ quella di intercettare questo caso e trattarlo separatamente oppure filtrarlo di modo che non entri nel processo di elaborazione o, ancora, eliminare le celle vuote che, in questo contesto, magari, non devo esserci.
    Hai ragione ! Cancellando un nome di quelle tabelle, si cancellano pi¨ nomi nella tabella principale.

  24. #22
    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: Come estrarre un testo da una stringa di testo

    lo so di aver ragione:
    la macro l ho costruita io.
    l errore l ho scovato io.

    magari potresti aggiungere qualcoosa di nuovo e pi¨ costruttivo come una possibile soluzione al problema ;)

Discussioni Simili

  1. [Risolto] estrarre un numero di caratteri da una stringa di testo.
    Di Samuela nel forum Domande su Excel in generale
    Risposte: 11
    Ultimo Messaggio: 25/01/17, 10:15
  2. [Risolto] Estrarre elementi di testo da una stringa alfanumerica
    Di SpezzaKorna nel forum Domande su Excel in generale
    Risposte: 12
    Ultimo Messaggio: 30/11/16, 01:13
  3. Primo test di agosto estrarre una lista unica da una stringa di testo
    Di Gerardo ZuccalÓ nel forum Domande su Excel in generale
    Risposte: 42
    Ultimo Messaggio: 05/08/16, 16:27
  4. Estrarre una stringa di testo
    Di aldomattana nel forum Domande su Excel in generale
    Risposte: 13
    Ultimo Messaggio: 23/07/16, 10:32
  5. Estrarre la stringa finale di un testo
    Di Gerardo ZuccalÓ nel forum Domande su Excel in generale
    Risposte: 11
    Ultimo Messaggio: 20/08/15, 15:23

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
  •