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

[µo°Ý] EXCEL¤½¦¡°ÝÃD (ÆZ§xÃøªº)

¤U¸ü´ú¸ÕÀÉ®× http://www.FunP.Net/920044

¦Û°Ê­pºâ§ï¬°¤â°Ê
»Ý­n¥ÎVBA
Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Column = 1 Then
        Target(1, 3).Calculate
    End If

End Sub
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 7# denniswave

¥Î«OÅ@¤u§@ªíÂê©w B1¡A¥u¯d¯à­×§ïªº¦ì¸m¡C
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

        ÀR«ä¦Û¦b : ¡i¬O§_µo´§¤F¨}¯à¡H¡j¤H¶¡¹Ø©R¦]¬°µu¼È¡A¤~§óÅã±o¬Ã¶Q¡CÃø±o¨Ó¤@½ë¤H¶¡¡AÀ³°Ý¬O§_¬°¤H¶¡µo´§¤F¦Û¤vªº¨}¯à¡A¦Ó¤£­n¤@¨ý¨Dªø¹Ø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD