0

こちらもお伺いします。

常にそれぞれ22行の「レポートセグメント」を含むエクスポートがあり、Excelに取り込むと、最初のセグメントは常に5行目から始まります。最後の行（「レポートの終わり」の特殊文字を含む）が247であるドキュメントには、11個のレポートセグメントがあります。

各レポートセグメント内には、2つの異なる式が必要です。

最初のレポートセグメントの場合、常に行A5からJ27にあります。

Excel 2010でVBAを使用して、範囲のすべてのセルにFORMULA1を配置し（D5：D15をH5：H10（15ではなく）およびD18にドラッグアウト）、セルにFORMULA2を配置する必要があります（F20：F22、J20：J22）。

次に、そのvTaskCountを22回（セグメントリピーターオフセット）間隔で繰り返す必要があります。一部のレポートには2つのセグメントがあり、一部には50のセグメントがありますが、構造は常に同じです。プロセスを繰り返す回数がわかるので、もっと簡単になることを願っています。

4

1 に答える 1

2

次のようなものを試してください。

sub whatever()
dim lNumSegs as long, lLoop as long

lNumSegs=(cells(rows.count,1).end(xlup).row-5)/22

for lLoop =1 to lnumsegs
   range(D5:D15).offset((lloop-1)*22).formular1c1="=FOrmula1"
   range(H5:H10).offset((lloop-1)*22).formular1c1="=FOrmula1"
   range(D18).offset((lloop-1)*22).formular1c1="=FOrmula1"

   range("F20:F22,J20:J22").offset((lloop-1)*22).formular1c1="=FOrmula2"
next lloop

end sub
于 2013-01-03T00:23:36.900 に答える