Sub zz(); Dim d, ar, br; Set d = CreateObject("Scripting.Dictionary"); ar = Sheet1.Range("J2:Q6"); br = Sheet3.Range("J2:Q" & Sheet3.
確定! 回上一頁