質問: 開始と終了番号を指定した連番(excel) 連番を自動作成できるよう、マクロかvbaでも結構ですので教えてください。 例えばc1に123、d1に456、と値を入力した時に a2以降に123~456の連番が自動作成される、という具合です。 このc1の開始番号とd1の終了番号を変更した時にも対応できるようお願いします!! excel2000です
回答: dim lngloop as long dim lngrow as long lngrow = 2 for lngloop = range("c1").value to range("d1").value cells(2,1).value = lngloop lngrow = lngrow + 1 next この場で思いつきで書いたのでこのままで動く保証は致しかねますが。(笑) イメージとしてつかんでいただければ。