Tirando Personaggi Oltre a una lunga serie

John ha un foglio che, colonna A, ha un gran numero di stringhe di testo molto lunghi. Deve tirare singolarmente i primi 249 caratteri di ogni stringa, ponendo un singolo carattere in ciascuna cella a destra della stringa.

Ci sono un paio di modi in cui è possibile eseguire questa operazione. È abbastanza facile da fare attraverso l'uso di una semplice formula. Ad esempio, se la prima stringa di testo si trova nella cella A1, inserire la seguente formula alla sua destra, nella cella B1:

= MID ($ A1, COLONNA () - 1,1)

Questa formula utilizza le funzioni del foglio di lavoro di Excel per separare la stringa di testo. La funzione COLONNA, in questo caso, restituisce il valore 2 poiché la formula è nella colonna B e che è la seconda colonna nel foglio di lavoro. Questo valore viene decrementato di 1, e poi usato come un puntatore nella stringa nella cella A1, di stampa nella quale il personaggio estratto deve provenire. Quando si copia questo diritto formula, per tuttavia molte cellule desiderate, si finisce con singoli caratteri dalla stringa, in ordine consecutivo.

Naturalmente, se si dispone di un bel paio di stringhe nel foglio di lavoro (come fa John), quindi copiare questa formula oltre 249 colonne e giù, per esempio, diverse centinaia di righe possono fare per un foglio di lavoro molto lento. In tali situazioni può essere desiderabile utilizzare una macro per frammentarsi corde invece di una formula. La seguente macro, SplitUp, è un approccio a fare lo strappo reale a parte.

Sub SplitUp ()
Dim c come gamma
R Dim come gamma
Dim sTemp As String
Z Dim As Integer

Set r = Range ("A1", Range ("A65536"). End (xlUp))
For Each c In r
sTemp = Left (c, 249)
Per z = 1 Per Len (sTemp)
c.Offset (0, z) = Mid (sTemp, z, 1)
Successivo z
Il Prossimo
End Sub

Si avvia la macro definendo un intervallo (r) che consiste di tutte le celle nella colonna A che contengono valori. La variabile c viene poi utilizzato per rappresentare ogni cella dell'intervallo, ei primi 249 caratteri tirato da ciascuna cella. Un ciclo For ... Next viene quindi utilizzato per estrarre ogni carattere dalla stringa e cose in una cella a destra della stringa.

ExcelTips è la vostra fonte per la formazione Microsoft Excel conveniente. Questo suggerimento (2790), si applica a Microsoft Excel 97, 2000, 2002, e 2003. È possibile trovare una versione di questo suggerimento per l'interfaccia ribbon di Excel (Excel 2007 e versioni successive) qui: Pulling Apart caratteri di una stringa lunga.