人気記事ランキング全ページ一覧キーワード別記事一覧お問い合わせきむおばです。関東在住の40代の主婦です。契約社員・派遣・フリーランスの3足のわらじ中。フリーランスでは、ファイナンシャルプランナーとしてライターやセミナー講師をしたり、サイト制作やプログラムを作ったりしています。お金・子育て・趣味のこと...何でも気ままに書く雑記ブログです。目標は、ライター・サイト制作・広告他の収入バランスを整えること。ブログ収入UPに今年も力を入れます。VBAコード一覧~マクロで仕事を自動化~2019/6/24(月)2019/6/24(月)きむおば下の子が生まれてから、仕事と育児を両立したいので事務職にジョブチェンジしました。VBAのコードを自分の備忘録も兼ねて、一覧にまとめました。Worksheets("Sheet1").Range("A:E").Columns.AutoFit入力されたデータの文字数に合わせて、ちょうどよい列幅に自動調整してくれる便利なメソッド「AutoFit」。列幅を調整したいシート名と列または列の範囲を指定してあげるだけ。上のサンプルコードでは、シート名「Sheet1」のA~E列の幅を自動調整させています。"=today()"文書作成日をマクロを実行した日に自動で設定してくれる便利な関数「today()」を好きなセルに設定しているだけのコードです。上のサンプルコードでは、シート名「Sheet1」のF2セルに今日の日付を表示してくれます。Worksheets("Sheet1").Range("A1").End(xlDown).Rowデータの入っているセルの最終行を教えてくれる「End(xlDown).Row」は本当に便利ですよね。すべてのマクロに登場するぐらい使っています。実際のキーボード操作だと、Ctrl+↓キーを押した状態ですね。最終行へジャンプしてくれるコードになります。マクロを実行する度にデータ数が異なっても、常に最終行をチェックして正しく処理を行うことができるようになります。Worksheets("Sheet1").Range("A1").End(xlToRight).Column最終行だけでなく、最終列を確認したい時は、「.End(xlToRight).Column」を使います。何万行もあるデータをコピーする時に便利なのが、最終行と最終列を返してくれるこの2つのプロパティになります。Falseシートを削除したり、ファイルを閉じたりする時に、確認メッセージが表示されてマクロの処理がストップしてしまうことが多々あります。マクロで命令していることなので、メッセージで処理を止めたくない時に、「Application.DisplayAlerts」プロパティをFalseにしておくと、全てのアラートをオフにすることができます。必要なアラートまで表示されなくなってしまうので、オフにする必要がなくなったタイミングでTrueに戻しておきましょう。Shift:=xlToRight上のサンプルコードでは、選択しているB列の右側に1列挿入します。1行挿入なら、下のようなコードになります。5行目の下に1行挿入されます。xlCenter上のサンプルコードでは、G~I列を水平方向に中央揃えにしています。水平方向の文字配置「HorizontalAlignment」の指定する定数一覧xlGeneral標準(既定値)xlLeft左詰めxlCenter中央揃えxlRight右詰めxlJustify両端揃えxlDistributed均等割り付けxlCenterAcrossSelection選択範囲内で中央(セルを連結している場合)垂直方向の文字配置は、「VerticalAlignment」プロパティになります。xlContinuous上のサンプルでは、A2からJ列の最終行までの範囲のセルを実線で囲んで表が完成します。XlLineStyleに設定できる線の種類xlContinuous実線xlDash破線xlDashDot一点鎖線xlDashDotDotニ点鎖線xlDot点線xlDouble2本線xlLineStyleNone線なしxlSlantDashDot斜破線Excelって表計算ソフトだから、最初から薄く罫線が引かれているからわざわざ線なんて引かなくてもいいんじゃないかと思うのです。外資系なら不必要な罫線はまず引かないって下の本に書いてました。楽天ブックス楽天koboAmazonKindle7nethontoでも、日本のITリテラシー低めの上司ってやたら罫線で囲めって指示しますよね。マクロで秒殺してしまいましょう。"$3:$3"いくらペーパレス化が叫ばれていたとしても、レコード数が多いデータを印刷する必要もありますよね。そんな時に使えるのがこの「PrintTitleRows」プロパティです。各ページの先頭に、サンプルでは3行目をタイトル行として繰り返し印刷時に出力してくれるようになります。ちなみに、印刷列を指定するプロパティは「PrintTitleColumns」です。After)にコピーして追加したい時に使えるコードです。SEOのためにアクセス解析レポートのテンプレートシートを作っておくとしましょう。別シートに月別のアクセス結果のデータをまとめておきます。マクロを実行すると、入力された月までのレポートを一度に数秒で完成させることができるようになります。VBAサンプルコードを挙げてみました。他にも思いついたら、随時追加していきたいと思います。offsetも便利ですよね。Excelのお仕事での基本的な使い方のチェックにこちらの記事もどうぞ。クイズ感覚であなたのExcel力を試そう。小学校の家庭科の調理実習で必要な持ち物リスト完全在宅で時給1500円、月2日勤務時給1800円などママに魅力的な求人を見逃さない方法とは?こんにちは、きむおばです。関東在住の40代主婦。手のかかる高校生と小学生を子育て中の母でもあります。契約社員と派遣社員の傍らファイナンシャルプランナーとしてライターをやったり、サイトやプログラム制作の受注もしている兼業主婦ブロガー。お金のこと、子育てのこと、趣味のこと、悩んでいること...何でも気ままに書く雑記ブログです。きむおばブログにたどりついたあなたのお役に少しでも立てたらうれしいな。子どもが中学に入学した時点で親がやっておきたいこと。タグ40代で肌断食をしてたら1年後に首からデコルテに小さなイボのようなものが大量にできてしまった残念な体験談2020/2/19秋冬の私服と通勤服の定番化。