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

¤@Àx¦s®æ ¥ÎIF ¦h§PÂ_¦¡ Åã¥Ü¤£¦P­Èor¤å¦r

¨Ï¥ÎSwitch³B²z

Private Sub Worksheet_Change(ByVal Target As Range)
[a1] = Switch([b1] = "§A", "¤þ", [b1] = "§Ú", "¤A", [b1] = "¥L", "¥Ò")
End Sub

TOP

        ÀR«ä¦Û¦b : ¤@­Ó¤Hªº§Ö¼Ö¡D¤£¬O¦]¬°¥L¾Ö¦³±o¦h¡A¦Ó¬O¦]¬°¥L­p¸û±o¤Ö¡C
ªð¦^¦Cªí ¤W¤@¥DÃD