WORK💻LIFE🖱
留意して作成しておりますが 紹介しているコードのご使用におけるトラブルに関しましては、一切責任を負いかねます。
コードの使用につきましては、使用者様のご責任にてお願い申し上げます。
誠に勝手ではございますが、何とぞご了知いただきたくお願い申し上げます。
うずまき
投稿日: 2022/03/02
1 / 2 枚目

VBAを始めたばかりの方で、ループ処理の中で分岐処理を
することが上手くできなった経験はないでしょうか?
添付ファイルは
セルに1~100の数字を渦巻き状に書き込むコードになります。
お困りの方がいらっしゃいましたらご参照ください。
2 / 2 枚目

実行ボタンを押すと
始点から終点に向かって渦巻き状に数字が
書き込まれます。
サンプルコードDL
うずまき_サンプル_20220302175616.xlsm
指定した複数のsheetを出力
投稿日: 2022/02/05
1 / 3 枚目

【目的】
選択した複数のsheetのみを出力したい場合もあると考え
プログラムを作成してみました。
【出力条件 ※イメージをご参照ください】
セルのシート名とsheet名が完全一致かつ、出力
フラグが1の場合のみ出力します。
【使用上の注意事項】
sheetの保存形式:csv
csvの保存場所:このエクセルブックがある場所。Desktopで実行する
場合は出力するファイル数に注意が必要です。
※なるべくDesktopは避けてください
保存方式:上書き保存
2 / 3 枚目

【使用方法】
①このExcelBookをフォルダに保存する
※なるべくDesktopは避けてください
②Excelbookを開く
③sheet名とセルのsheet名を一致させる。
④出力したいシート名の出力フラグに1を入力する
⑤実行ボタンを押す
※保存先に、同一のファイル名があった場合は
自動的に上書き保存されます。
3 / 3 枚目

【実行結果】
data1、data4、data5、data7、data10の
sheetのみcsvとして出力されました。
【添付】
指定したsheetを出力.xlsm
サンプルコードDL
指定したsheetを出力_20220205002813.xlsm