excel循環(huán)賦值？我不知道你想做什么。我會(huì)根據(jù)自己的理解改變的。你可以試試：sub-reward（）J=sheets（“一月二十七日”）UsedRange.Columns.Count列“Get th

excel循環(huán)賦值？

我不知道你想做什么。我會(huì)根據(jù)自己的理解改變的。你可以試試：sub-reward（）J=sheets（“一月二十七日”）UsedRange.Columns.Count列“Get the total number of rows for I=2 to j”第二行開始循環(huán)j次，l=trim（range（“B”I.value）“獲取列B I rows的數(shù)據(jù)，B=trim（range（“d”I.value）”獲取列d I rows的數(shù)據(jù)，如果l>=20000，并且B>=30則“當(dāng)l大于或等于20000且B大于或等于30時(shí)，賦值G為128G=128L如果l>=30000且B>=30則”當(dāng)l大于或等于30000且B大于或等于30時(shí)，賦值G為228g=228elseg=“”“其他賦值G為空值end ifrange（“f”&I）。值=g”被分配給f列I行數(shù)據(jù)nexten sub

]您可以參考本教程。

（1）在這部分代碼的開頭和結(jié)尾添加一個(gè)循環(huán)，以遍歷word中的所有表。此部分僅將word中第一個(gè)表的數(shù)據(jù)寫入excel代碼。

（2）修改相應(yīng)的代碼。例如，word中表格的序列號(hào)、讀取和賦值的單元格的行號(hào)和列號(hào)用變量表示，每個(gè)周期中單元格的數(shù)量都會(huì)增加。