¶×¾ã¸ê®Æ

fangsc

½Ð±Ð
sheet2°µ¤F¤@¥÷¼Ï¯Ã¿z¿ï,¦A±N¿z¿ï«áªº¸ê®Æ¨Ì²£«~¦WºÙ+©m¦Wªº²Ö¥[ÁʶR¼Æ¶q©ñ¤Jsheet4
¤£ª¾¬°¦ó¶]¥X¨ÓªºÁʶR¼Æ¶q¬Ò¬°0
½Ð±Ð¦p¦ó­×§ï¥H¤Uµ{¦¡

i = 1
Do
    If sheet4.Cells(i + 1, "a") & sheet4.Cells(i + 1, "b").Text = sheet2.Cells(4, "n").Text Then
    sheet4.Cells(i + 1, "d") = sheet2.Cells(4, "o")
    ElseIf sheet4.Cells(i + 1, "a") & sheet4.Cells(i + 1, "b").Text <> sheet2.Cells(4, "m") Then
    sheet4.Cells(i + 1, "d") = 0
    End If

i = i + 1
Loop Until Cells(i, "a") = ""
End sub

fangsc

¦^´_ 2# jcchiang

·PÁ±zªº¸ÑÃD. ¶W¥X§Ú¥i¥H²z¸Ñµ{«×ªº¼gªk.
1. ¥i¥H¨D¤@­Ó¤ñ¸ûªì¶¥µ{«×ªº¼gªk¶Ü¡H
2. ¥t¥~¸É¥R : µ²ªG¼Æ¦r­n °£10

fangsc

¦^´_ 4# jcchiang
·PÁ±z.

fangsc

¦^´_ 6# ­ã´£³¡ªL

·PÁª©¥D«ü¾É.