エクセルのマクロを使ってガントチャートの作り方を教えてください

Question

エクセルでマクロを組んでガントチャートを作りたいのですが、マクロ初心者（今回初めて）なので作り方が分かりません。

検索で調べると、フリーソフトやいろいろやり方があるようなのですが、自分がやりたいこと（特に1行に複数の線を出す）ができるソフトやマクロの組み方が見つかりません。

下に条件ややりたいことを記述しましたので、どうか教えてもらえないでしょうか。

よろしくお願いします。

エクセルのバージョン：Excel2010

やりたいこと：下記参照のsheet1に入力した開始日、終了日、入力した色、線の種類を元に、

         sheet2にオートシェイプで線を開始日から終了日まで自動で入れ、線の左端に開始日、　

         右端に終了日を表示できるようにしたい。

         sheet2のチャートの1行には開始日から終了日のオートシェイプの線を最大7本表示したい。

        　sheet2のチャートは1年分（12カ月）で1カ月を10日ずつで分割表示している。

　　　　　　　　日にちのセルの中は、10=2017/9/10、20=C4+10、30=D4+10となっています。

　　　　　　　sheet1

        sheet2

Answer 1

回答されている方なら１日で作れると思いますが
初心者が１から作るというのであれば、
勉強、習得、開発、テスト、
仕事の合間にやって半年くらいかかるかと。

ここはコードを作ってとお願いする場ではないので、
ヒントを幾つか。
・For Loop 構文
・図形(Shape)に名前を付けて、コピペ
・Shape の Top Left ⇔ Cellの Top Left で位置調整
・Shape の Width で長さ調整
・Shape の 文言は「.TextFrame2.TextRange.Text」

頑張ってください。

Comments

[clorets]

回答ありがとうございます。
頂いたヒントを元に頑張ってみます。
また分からないことが出たら質問をすると思いますがよろしくお願いします。

[ExcelVBAer]

個人的には「ExcelVBAを実務で使い倒す技術」という本がおすすめです。

[clorets]

回答ありがとうございます。
本探してみます。

Answer 2

マクロの作り方と学習の仕方一般に関してですが、鉄板の方法は、マクロ化したい作業を手作業で行いながら、それを「マクロの記録」コマンドで記録して、記録されたマクロを解読し、修正していく方法です。特に、初心者はこれでいろいろなマクロのコマンドを知ることもできて、早く上達します。

たとえばご質問の内容なら、記録を解読すればガントチャートの線をどのように引くのはマクロのどのようなコマンドを使えばいいのか、座標はどのように指定するのか、といったことが理解できると思います。
これらが理解できたら、次は元データからどのようなデータを読み取り、線を引いていくのかをプログラム化することです。ここでで大事なことは、自分たちが無意識にやっている作業を、きちんと順序立てて手続き化するか（まさに、それが「プログラミング」）です。

たとえば、ですけど、チャートの線を引くのでしたら、

１．作業の開始日時を取得（cells(N,M).valueみたいに取得）
２．作業の終了日時を取得（同上）
３．チャートの始点を計算（Ｘ：開始日時×１日の長さ＋０日目のＸ，Ｙ：作業番号×作業の幅＋最上段のＹ）
４．チャートの終点を計算（同上）
５．チャートを引く（マクロのコマンド）
６．１に戻って、次の作業

というような作業になるでしょうか。まずは、こういう形で必要な作業を拾い出すわけです。で、１～５の作業をマクロで記述して、それを、For-NextやDo-Loopで繰り返す、という形に置き換えるわけです。

そんな形で試行錯誤してみてください。なかなかいい練習問題になると思いますよ。

Comments

[clorets]

回答ありがとうございます。

ところで、３のところにある1日の長さというのは24時間ということでしょうか？
０日目のＸというのは始点から終点までの日数ということであっているでしょうか？

質問ばかりですみません。

[webappbeginner]

＞ところで、３のところにある1日の長さというのは24時間ということでしょうか？

おつくりになっているチャートで「１日」を表現する、チャートの長さ（ピクセル数等）のことです。

＞０日目のＸというのは始点から終点までの日数ということであっているでしょうか？

同様に、チャートの描画エリアの左端（０日目）のX座標のことです。「開始日時×１日の長さ」で、「開始日時」がゼロだとしてみてください。ゼロになるので、そのままだとシートの左端からチャートが始まってしまいます。それを描画したい位置にあわせるために、「０日目のＸ（座標）」を足す必要があるということです。ちなみに、こういう調整値のことを「オフセット」とよく言います。

なお、「開始日時」とさらっと書きましたけど、正確には基準日に対する「相対的な日時」ですので、チャートの基準日（０日目）からの日数もしくは時間にする必要があります。

開始日時＝開始する実際の日時－基準日の日時

この作業にどの程度のお時間を取れるかわかりませんが、とにかくやってみることが、マクロの上達には不可欠です。最初は思ったとおりに行かないと思いますが、なぜうまくいかなかったのかを考えて修正し、また試すことが結局は上達への近道です。がんばってください。

[clorets]

ありがとうございます。
がんばってみます。