織物用組織図マクロ Ver.3.7

 2018-01-07
V3.6と機能的には変わりありませんが次の変更を行いました。

・実行時エラーが出てしまうような操作をした場合に、何が悪いかがわかるよう警告メッセージを出すようにしました。
・ブログのURLが昔のままだったので、新しくしました。

weaving_macro3.zip

Ver.3.7にしたら、うまくいかなくなった!などということがありましたら、ご報告下さいm(_ _)m。

Ver.3.2.1、Ver.3.3、Ver.3.4、Ver.3.5、Ver.3.6の記事からもVer.3.7がDLできます。



【注意事項】
動作確認・ウィルスチェックはしていますが、ダウンロード・解凍及び使用は各自の責任で行って下さい。

このマクロの著作権は作者に帰属します。マクロの利用は自由に行っていただいて構いませんが、出版物に載せるなどの場合はご一報ください。
なお、個人が生成した図を画像にしてサイトに載せる場合はご連絡くださらなくてけっこうです。ただし、本に載っていたものから完全意匠図を作成した場合、マクロではなく、その本の著作権に抵触しないか、十分お気を付けください。

また、このマクロを使用して損害が発生してもマクロ作成者は一切の責任を負いません。

【使用方法】
1.初期化
踏み木本数と、踏むと綜絖が上がるか下がるかと、綜絖枚数と、タイアップ部分をどの位置にするかと、図の幅・図の高さを入力して[初期化]ボタンをクリックして、マス目を作ります。

2.準備
以下の図のように、綜絖とタイアップと踏み木を黒くします。
ドラフト3-1

3.組織図
[組織図]ボタンをクリックすると
ドラフト3-2
こんな風に、どんな組織になるかが表示されます。

4.配色図
以下の図のように、色を指定して、
ドラフト3-3

[配色図]ボタンをクリックすると
ドラフト3-4
こんな風に、どんな配色になるのかが表示されます。


尚、簡単なテストはしていますが、実際に使ってみると不具合が生じるかもしれません。その際はご連絡下さい。
可能な範囲で修正したいと思います。

【Ver.3.7 動作確認済の環境】
  • Windows 8.1 + Excel 2013
  • Windows 10 + Excel 2010
  • Windows 10 + Excel 2016


※ Excel 2007以降でしたら(それ以前の人はいまやいないかもしれませんが…)、拡張子はxlsmで保存した方が、次から面倒じゃないかもしれません。
※ 他の環境でも動いたら、動作実績ありとして追加しますので、ご一報いただけると有難いです。なお、我が家にはWindows 8.1 + Excel 2013しかありませんので、「○○で動作確認してもらえないか」という要望には応えられません。

【FAQ】
マクロを実行できない
Excelのマクロが無効になっています。有効にしてください。
最近だと、ファイルを開いたときに、マクロを有効するかどうかのメッセージバーが出ることが多いように思うので、そこで有効にすれば使えると思います。
そうできない場合は…「Excel マクロ 有効」などでネット検索するとやり方が出てくると思います。


【残っている野望】

  • 隙間を空けて緯糸を入れた場合の組織図・配色図に対応する。…配色図は白糸を入れた場合と判別つかないという問題があるんですがね…。厳密に「塗りつぶしなし」と「白」を区別することになるでしょうか。
  • 1クリックで色塗りを可能にする(今、セルの背景色をいちいち変更しないといけないので。コピー&ペーストできるとはいえちょっと面倒かなあと思いまして)
  • ろくろ式⇔天秤式の踏み方図変換機能をつける
  • 組織図から、綜絖の通し方・踏み木の踏み方を出せるようにする


参考用語
さ行:綜絖、組織図
た行:経糸、天秤式
は行:踏み木
や行:緯糸
ら行:ろくろ式



2018/1/7 18:00 Windows 10 + Excel 2016での動作報告をいただきましたので、動作環境に追記しました。
2018/1/8 18:50 Windows 10 + Excel 2010での動作報告をいただきましたので、動作環境に追記しました。
スポンサーサイト
カテゴリ :ドラフト トラックバック(-) コメント(2)
コメント
こんばんは!
Windows 10 + Excel 2016で使えました。

有難うございます。
【2018/01/07 17:49】 | おりいむ #aQXK3sK6 | [edit]
>おりいむさん
動作確認、有難うございます!
早速いそいそと、動作確認済の環境に追記しました!
【2018/01/07 18:02】 | Riko #- | [edit]












管理者にだけ表示を許可する
≪ トップページへこのページの先頭へ  ≫