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

[µo°Ý] ¿z¿ï«á¤£ÁôÂÃ

¦^´_ 19# wang077

½Ð¦A´ú¸Õ¬Ý¬Ý¡AÁÂÁÂ

Sub §ó·s2()
Dim Arr, T, T2, i&
If Sheets(1).FilterMode Then Sheets(1).ShowAllData
Arr = Sheets(1).Range([sheet1!f1], [sheet1!a65536].End(3))
Arr2 = Sheets(2).Range([sheet2!f1], [sheet2!a65536].End(3))
For i2 = 3 To UBound(Arr2)
    T2 = Arr2(i2, 1) & Arr2(i2, 3) & Arr2(i2, 6)
    For i = 1 To UBound(Arr)
        T = Arr(i, 1) & Arr(i, 3) & Arr(i, 6)
        If T = T2 Then
            Sheets(2).Range("h" & i2 & ":bq" & i2).Copy Sheets(1).Range("h" & i)
        End If
    Next
Next
End Sub

TOP

¦^´_  samwang
samwang ¤j¤j
´ú¸Õµ²ªG
¤u§@ªí1"A2"¸ê®Æ¬O1."A3"¬O3.½Æ»s¤u§@ªí2"A2"=2."A3"=3µL»~

²M ...
BV7BW µoªí©ó 2021-7-14 14:34


¤£¦n·N«ä¡A¯uªº¨¯­W±zªº´ú¸Õ¥B¦^õX°ÝÃD¡A«á¾Ç¯uªº¦³¬Ý¦ý¤£¤Ó¤F¸Ñ°Ý±zªº°ÝÃD
§Ú¦Û¤v²q·Q¦p¦ó§P©w¬O§_¬°·s¼W°ÝÃD¡AT = Arr(i, 1) & Arr(i, 3)  'AÄæ + CÄæ·í§@key
¦³¤£¤@¼Ë´N½Æ»s¨ì¥t¤@­Óªí®æ¡A¥i¥H¦Û¤v§ï¬Ý¬Ý¡A¤£ª¾¬O§_¦³¸Ñ¨ì±zªº°ÝÃD¡AÁÂÁ¡C

TOP

¦^´_ 21# samwang
¥i¥H¤F¡A¯uªº«D±`·PÁÂ

TOP

¦^´_ 22# samwang
samwang ¤j¤j §A¦n
ÁÂÁ§A±Ð¾É·PÁ§A
§Ú¦b²z¸Ñ
«D±`ÁÂÁ§A
±Ó¦Ó¦n¾Ç,¤£®¢¤U°Ý

TOP

¦^´_ 21# samwang
¹ï¤F¡A¤j¤j
§Ú§âSheet1¡ASheet2­«·s©R¦Wªº¸Ü
µ{¦¡½X³¡¤À­n«ç»ò§ï?
¬Q¤Ñ¸Õ¤F¤@¤U¡A§ï§¹³£·|¦³¿ù

TOP

¦^´_  samwang
¹ï¤F¡A¤j¤j
§Ú§âSheet1¡ASheet2­«·s©R¦Wªº¸Ü
µ{¦¡½X³¡¤À­n«ç»ò§ï?
¬Q¤Ñ¸Õ¤F¤@¤U¡A§ï§¹³£ ...
wang077 µoªí©ó 2021-7-15 08:26


»Ý­×§ï¦p¤U¡AÁÂÁÂ

Arr = Sheets(1).Range([sheet1!f1], [sheet1!a65536].End(3))
Arr2 = Sheets(2).Range([sheet2!f1], [sheet2!a65536].End(3))

TOP

¦^´_ 26# samwang
¤j¤j¡A§Ú¤S¦³·s³Â·Ð¤F
§Ú¼W¥[¤@­ÓÄæ¦ì«á¡A²{¦b­n§â¿z¿ï§¹ªº¸ê®Æ¬d¸ß¹L¥hsheet2¦³°ÝÃD¤F
¥t¥~§Ú·Q½Ð°Ý¡A§Ú­Y·Q§â¿z¿ï§¹A¡BB¡BC¡BD¡BFÄ檺¸ê®Æ(sheet1)¥á¶itextbox¸Ì¦³¿ìªk¶Ü
test.zip (44.6 KB)

TOP

¦^´_ 26# samwang
µL¸Ñ¶Ü?

TOP

¦^´_  samwang
¤j¤j¡A§Ú¤S¦³·s³Â·Ð¤F
§Ú¼W¥[¤@­ÓÄæ¦ì«á¡A²{¦b­n§â¿z¿ï§¹ªº¸ê®Æ¬d¸ß¹L¥hsheet2¦³°ÝÃD¤F
...
wang077 µoªí©ó 2021-7-15 12:03


¤£¤Ó¤F¸Ñ±zªº»Ý¨D¡A§Ú¼gªº¦pªþ¥ó¡A¦p¦³¨ä¥L¤£¤Ó²Å¦X½Ð¦Û¦æ¦b­×§ï¡AÁÂÁÂ

test1.zip (45.89 KB)

TOP

¦^´_ 29# samwang
«D±`·PÁ¤j¤j
¤j­P¤W³£¬O§Ú»Ý­nªº¡A§Ú¦A§â³¡¤À­×§ï§Y¥i

TOP

        ÀR«ä¦Û¦b : ¸Ü¦h¤£¦p¸Ü¤Ö¡A¸Ü¤Ö¤£¦p¸Ü¦n¡C
ªð¦^¦Cªí ¤W¤@¥DÃD