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

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

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

½Ð¬Ýªþ¥ó
A1=3
B1=5
C1=A1*B1=15
­Y§ï°ÊA1¡AC1ªº­È¤]·|¸òµÛÅÜ
    ex. A1=4¡A«hC1= 4 * 5 =20
¦P²z­Y§ï°ÊB1¡AC1ªº­È¥ç·|ÅÜ°Ê¡C

§Ú·Q§âIJµoC1¹Bºâªº®æ¤l§ï¦¨¥u¦³A1¡AB1Åܰʤ£·|¨ÏC1¹Bºâ¡A°ß¦³A1Åܰʤ~°µ¹Bºâ
ªO¤W½¤F«Ü¦h¤å³¹³£§ä¤£¨ì¡A·Q½Ð°Ý¦³¤j¯«ª¾¹D¸Ó«ç»ò°µ¶Ü?

PS. C1ªº¤½¦¡­n¬OA1*B1³á!

¤½¦¡.rar (6.06 KB)

¯uªº«ÜÃø...§Ú¬Oªì¾ÇªÌ...¦ýÀ³¸Ó¥i¥H§âA1¨C¦¸¿é¤Jªº­È³£¦^¶Ç¤´¬°¤½¦¡ªºªì©l­È, ·íªì©l­ÈÅçÃÒ¨ìÅܧó¤~·|¿Eµo²Vºâ
«Ü¦n©_³o­Ó¤½¦¡¬O­n°µ¤°»ò¥Î

TOP

¥»©«³Ì«á¥Ñ hcm19522 ©ó 2017-2-9 11:34 ½s¿è

¤@¯ë¬O¦Û°Ê¹Bºâ ,­Y§ï¤â°Ê¹Bºâ ,¿é¤JA1 OR B1 ,C1¤£ÅÜ  ;­«·s¹Bºâ-->§R "=" ¦A¦^´_ "="-->ENTER
¬O¦p¦¹ ?
¹Bºâ§ïÅÜ-->奌"¤½¦¡"-->³Ì¥kÃä "¹Bºâ¿ï¾Ü"

TOP

¥»©«³Ì«á¥Ñ ªü¼ä ©ó 2017-2-9 15:40 ½s¿è

½Ð°Ý¬OB1¥Ã»·µ¥©ó5¶Ü¡H
=A1*IF(B1<>5,5,B1)

A1B1.rar (6.5 KB)

TOP

¤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

¨S¿ù»Ý­nVBAÀx¦s®æIJ°Êµ{¦¡¨Ó§¹¦¨

TOP

¦^´_ 5# ML089

½Ð±Ð¤@¤U¡A³o¼Ë¦pªG§Ú§ï¤F B1 ªº­È¡]°²³]±q 5->6¡^¡AC1 ªº­È¤£·|ÅܨS¿ù¡C
¤£¹L§Ú¦pªG¤S§ï¤F A1¡]°²³]±q 3->4¡^¡AC1 ÁÙ¬O·|Åܦ¨ 4*6=24¡C
¦³¿ìªk¥Î VBA Åý¥¦Åܦ¨ 4*5=20¶Ü¡H

§Ú¥u¦³·Q¨ì¥Î«OÅ@¤u§@ªíÂê©w B1¡C
©Î¬O Workbook open ¬ö¿ý B1 ªº­È¡CÅý¥L©T©w¡C

ÁÂÁ¡I

TOP

¦^´_ 7# denniswave

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

TOP

        ÀR«ä¦Û¦b : ¡i¦æµ½­n¤Î®É¡j¦æµ½­n¤Î®É¡A¥\¼w­n«ùÄò¡C¦p¿N¶}¤ô¤@¯ë¡A¥¼¿N¶}¤§«e¤d¸U¤£­n°±º¶¤õ­Ô¡A§_«h­«¨Ó´N¤Ó¶O¨Æ¤F¡C
ªð¦^¦Cªí ¤W¤@¥DÃD