| ©«¤l2843 ¥DÃD10 ºëµØ0 ¿n¤À2899 ÂI¦W0  §@·~¨t²Î¡e²¤¡f ³nÅ骩¥»¡e²¤¡f ¾\ŪÅv100 ©Ê§O¨k ¨Ó¦Û¡e²¤¡f µù¥U®É¶¡2013-5-13 ³Ì«áµn¿ý2025-10-18 
 | 
                
| Sub Splitbook() AA = InputBox("½Ð¿é¤J±K½X")
 If AA = "" Then Exit Sub
 If AA <> "12345" Then MsgBox "¡°±K½X¿ù»~! ": Exit Sub
 ¡@
 ¡ã¡ã±µ¥t¦sÀɵ{¦¡½X¡ã¡ã
 End Sub
 
 ±K½X¥¼¿é¤J©Î¿ù»~¡Aª½±µ¸õ¶}¡A¤£»Ý¹ï«ö¶s¥t§@³B²z¡ã¡ã
 | 
 |