如何修剪列中每个单元格中的文本?
如果语法如下:“blabla@twitter.com(名称名称)”,我想从列中的所有单元格中删除“@ twitter.com(名称名称)”,只留下“blabla”细胞
有什么想法吗?
答案 0 :(得分:2)
找到解决方案:
Dim cellHolder As String
For Each cell In Range("A1:A10")
cellHolder = cell.Value
cellHolder = Left(cellHolder, InStr(cellHolder, "@") - 1)
cell.Value = cellHolder
Next cell
答案 1 :(得分:1)
您无需使用VBA即可在Excel中实现此目的。
假设您的文本位于A列中,则每行的相邻列中的以下公式将执行您的示例所需的内容。
=LEFT(A1,FIND("@",A1)-1)
您可能需要根据输入数据详细说明,以解决文本中没有@字符的情况。