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

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

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

½Ð°Ý¦³¤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 ??

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

¦^´_ 3# quickfixer


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

TOP

¦^´_ 1# verify9k
  1. Sub test1()
  2.    
  3.     Range("a1").NumberFormatLocal = "@"
  4.     Range("a1") = "=+a7pin"
  5.    
  6. End Sub

  7. Sub test2()
  8.     Range("a2") = "'" & "=+a7pin"
  9. End Sub


  10. Sub test3()
  11.     a$ = "a" & vbTab & "b"
  12.     Debug.Print a$
  13.     Debug.Print Replace(a$, vbTab, " ")
  14.     Debug.Print Replace(a$, Chr(9), " ")
  15. End Sub
½Æ»s¥N½X

TOP

¦^´_ 1# verify9k

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

TOP

        ÀR«ä¦Û¦b : ·O´d¨S¦³¼Ä¤H¡A´¼¼z¤£°_·Ð´o¡C
ªð¦^¦Cªí ¤W¤@¥DÃD