NO.1

表格分列在Excel應(yīng)用中使用不是很普遍，至少在一些初學(xué)者操作當(dāng)中并不了解。

甚至對(duì)于表格列的概念都感覺(jué)十分模糊，那么，什么是表格分列？會(huì)不會(huì)和表格拆分混淆呢？

本節(jié)介紹一下表格如何分列，應(yīng)用VBA代碼對(duì)表格如何進(jìn)行分列操作。

NO.2

什么是分列

簡(jiǎn)單來(lái)講就是把一列表格分成多列表格。

深入來(lái)說(shuō)要把一列表格的內(nèi)容拆分成多列，分別填充到多列表格里面。

比如一個(gè)單元格內(nèi)保存著一個(gè)電話號(hào)碼：86-010-1234567，其包含國(guó)家代碼-地區(qū)代碼-電話代碼，三個(gè)部分。

想要把這個(gè)三個(gè)部分分別保存到不同的單元格里，怎么辦？

Ctrl C粘貼、Ctrl V復(fù)制，還是手動(dòng)輸入？

這樣也可以，但是如果有幾萬(wàn)個(gè)這樣的數(shù)據(jù)，依然要粘貼\復(fù)制嗎，手動(dòng)輸入顯然很愚蠢。

這就需要分列操作。

很簡(jiǎn)單，使用如下代碼：

Range("B3:B100").Parse"[xxx][xxxxxxx]",Range("C3")

假定電話保存在B3:B100單元格。

執(zhí)行之后，就把國(guó)家代碼、區(qū)號(hào)、電話號(hào)碼分別填充到以C3開(kāi)始的單元格里了。

如下圖：

NO.3

Parse方法官方說(shuō)明

分列區(qū)域內(nèi)的數(shù)據(jù)并將這些數(shù)據(jù)分散放置于若干單元格中。 將區(qū)域內(nèi)容分配于多個(gè)相鄰接的列中；該區(qū)域只能包含一列。

語(yǔ)法

Range.Parse(ParseLine,Destination)

具體參數(shù)如下圖：

NO.4

示例

本示例以電話號(hào)碼為分列對(duì)象，把區(qū)號(hào)和電話分別拆分到兩列當(dāng)中。

其實(shí)掌握要點(diǎn)之后，使用還是十分簡(jiǎn)單的。

下面介紹一下參數(shù)重點(diǎn)。

參數(shù)ParseLine：

包含方括號(hào)的字符串，用以指明在何處拆分單元格。

如[XXX] [XXXXXXX]指明了前3位和后7位字符要拆分出來(lái)，用“[]”括起來(lái)，中間要加空格。

一定要加空格不然，會(huì)得到一個(gè)錯(cuò)誤。

參數(shù)Destination：

一個(gè)代表用于放置分列數(shù)據(jù)的目標(biāo)區(qū)域的左上角的 Range 對(duì)象。 如果省略該參數(shù)，Microsoft Excel 將在原處進(jìn)行分列。

意思就是拆分后的數(shù)據(jù)，保存數(shù)據(jù)位置的左上角單元格對(duì)象。

實(shí)際上就是確定拆分后的數(shù)據(jù)要保存的左上角位置。

多做一些練習(xí)就會(huì)明白。

NO.5

示例代碼

本示例以拆分電話號(hào)碼86-010-1234567為例，分別將拆分后的數(shù)據(jù)保存到其下一列單元格。

PrivateSubParseRange()DimParseRangeAsRange,RAsRangeSetParseRange=SelectionForEachRInParseRangeIfVBA.Len(R)=0ThenGoToNex100WithR.Parse"[XX][XXX][XXXXXXX]",.Offset(0,1)With.Offset(0,1).Formula="=Text("&.Value&","&"""00"")"EndWithWith.Offset(0,2).Formula="=Text("&.Value&","&"""000"")"EndWithWith.Offset(0,3).Formula="=Text("&.Value&","&"""0000000"")"EndWithEndWithNex100:NextREndSub

如發(fā)現(xiàn)上面的代碼比較難理解可以使用如下代碼：

Range("b3:b100").Parse"[xx][xxx][xxxxxxx]",Range("c3")

此行代碼將B3:B100列數(shù)據(jù)拆分為三個(gè)字符，字符長(zhǎng)度分別為2、3、7,也就是國(guó)家代碼、區(qū)號(hào)和電話號(hào)碼長(zhǎng)度，然后依次保存到C3開(kāi)始的單元格里。

NO.6

分列操作在實(shí)際應(yīng)用中真的很有大用處，如果應(yīng)用得當(dāng)，會(huì)將很多簡(jiǎn)單而又重復(fù)的工作變得十分輕松。這不是假話，一定要學(xué)會(huì)。

歡迎關(guān)注、收藏