Excelmacros用于退出数据清理
我想知道是否有人可以帮助我build议如何清理Excel电子表格中的数据。
我有一个很长的名单，我需要通过。 目前，我正在复制一个数据列表（获取一组感兴趣的药物的名称）到Excel中。 但问题是，每一行数据都有我不需要的无关信息。
例如：
Fluoride Updated 7/10/13 Acetaminophen Updated 8/10/13 我想创build一个macros只保留第一个文本（在上面的例子是氟化物和对乙酰氨基酚），并删除其余的。
有什么build议么？ 到目前为止，我已经尝试了“查找”和“全部replace”的方法，但是当然由于每种药物的date不同，所以这是不可行的。
任何援助将不胜感激！
谢谢！
既然你对macros的使用看起来至less有一点灵活性，也许可以使用公式来保留更多的“angular落案例”的灵活性。 例如：
=LEFT(A1,FIND(" ",A1))
在这种情况下（不太可能），所有的药物名称都不包含空格，或者更有希望：
=LEFT(A1,FIND("Updated",A1)-2)
所有条目都包括“更新”。
对结果进行sorting应该指出分析不合适的地方，并允许进一步调整以适应。
最简单的方法是创build一个macros，将文本以空格作为分隔符
这假设数据在Sheet1的第一列
Dim shtWorking As Worksheet Set shtWorking = Worksheets("Sheet1") shtWorking.Columns(1).TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _ TextQualifier:=xlNone, ConsecutiveDelimiter:=True, Tab:=False, Semicolon _ :=False, Comma:=False, Space:=True, Other:=False, FieldInfo:=Array( _ Array(1, 2), Array(2, 1), Array(3, 1)), TrailingMinusNumbers:=True