嘗試將單元格中的數據a與單元格b分開。提取電子表格中的確切單詞
我有大約38000線,並在這些線我有需要提取出的描述的諸如大小,顏色,配合等
下面是一個例子的數據。或者數據的任意組合。
我想對尺寸爲:xl顏色:藍色的線條進行提取並放入b c d e列。
同樣只是-Black xl
希望那些提取並放在一個單獨的行。
嘗試將單元格中的數據a與單元格b分開。提取電子表格中的確切單詞
我有大約38000線,並在這些線我有需要提取出的描述的諸如大小,顏色,配合等
下面是一個例子的數據。或者數據的任意組合。
我想對尺寸爲:xl顏色:藍色的線條進行提取並放入b c d e列。
同樣只是-Black xl
希望那些提取並放在一個單獨的行。
首先創建一個簡單的UDF()從短語提取顏色詞:
Public Function GetColor(inpt As String) As String
ary = Array("red", "green", "blue", "white", "black", "gray", "grey", "yellow")
GetColor = ""
For Each a In ary
If InStr(1, LCase(inpt), a) > 0 Then
GetColor = a
Exit Function
End If
Next a
End Function
,並將其應用到列:
你很自然的修改此示例UDF()將包含您的一組顏色詞。然後,您可以創建並使用類似UDF()■提取大小,文章類型等
編輯#1:
用戶定義函數(UDF)是非常容易安裝和使用:
如果保存工作簿,UDF將隨之保存。 如果您在2003年以後使用的是Excel版本,則必須將該文件保存爲.xlsm而非 。XLSX
要刪除UDF:
從Excel使用UDF:
= GetColor(A1)
要了解更多關於一般的宏,請參閱:
http://www.mvps.org/dmcritchie/excel/getstarted.htm
和
http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx
以及有關UDF的細節,請參見:
http://www.cpearson.com/excel/WritingFunctionsInVBA.aspx
宏必須爲此啓用努力!
歡迎來到SO。這不是一個免費的代碼寫入服務,但存在幫助其他人嘗試開發代碼或功能。因此,我們希望通過數據例子,嘗試代碼,實際產出,預期產出,解決問題的研究努力等方式看到明確的問題。請閱讀HELP頁面以獲取有關[如何提出好問題]的信息, (http://stackoverflow.com/help/how-to-ask);還有[如何提供示例](http://stackoverflow.com/help/mcve) –