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

[µo°Ý] Âê©w¬¡­¶¦WºÙ

[µo°Ý] Âê©w¬¡­¶¦WºÙ

¥»©«³Ì«á¥Ñ vinejason ©ó 2018-1-25 14:39 ½s¿è

½Ð°Ý¦p¦ó°µ¨ì
©T©wsheet ¦WºÙ©O ? (¤£­ã§ó§ï)
»P¶}©ñ§ó§ï¦WºÙ



















)
µL¤îºÉªº§V¤O¤W¶i

¦^´_ 1# vinejason

¬O§_¦³§ó¨ãÅ骺»¡©ú

¤°»ò®É­Ô¤£¯à§ï?

USER­n°µ¤°»ò°Ê§@¤~¯à§ï?
¥Î¥\¨ì¥@¬É¥½¤é¨º¤@¤Ñ¡ã¡ã¡ã

TOP

¦^´_ 2# li_hsien

¥u¬O³æ¯Â·Q¨ì¬O§_¥i¥HÂê©w¦WºÙ°Õ
µL¤îºÉªº§V¤O¤W¶i

TOP

§ä¨ìµª®×¤F
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
   BefVal = Target
   If ActiveSheet.Name <> "¼t°Ó¸ê®Æ" Then '¤£¤¹³\§ó¦W
         ActiveSheet.Name = "¼t°Ó¸ê®Æ"
  End If
End Sub
µL¤îºÉªº§V¤O¤W¶i

TOP

        ÀR«ä¦Û¦b : Ãø¦æ¯à¦æ¡AÃø±Ë¯à±Ë¡AÃø¬°¯à¬°¡A¤~¯àª@µØ¦Û§Úªº¤H®æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD