TextToColumns Method [Excel 2003 VBA Language Reference]
Parses a column of cells that contain text into several columns.
expression.TextToColumns(Destination, DataType, TextQualifier, ConsecutiveDelimiter, Tab, Semicolon, Comma, Space, Other, OtherChar, FieldInfo, DecimalSeparator, ThousandsSeparator, TrailingMinusNumbers)
expression Required. An expression that returns one of the objects in the Applies To list.
Destination Optional Variant. A Range object that specifies where Microsoft Excel will place the results. If the range is larger than a single cell, the top left cell is used.
|XlTextParsingType can be one of these XlTextParsingType constants.|
|XlTextQualifier can be one of these XlTextQualifier constants.|
ConsecutiveDelimiter Optional Variant. True to have Microsoft Excel consider consecutive delimiters as one delimiter. The default value is False.
Tab Optional Variant. True to have DataType be xlDelimited and to have the tab character be a delimiter. The default value is False.
Semicolon Optional Variant. True to have DataType be xlDelimited and to have the semicolon be a delimiter. The default value is False.
Comma Optional Variant. True to have DataType be xlDelimited and to have the comma be a delimiter. The default value is False.
Space Optional Variant. True to have DataType be xlDelimited and to have the space character be a delimiter. The default value is False.
Other Optional Variant. True to have DataType be xlDelimited and to have the character specified by the OtherChar argument be a delimiter. The default value is False.
OtherChar Optional Variant (required if Other is True). The delimiter character when Other is True. If more than one character is specified, only the first character of the string is used; the remaining characters are ignored.
|XlColumnDataType can be one of these XlColumnDataType constants.|
xlMDYFormat. MDY Date
xlDMYFormat. DMY Date
xlYMDFormat. YMD Date
xlMYDFormat. MYD Date
xlDYMFormat. DYM Date
xlYDMFormat. YDM Date
xlEMDFormat. EMD Date
xlSkipColumn. Skip Column
You can use xlEMDFormat only if Taiwanese language support is installed and selected. The xlEMDFormat constant specifies that Taiwanese era dates are being used.
The column specifiers can be in any order. If a given column specifier is not present for a particular column in the input data, the column is parsed with the General setting. This example causes the third column to be skipped, the first column to be parsed as text, and the remaining columns in the source data to be parsed with the General setting.
Array(Array(3, 9), Array(1, 2))
If the source data has fixed-width columns, the first element of each two-element array specifies the starting character position in the column (as an integer; 0 (zero) is the first character). The second element of the two-element array specifies the parse option for the column as a number from 1 through 9, as listed above.
The following example parses two columns from a fixed-width file, with the first column starting at the beginning of the line and extending for 10 characters. The second column starts at position 15 and goes to the end of the line. To avoid including the characters between position 10 and position 15, Microsoft Excel adds a skipped column entry.
Array(Array(0, 1), Array(10, 9), Array(15, 1))
DecimalSeparator Optional String. The decimal separator that Microsoft Excel uses when recognizing numbers. The default setting is the system setting.
ThousandsSeparator Optional String. The thousands separator that Excel uses when recognizing numbers. The default setting is the system setting.
TrailingMinusNumbers Optional Variant. Numbers that begin with a minus character.
The following table shows the results of importing text into Excel for various import settings. Numeric results are displayed in the rightmost column.
|System decimal separator||System thousands separator||Decimal separator value||Thousands separator value||Original text||Cell value (data type)|
|Period||Comma||Period||Comma||123 123.45||123 123.45 (text)|
|Period||Comma||Period||Space||123 123.45||123,123.45 (numeric)|
This example converts the contents of the Clipboard, which contains a space-delimited text table, into separate columns on Sheet1. You can create a simple space-delimited table in Notepad or WordPad (or another text editor), copy the text table to the Clipboard, switch to Microsoft Excel, and then run this example.
Worksheets("Sheet1").Activate ActiveSheet.Paste Selection.TextToColumns DataType:=xlDelimited, _ ConsecutiveDelimiter:=True, Space:=True