ªð¦^¦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 : ªY½à§O¤H´N¬O²øÄY¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD