[µo°Ý] ½Ð±Ð =µ¥¸¹ »P Tab ªº°ÝÃD

verify9k

½Ð°Ý¦³¤H¥i¥HÀ°§Ú¸Ñµª¶Ü:
  ©³¤Uªº¸ê®Æ¤ù¬q¬O§Ú¹J¨ìªº¨â­Ó°ÝÃD,¦ý¬O­­©ó¯à¤O,¥Ø«e³£¬O¤â°Ê­×§ï,
  §Æ±æ¯à¦³¾÷·|¥Î VBA ¸Ñ¨M.

  °ÝÃD(1) ²Ä8¦æ¶}©lªº¸ê®Æ¬O =+A7PIN,¦ü¥G¬O¦]¬°¤º§t¦³ "µ¥¸¹"ªº­ì¦],
                ¥u­n VBA ¤@«ü©w³o­Ó¸ê®Æ¦s¦bªº Range,VBA Á`¬O¥ß§Y»¡
                "¸ê®Æ«¬ºA¤£²Å",½Ð°Ý¸Ó¦p¦ó¸Ñ¨M,Åý VBA Ä@·N³B²z ??
                §Ú¥Ø«e³£¬O¥ý¤â°Ê±N "µ¥¸¹"®³±¼,«áÄò¦A¥Î VBA ³B²z......
                ·íµM,=+A10K »P =+A11K ªº±¡§Î¤]¤@¼Ë,¥u­n®³±¼ "µ¥¸¹",
                VBA ´NÄ@·N³B²z¤F.......
                *******************************
                .subckt MTP_LOGIC A2 A2B A3 A3B A4B
               =+A7PIN A8B A8BC A8I A8IC A9B A9B
               =+A10K BS0 CENB_RDMDB CEN_ERMDB
               =+A11K EN6V EN6V5 EN8V EN8V5
               .................

   °ÝÃD(2) ¥H¤W¸ê®Æ§Ú¬O¥ý±q¨ä¥L Editor copy ¶K¦Ü²Ä¤@®æ,µM«á¥Î
                 "¸ê®Æ­åªR"©î¨ì¨ä¥L´X­Ó Range,µM«á¦A¼g VBA³B²z¨C­Ó Range ªº
                 ¸ê®Æ,·í³B²z§¹,¶K¦^ Editor ®É, µoı¨C­Ó¸ê®Æ¤§¶¡³£¬O Tab,¦Ó«DªÅ®æ,
                 ½Ð°Ý,­Y¬O§Ú·Q¶K¦^ Edit ®É¬°ªÅ®æ,¸Ó«ç»ò°µ©O ??

                 ÁÂÁ¸ѵª.........

samwang

¦^´_ 1# verify9k

¤è«Kªþ¤WÀɮשM´£¨Ñ»Ý¨Dµ²ªG¡AÁקK¸ÑŪ¦³»~¡AÁÂÁÂ

quickfixer

¦^´_ 1# verify9k

1. Sub test1()
   
2.    
   
3.     Range("a1").NumberFormatLocal = "@"
   
4.     Range("a1") = "=+a7pin"
   
5.    
   
6. End Sub
   
7. 
   
8. Sub test2()
   
9.     Range("a2") = "'" & "=+a7pin"
   
10. End Sub
    
11. 
    
12. 
    
13. Sub test3()
    
14.     a$ = "a" & vbTab & "b"
    
15.     Debug.Print a$
    
16.     Debug.Print Replace(a$, vbTab, " ")
    
17.     Debug.Print Replace(a$, Chr(9), " ")
    
18. End Sub

½Æ»s¥N½X

singo1232001

¦^´_ 3# quickfixer


    Range("a1") = "'=+a7pin"