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

[µo°Ý] «¬ºA¤£²Å¦X ?½Ð±Ð­n¦p¦ó­×¥¿?

¦^´_ 1# t8899
¥H¤U¾Ç²ß¤è®×½Ð«e½ú°Ñ¦Ò
Sub TEST()
bb = 70
With Sheets("¦ÛÀç§ë«H").Range("c3:c" & bb)
   .Value = "=ROUND(sheet2!K3/1000,0)"
   .Value = .Value
End With
End Sub
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

¦^´_ 5# t8899

ÁÂÁ«e½ú«ü±Ð,¥H¤U¤èªk¤]½Ð°Ñ¦Ò
[¦ÛÀç§ë«H!C3].Resize(70) = "=ROUND(sheet2!K3/1000,0)"
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

¥»©«³Ì«á¥Ñ Andy2483 ©ó 2024-3-14 13:54 ½s¿è

¦^´_ 7# shuo1125

Evaluate¤èªk«Ü¹ê¥Î,¥i¬O±`±`·|§Ñ¤F¥Î
https://learn.microsoft.com/zh-t ... pplication.evaluate

¥H¤U½×¾Â³sµ²©« ½Ð°Ñ¦Ò
https://forum.twbts.com/viewthre ... amp;page=3#pid54150
¥Î¦æ°Ê¸Ë¸mÂsÄý½×¾Â¾Ç²ß«Ü¤è«K,ÁÂÁ½׾¸gÀç¹Î¶¤
½Ð¤j®a¤@°_¤W½×¾Â¨Ó¥æ¬y

TOP

        ÀR«ä¦Û¦b : ¤Hªº²´·úªø¦b«e­±¡A¥u¬Ý¨ì§O¤Hªº¯ÊÂI¡Aµ·²@¬Ý¤£¨ì¦Û¤vªº¯ÊÂI¡C
ªð¦^¦Cªí ¤W¤@¥DÃD