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

½Ð°Ý ªþ¥óªºµ{¦¡½X¸Ó¦p¦ó§ïµ½?

½Ð°Ý ªþ¥óªºµ{¦¡½X¸Ó¦p¦ó§ïµ½?

½Ð°Ýª©¥D

§Úª½±µ½Æ»s²Ä¤@¬qµ{¦¡½X°µ²Ä¤G¬q  ¥i¬O²Ä¤G¬q«o³£µLªk¹B§@
·Q°Ý¸Ó¦p¦ó§ïµ½?  ·PÁÂ~

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Address <> "$D$13" Then Exit Sub
If Target = "­¿¼Æ" Then [D27:D27] = "" Else [D27:D27].FormulaR1C1 = "¬Y¤½¦¡"

'¥H¤U¬O²Ä¤G¬q
If Target.Address <> "$E$13" Then Exit Sub
If Target = "­¿¼Æ" Then [E27:E27] = "" Else [E27:E27].FormulaR1C1 = "¬Y¤½¦¡"
End Sub

        ÀR«ä¦Û¦b : ºÉ¦h¤Ö¥»¥÷¡A´N±o¦h¤Ö¥»¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD