مراجعه به سلولهای اکسل با استفاده از For… Next - Loop
برای ارائه بهتر مطلب به مثال های زیر توجه بقرمائید :
For i = 1 to 10 Range(“A” & i).Value = 1 Next
درج عدد 1 در سلول های A1 الی A10
For i = 1 To 26 Range(Chr(65 + i) & "1").Value = 2 Next
درج عدد 2 در سلول های A1 الی Z1
For Each i In Sheet1.Range("H1:H5") i.Value = 10 Next
درج عدد 10 در سلول های H1 تا H5 در کاربرگ Sheet1
ورود به سایت