ªð¦^¦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 : ¦a¤WºØ¤Fµæ¡A´N¤£©öªø¯ó¡F¤ß¤¤¦³µ½¡A´N¤£©ö¥Í´c¡C
ªð¦^¦Cªí ¤W¤@¥DÃD