質問: VBA勉強中です。 これまでマクロ登録した内容を弄る しかできませんでした。 下記のマクロの例をどなたかご教示下さいませんか? ご回答を基にしっかり勉強していきたいと思います。 ------------ よろしければ添付画像のフォーマットも併せて参照ください。 ------------ 【行追加ボタン】 ・A列の最終行の一つ下に行を追加する(初回は3行目→A3~E3) ・追加した行のC列の書式を文字列に設定 ・追加した行のC列に"0001"、D列に"9"を入力する ・追加した行のA列をアクティブにする 【前行コピーボタン】 ・A列の最終行の一つ下に直前行をコピーする ・追加した行のA列をアクティブにする 【済ボタン】 ・操作している行のE列に"済"を入力する 【保存ボタン】 ・A~E列の3行目から最終行までをコピーする ・新規ブックを作成し、A3に貼り付け ・新規ブックをC:\Users\test\Desktop] へ 名前を [yyyymmdd.xlsxにして保存 ・[yyyymmdd.xlsx]を閉じる 【終了ボタン】 ・A~E列の3行目より下を削除し(上方向)、上書き保存せずにExcelを終了する ------------ ご回答頂ければ幸いです。
回答: VBAの勉強をはじめたところなら、記録マクロを作って修正するのが良いです。 開発タブの「コード」グループの「マクロの記録」をクリックして起動し、その状態でエクセルを操作します。たとえば、行を追加するとか、 記録マクロを起動すると、最初にマクロの名前と、記録する場所を瀬底するダイアログボックスが開きます。マクロの名前は任意ですが、記録する場所は、デフォルトでは「作業中のブック」になっていますので、「作業中のブック」以外でも実行したい時は、「個人用マクロブック」に変更します。 操作が終わったら記録を終了します。作成されたマクロを起動すると、先に操作したとおり、マクロが実行されます。 「コード」グループの「Visual Basic 」を開き、作成されたマクロコードを確認します。そこには不要のコードがたくさん含まれていることがありますので削除してスリム化します。 A行の下に行を追加する記録マクロを作ると、つぎのようなものが作成されていることがわかります。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー Sub Macro1() '' Macro1 Macro ' ' Rows("2:2").Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove End Sub ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー マクロに関するヒントは「Office Tanaka」さんのページが充実しています。 たとえば、ブックを上書きせずに閉じるのは このページは、勉強を初めたところなら、大変役に立つと思います。