ªð¦^¦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³B¥@­n¤p¤ß²Ó¤ß¡A¦ý¤£­n¡u¤p¤ß²´¡v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD