返回列表 上一主題 發帖

[發問] 顯示乘積

回復 1# PJChen

Sub ex()
Dim arr As Variant
arr = Split([D2], "*")
[e2] = "=" & arr(0) * arr(1) * arr(2)
End Sub

TOP

回復 4# PJChen

Sub ex()
Dim arr As Variant
arr = Split([D2], "*")
[e2] = "=" & arr(0) & "*" & arr(1) & "*" & arr(2)
End Sub

TOP

回復 6# PJChen

方法很多種,視個人習慣使用
簡單點加個"="
Sub ex()
[e2] = "=" & [D2]
End Sub

TOP

        靜思自在 : 不要隨心所欲,要隨心教育自己。
返回列表 上一主題