单元格多个空格数据累加

zhgcjl

单元格多个空格数据累加单元格多个空格数据：2.358 45.32 98.456 1.589  达到效果：=2.358+45.32+98.456+1.589

zhgcjl

刚才急，忘记附件，谢谢各位大神帮帮我！

zax010

For i = 2 To [b65536].End(3).Row
    Cells(i, "G") = "=" & Join(Split(Cells(i, 2), " "), "+")
Next

凌空一羽

1. Sub lkyy()
   
2. For i = 2 To Sheet1.UsedRange.Rows.Count
   
3.     Cells(i, "g") = Evaluate(Replace(Cells(i, 2), " ", "+"))
   
4. Next
   
5. End Sub

复制代码

hopeson2010

1. Sub ek_sky()
   
2. Dim s As String
   
3.    s = "2.358 45.32 98.456 1.589"
   
4.    MsgBox Evaluate(Replace(s, " ", "+"))
   
5. End Sub
   

复制代码

zhgcjl

如下面的单元格数字不同时又如何计算

zhgcjl

谢谢3楼问题解决了

zhgcjl

请问3楼B列取数后，以下各行都不得重复，代码该如何写