ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] Åã¥Ü­¼¿n

¦^´_ 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

¤èªk«Ü¦hºØ,µø­Ó¤H²ßºD¨Ï¥Î
²³æÂI¥[­Ó"="
Sub ex()
[e2] = "=" & [D2]
End Sub

TOP

        ÀR«ä¦Û¦b : §Ú­Ì³Ì¤jªº¼Ä¤H¤£¬O§O¤H¡D¥i¯à¬O¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD