FOR I = 1 to 100
編號= CELLS(I,3)
IF 編號="" THEN
編號= CELLS(I,4)
END IF
CELLS(I,1)= RIGHT(編號,5)
NEXT I


=================================
大概隨便寫一下
可能有錯誤
差不多就樣吧= =a