業務改善コンサルタントが教える Excel VBA自動化のすべて 〜35の事例で課題解決力を身につける〜

サポートページ

この記事を読むのに必要な時間:およそ 0.5 分

ダウンロード

本書のサンプルファイルをダウンロードできます。

データはzip形式の圧縮ファイルでダウンロードできます。圧縮ファイルをダウンロードしていただき,適宜解凍してご利用ください。

ファイルやフォルダ名が文字化けするなどの不備がありましたので,修正いたしました。2023年2月28日以前にダウンロードされた方は,お手数ですがダウンロードし直していただきますよう,お願いいたします。

(2023年2月28日最終更新)

ダウンロード
vba_sample_files.zip

過去の更新情報

  • 以下のサンプルに不備がありましたので,修正いたしました。(2023年2月22日)
    「04-02_工事現場の人材派遣データを検索する」

お詫びと訂正(正誤表)

本書の以下の部分に誤りがありました。ここに訂正するとともに,ご迷惑をおかけしたことを深くお詫び申し上げます。

(2023年2月22日最終更新)

P.187 11行目

日付 = Format(.Range("B2").Value, "m月d日")
日付 = Format(.Range("B2").Value, "yyyy年m月d日")

P.190 2行目

日付 = Format(.Range("B2").Value, "m月d日")
日付 = Format(.Range("B2").Value, "yyyy年m月d日")

P.192 8,9行目

開始日 = Format(.Range("B2").Value, "m月d日")
終了日 = Format(.Range("C2").Value, "m月d日")
開始日 = .Range("B2").Value
終了日 = .Range("C2").Value

P.193 11,12行目

開始日 = Format(.Range("B2").Value, "m月d日")
終了日 = Format(.Range("C2").Value, "m月d日")
開始日 = .Range("B2").Value
終了日 = .Range("C2").Value