Justin ha numeri di parte che utilizza abitualmente in un foglio di lavoro, come 660501C016971. Vorrebbe applicare un formato personalizzato alla cella e visualizzare automaticamente il numero di parte con trattini nella posizione corretta, ad esempio 6605-01-C01-6971.

Purtroppo non è possibile farlo con un formato personalizzato. Perché? Perché i formati personalizzati sono per la visualizzazione di numeri, non di testo. C’è un formato di testo, designato dal simbolo “at” (@), ma questo è tutto; non ce ne sono altri e nessun altro può essere definito.

Poiché i formati personalizzati non possono essere utilizzati, resta da trovare una soluzione alternativa. Un modo per farlo è esaminare i numeri di parte e vedere se la parte di testo del numero può essere rimossa e il numero di parte è ancora utilizzabile. Ad esempio, il numero di Justin è 660501C016971. Se il formato per il numero di parte richiede sempre la lettera C nello stesso punto del numero di parte (e nessun’altra possibile lettera lì), è possibile semplicemente eliminare la C e lasciare il numero 660501016971. Poiché si tratta di un numero , puoi sviluppare un formato personalizzato che includa trattini nelle posizioni corrette e la lettera C nella posizione corretta. Il formato personalizzato sarebbe simile a questo:

0000-00-C00-0000

Con il formato applicato a una cella che contiene il numero 660501016971, ti ritroverai con un numero di parte formattato correttamente visualizzato:

6605-01-C01-6971. Tuttavia, questo approccio presenta degli svantaggi. Lo svantaggio più grande è che se vuoi esportare i numeri di parte in un altro programma, magari come file CSV, ciò che finisce per esportare è il numero originale senza la formattazione o la lettera C.

Un’altra soluzione alternativa è utilizzare una formula per visualizzare i numeri di parte nel formato desiderato. È possibile inserirli in una cella senza trattini e quindi utilizzare la formula per aggiungere i trattini nei punti appropriati.

Quando si creano report, quindi, si nasconde semplicemente la colonna che contiene i numeri di parte senza trattini. Ecco una formula che funzionerà, a condizione che il numero di parte senza trattini sia nella cella A1:

=LEFT(A1,4) & "-" & MID(A1,5,2) & "-" & MID(A1,7,3) & "-" & RIGHT(A1,4)

Se lavori un po ‘con i numeri di parte, potresti desiderare un modo per aggiungere e rimuovere facilmente i trattini. Il modo migliore per farlo è con una macro. Puoi sviluppare una macro che ti consentirà di aggiungere e rimuovere i trattini da un numero di parte in un intervallo di celle selezionato. Quello che segue è un esempio di tale macro.

Sub DashesIn()

DoDashes ("In")

End Sub
Sub DashesOut()

DoDashes ("Out")

End Sub
Private Sub DoDashes(What As String)

Dim c As Range     Dim J As Integer

For Each c In Selection.Cells         If c.Value <> "" Then             J = InStr(c.Value, "-")

Select Case What                 Case "Out"

While J > 0                         c.Value = Left(c.Value, J - 1) & _                           Mid(c.Value, J + 1, Len(c.Value))

J = InStr(c.Value, "-")

Wend                 Case "In"

If J = 0 Then                         c.Value = _                           Left(c.Value, 4) & "-" & _                           Mid(c.Value, 5, 2) & "-" & _                           Mid(c.Value, 7, 3) & "-" & _                           Right(c.Value, 4)

End If             End Select         End If     Next c End Sub

Tieni presente che in questo elenco sono presenti tre macro. Il primo (DashesIn) aggiunge trattini a un numero di parte, mentre il secondo (DashesOut)

li rimuove. Seleziona semplicemente le celle contenenti i numeri di parte e quindi esegui la macro che eseguirà l’operazione che desideri.

Sia DashesIn che DashesOut chiamano la routine comune, DoDashes, per eseguire effettivamente il lavoro. La macro esamina tutte le celle nella selezione e quindi esegue qualsiasi operazione sia necessaria sul contenuto di quelle celle.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (3231) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui: