Immaginiamo di dover estrarre solo la parte di testo presente in una cella alfanumerica di Microsoft Excel.

Ad esempio la nostra cella contiene Aa 11 bb22cc 33 e abbiamo bisogno di estrarre il testo ovvero ottenere Aa bbcc

Per fare questo inseriamo una funzione personalizzata, aiutandoci con Visual Basic

Dovendo lavorare in ambiente VBA apriamo la relativa finestra.

In Excel 2007
Bottone di Office – Pulsante Opzioni di Excel – Impostazioni generali – Opzione Mostra scheda Sviluppo sulla barra multifunzione
A questo punto ritornando nella finestra di Excel verrà visualizzata anche la Scheda Sviluppo nella quale troviamo il pulsante Visual Basic

In Excel 2010/2013/2016
Scheda File – Opzioni – Personalizzazione barra multifunzione – Selezionare Sviluppo nella sezione Schede principali
A questo punto ritornando nella finestra di Excel verrà visualizzata anche la Scheda Sviluppo nella quale troviamo il pulsante Visual Basic

Nella finestra Visual Basic inserire un nuovo modulo (menù Inserisci – Modulo) quindi copiare il codice riportato qui sotto:

Function SoloTesto(pWorkRng As Range) As String
Dim xValue As String
Dim OutValue As String
xValue = pWorkRng.Value
For xIndex = 1 To VBA.Len(xValue)
    If Not VBA.IsNumeric(VBA.Mid(xValue, xIndex, 1)) Then
        OutValue = OutValue & VBA.Mid(xValue, xIndex, 1)
    End If
Next
SoloTesto = OutValue
End Function

Chiudere la finestra di Visual Basic.

Posizionarsi nella cella in cui si vuole venga restituito solo il testo presente in una cella alfanumerica e digitare la seguente funzione:

=SoloTesto(PWorkRng)

Dove PWorkRng è il riferimento della cella alfanumerica dalla quale si vuole estrarre solamente la parte di testo

Se invece hai solamente bisogno di estrarre solo la parte numerica presente in una cella alfanumerica puoi cliccare qui per le relative istruzioni.

Tradurre un messaggio in Microsoft Teams
Saas-Fee Allalin Race Downhill 2019
Translate »