echoを100%使いこなすために、使い方や便利テクニックなどを発信していきます。[黄銅]こんにちは~。「デザインもできるシステムエンジニア」のあつもり(@atumori17)です。今日も業務効率化のアイデアを発信していきますっ!前回は「DateSerial関数で今月の日付を取得してワークシートに入れる方法」を紹介しました。業務でエクセルを使っていると日付を入れたケースがよくありますよね。スケジュール表を作っているときなどです。そこでDateSerial関数で今月の日付を取得してワークシートに入れる方法を紹介します。これから何回かに渡って日付や曜日を自動で入力するツールを作成していきます。08:13今回はさらに使いやすくするために、「日付の曜日を判定してセルに入れる方法」を紹介していきます。曜日まで入れられるようになるとグッと実用性がアップしてくると思います。前回のプログラムを修正するそれでは実際にプログラムを作っていきます。前回使用した「今月の日付を入力.xls」をコピーして「今月の日付と曜日を入力.xls」を作成します。UserForm1のSubプロシージャ「CommandButton1_Click」に次の段落で説明するコードを貼り付けます。サンプルコードを貼り付ける「CommandButto1_Click()」に貼り付けるコードです。Subプログラムコードの解説それではプログラムコードの解説をしていきます。重要なポイントに絞って説明していきます。プログラム全体の流れは以下のようになります。今月の月末の日にちを取得する処理対象の列番号または行番号を取得する行か列どちらが選択されたかを調べるセルに日付を入力する日付から曜日を取得して隣のセルに入れる1~4までは前回の記事で紹介していますので、5の日付から曜日を取得するところの説明をしていきます。Weekday関数で日付から曜日の値を取得する日付から曜日を調べるにはまずWeekday関数を使用します。Weekday(日付)Weekday関数は引数に指定した日付の曜日を返す関数です。曜日は数値で返します。7というように曜日名ではなく、数値で返すんですね。2017/11/14は火曜日ですが、tmp=Weekday(“2017/11/14”)とすると、tmpには3が入ります。WeekdayName関数で曜日の数値から曜日を取得するさきほどの説明のようにWeekday関数が返すのは曜日の数値ですので、この数値を曜日に直す必要があります。日付の横に数値が入っていても何曜日かわからないですからね~。数値から曜日を調べるには次のようにします。WeekdayName(曜日を表す数値,曜日表示の有無)ただし返す値は「火曜日」というように「曜日」が入っています。そこで第2引数で曜日表示の有無が指定できますので、Trueを指定して曜日を省略するようにします。曜日を取得する処理は以下になります。全体のプログラムコードでは31~36行目、47~52行目になります。tmpプログラムコードの解説は以上です。日付の曜日を判定してセルに入れるプログラムの動作確認それでは実際に出来上がったプログラムを動かしてみましょう。ワークシートの起動ボタンを押します。日付入力ボタンをクリックして、列を選択しOKボタンをクリックします。今月の日付と曜日が入力されました。行を選択した場合はこんな感じになります。まとめいかがでしたか?今回の内容をまとめます。Weekday関数で日付から曜日の値を取得できるWeekdayName関数で曜日の数値から曜日を取得できる曜日名を省略するにはWeekdayNameの第2引数にTrueを指定する以上「日付の曜日を判定してセルに入れる方法」でした。おつかれさまでした~。[黄銅]レクタングル大336×280レクタングル大336×280シェアするツイートフォローするあつもりよく読まれている記事はこちらエクセルVBAでショートカットランチャーを作ってデスクトップのアイコンを整理する方法ちらかったデスクトップのアイコンをすっきりときれいに整理して作業を効率化させるアイデアを紹介します。エクセルVBAを使ってプログラムランチャーを作り、よく使うプログラムやファイルを登録すれば一気に作業効率が上がりますよ。記事を読むエクセルVBAでダイアログボックスを表示させ複数ファイルを1度に開く方法ダイアログボックスから複数ファイルを1度に開く方法を紹介します。複数のファイルを処理をすることができるようになると色々と便利に使えます。月ごとの勤務時間管理表を一度に読み込んで年間の集計表を作る、なんてことができます。このように業務が劇的に効率化できちゃうんですね~。記事を読むエクセルVBAで空白行を削除しないでまとめて一括非表示で隠す方法エクセルのワークシートにある空白行を取り除きたい場合があると思います。削除はしないで非表示にしたという場合1つ1つ行を選択して非表示にするのは大変な作業ですよね。そこで今回はエクセルのVBAのhiddenプロパティを使って、空白行を非表示にする方法を紹介します。連続して文字列を置換したときに、置換する前の文字列と比較したいと思ったことはありませんか?Selection.CopyメソッドとSelection.Insertメソッドを使用して「置換前と後の文字列を比較する方法」を紹介します。置換表の定義が間違っていた場合、原因を探す手がかりになりますよね。記事を読むエクセルVBAでできることはこんなにある!他のアプリケーションとの連携で発揮する真の実力エクセルVBAは他のアプリケーションと連携することで様々な業務を効率化できます。データベースと連携することで必要なデータを抽出した後に、体裁を整えてエクセルファイルで出力するなんてこともできちゃいます。WEBスクレイピングのようなWEBサイトの情報を収集するツールとしても使えます。大量のデータが入った表などをエクセルで表示させると、背景色が一色だとどこまでデータを見ていたのかわかりずらいことがあります。そこで1行おきに色をつけて見やすくするというアイデアがあると思います。条件付き書式とエクセルの数式を組み合わせる方法でなく、VBAで実現する方法を紹介します。毎回入力するのは面倒ですよね。VBAを使えば別のエクセルファイルでも使える汎用的なプログラムが作れるのでとっても便利ですよ。記事を読むエクセルVBAで同じデータが切り替わる項目ごとに空白行を挿入する方法エクセルシートの見栄えを整えていると項目ごとに空白を入れたいっていうケースがあると思います。そこで今回はVBAを使って「項目ごとに空白行を挿入する」プログラムを作っていきます。職場など複数人で作業する場合、エクセルの集計機能などを使うより便利だからです。記事を読むエクセルVBAでセル内の文字列に含まれる改行を一括で削除する方法ワークシートのセル内にある改行を消したいって思ったことありませんか?データを別のアプリケーションに取り込んだり、データベースに登録したりするときに改行が邪魔になることがあります。そんな時に改行を一括で削除できるツールがあったら便利ですよね。今回は僕が実際に登録した「社内SE転職ナビ」という社内SEを専門的に扱った転職エージェントについてです。実際に行った面談内容と会員登録して良かった3つのことをお伝えしていきます。コメントをキャンセルメールアドレスが公開されることはありません。*サイトプロフィールはじめまして!あつもりです。当ブログをご覧いただきありがとうございます!僕は埼玉県でSEブロガーをしています。結婚してから、1か月後に会社が倒産するなど、山あり谷ありの人生を歩んできました。転職は過去に3回経験しており、2017年に、某プリンタ会社から完全リモートワークのシステム開発会社へ転職しました。今は、ずっとやりたかったリモートワークという自由な働き方を満喫しています。echoを中心に情報を発信しています。