Excel公式。电子表格公式
问题描述:
以下是每个单词前的数字。是否有任何相同的公式来删除电子表格中每个单词的开头数字。这是公式的链接how to insert numbers before every word in excelExcel公式。电子表格公式
Sub test()
Dim cl As Range, i&
Set cl = Cells.Find("*")
For i = 1 To WorksheetFunction.CountA(Cells)
If Not cl Is Nothing Then
cl.Value2 = i & "/" & cl.Value2
Set cl = Cells.FindNext(cl)
Else
Exit For
End If
Next i
End Sub
答
使用相同的代码,但而不是插入的数目由
Sub test()
Dim cl As Range, i&
Set cl = Cells.Find("*")
For i = 1 To WorksheetFunction.CountA(Cells)
If Not cl Is Nothing Then
cl.Value2 = RIGHT(cl.Value2,LEN(cl.Value2)-InStr(cl.Value2, "/")-1)
Set cl = Cells.FindNext(cl)
Else
Exit For
End If
Next i
End Sub
你需要解决的最后两年以前的问题提供了答案([这里]删除(http://*.com/questions/34677235/how-to-insert-numbers-before-every-word-in-excel)和[这里](http://*.com/questions/35388574/excel-在第一次询问同样的事情之前,我怎样才能删除数字和斜杠)。急躁不是美德。有没有人回答的问题可能会导致解决方案,并且您没有提供可行的反馈意见给已提交的答复。 – Jeeped
我投票关闭这个问题作为题外话,因为这是同一个问题的第三个化身([Excel如何删除数字和斜杠在电子表格中每个单词的开头](http://*.com/questions/35388574)和第二部分[如何在Excel中的每个单词之前插入数字](http://*.com/questions/34677235))。 – Jeeped