starbox520

¦^´_ 109# c_c_lai


    ³£­n§â¥¦¬Ý¦¨¤@¼Ë~
     ¥H¤H¨Ó§PŪªº¸Ü´N¹³§Ú¿z¿ïªº®É­Ô¡A§Ú¬Ý¨ìQFBGA   §Ú´N·|¥h¤u§@ªí2   §â¦³BGA³o3­Ó¦r³£¿z¥X¨Ó    (BGA   .  XXBGA....)
                                                                     ¬Ý¨ì  GG QFN     §Ú´N·|¥h¤u§@ªí2   §â¦³QFN³o3­Ó¦rªº³£¿z¥X¨Ó

c_c_lai

¦^´_ 110# starbox520
§ÚÁÙ¬O¥ýÅý²´·ú¥ð®§¤@¤U§a¡A
¤£µM³s²´·ú¤]·|¸òµÛ¿ù¶Ãªº¡I

c_c_lai

¦^´_ 110# starbox520
§ÚÁÙ¬O¥ýÅý²´·ú¥ð®§¤@¤U¡A
¤£µM²´·ú¤]·|¸òµÛ¿ù¶Ãªº¡I

starbox520

¦^´_ 113# c_c_lai


    C¤j±z¥ý¥h¥ð®§XD

c_c_lai

¦^´_ 114# starbox520
³o¬O§Ú¬°¨D½T»{¡A¦A¦¸¾ã²z¥[µùªº§Aªº¦^Âж°¡C
¶·¬Ý¤F¼Æµf¦¸«á¡A©l±o«éµM¤j®© What are you talking about¡C
Ãø©Ç§Ú²´·úµø¤O«ì´_¦a¦p¦¹ºC¡I
Txt.rar (913.16 KB)

¤U¸ü¦¸¼Æ: 3

2016-12-24 08:17

c_c_lai

¦^´_ 111# starbox520

1.                 Select Case cts
   
2.                     Case 3      '  ²Ä 3 ºØ¿z¿ï¤è¦¡¡G TR±Æ¾÷&²£¥X    E F G H   (¤u§@ªí2        A B C D)
   
3.                         '  tf = arSh2(ct2, 1) = Adt_Rng.Offset(, -1) And arSh2(ct2, 2) = Adt_Rng.Value And arSh2(ct2, 3) = Adt_Rng.Offset(, 1) And arSh2(ct2, 4) = Adt_Rng.Offset(, 2)
   
4.                         tf = arSh2(ct2, 1) = Adt_Rng.Offset(, -1) And Right(arSh2(ct2, 2), 3) = Right(Adt_Rng.Value, 3) And arSh2(ct2, 3) = Adt_Rng.Offset(, 1) And arSh2(ct2, 4) = Adt_Rng.Offset(, 2)
   
5.                     Case 4      '  ²Ä 4 ºØ¿z¿ï¤è¦¡¡G TR±Æ¾÷&²£¥X      F G H   (¤u§@ªí2          B C D)
   
6.                         '  tf = arSh2(ct2, 2) = Adt_Rng.Value And arSh2(ct2, 3) = Adt_Rng.Offset(, 1) And arSh2(ct2, 4) = Adt_Rng.Offset(, 2)
   
7.                         tf = Right(arSh2(ct2, 2), 3) = Right(Adt_Rng.Value, 3) And arSh2(ct2, 3) = Adt_Rng.Offset(, 1) And arSh2(ct2, 4) = Adt_Rng.Offset(, 2)
   
8.                     Case 5      '  ²Ä 5 ºØ¿z¿ï¤è¦¡¡G TR±Æ¾÷&²£¥X      F G     (¤u§@ªí2          B C  )
   
9.                         '  tf = arSh2(ct2, 2) = Adt_Rng.Value And arSh2(ct2, 3) = Adt_Rng.Offset(, 1)
   
10.                         tf = Right(arSh2(ct2, 2), 3) = Right(Adt_Rng.Value, 3) And arSh2(ct2, 3) = Adt_Rng.Offset(, 1)
    
11.                 End Select

½Æ»s¥N½X

c_c_lai

¦^´_ 101# starbox520

¤U¸ü (236.75 KB)

2016-12-24 10:36

starbox520

¦^´_ 117# c_c_lai


    ³oÃ䪺³¡¤À¬O§Ú  ¨Ò¦p§A¬Ý¨ìSQH191
    ¥L¤£¥i¯à¥X²{¦b¨âµ§¼Æ¾Ú¤W­±~
    ¦pªG¨Ï¥ÎªÌ¤â´Ý¡A¤@ª½ÂI«ö¶sªº¸Ü
    ´N·|¥X²{³oºØBug
    ¦ý§Ú¸Õ¹Ldebug­ì¦]¦n¹³¬O¥X¦b§Ú«á­±IJKLÄæ  ¤£·|¥ýClear±¼~"~
    ¾É­P¨C¦¸«ö¶s«ö¤U¥h¤ñ¹ïªº®É­Ô
    ·|¥X²{¿ù¶Ã«¢«¢
    §Ú¦³­Ó·Qªk´N¬O§Ú¦bArrangeMent³oÃä

1. If N = 0 Then Exit Sub
   
2.     With Sheets("¤u§@ªí2")
   
3.    .[A2].Resize(N, 8) = Brr
   
4.   
   
5. End With
   
6. If N = 0 Then Exit Sub
   
7.     With Sheets("¶q¤j¥¼±Æ¾÷")
   
8.    .[A2].Resize(N, 8) = Brr
   
9.    End With
   
10. End Sub

½Æ»s¥N½X

¶q¤j¥¼±Æ¾÷³¡¤À
§ï¦¨   .[A2].Resize(N, 12) = Brr
³o¼Ë¨C¦¸´N·|§ó·s¨ì«á­±³o4¦æ
¦b«ö¤U§Ú³]­pªº"¶q¤j¥¼±Æ¾÷"«ö¶s
¦ü¥G´N¤ñ¸û¤£·|¥X¿ù
¤£¹L³o¥u¬O§Úªº·QªkXD...
¦]¬°§Úµo²{³o¼Ë§ïªº¸Ü«á­±·|Åܦ¨¶]"N/A"¥X¨Ó


©Ò¥HC¤jÀ´§ÚBGA.QFN.QFP  ³o3ºØ¯S®íªºª¬ªp°µ§PÂ_
¦A»¡¤°»ò¤F¶Ü«¢«¢

c_c_lai

¦^´_ 118# starbox520
¨º #116 ¤W¦³Ãö BGA¡BQFN¡BQFP ªºµ{¦¡³¡¤À¡A
©p´ú¸Õªºµ²ªG¬O¤£¬O¦p§A©ÒÄ@¡H

c_c_lai

¦^´_ 118# starbox520
¤S¡B"¶q¤j¥¼±Æ¾÷" ªº¾÷¥x¸¹½X ¬O±q¨º¸Ì«_¥X¨Óªº¡H