複数のワークシートからできているExcelを1枚のCSVにするには？ (ID:119398)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 >ワークシートの枚数をランダムとした場合 シートをループ処理する方法です。(ActiveXオートメーション記述省略) dim i as long for i = 1 to worksheets.count msgbox worksheets(i).name next i もしくは dim ws as worksheet for each ws in worksheets msgbox ws.name next ws