アカウント名:
パスワード:
こっちの方がすごいかも(まあ、オートシェイプ?的には同じことなんでしょうけど)http://togetter.com/li/445626 [togetter.com]
# 特許図面はどちらかといえばvisioじゃないかなと思った
更に古いものではExcelのオートシェイプで水銀燈描いてみた(2007年06月18日 08:31) [nicovideo.jp]がありました。
PowerPointでは【PowerPoint】 チルノのぱわーぽいんと教室(2009年07月28日 15:18) [nicovideo.jp]でスライドショーアニメ作ってます。
そういえばこんなのもあった。
http://getnews.jp/archives/49456 [getnews.jp]
もしかしてVBAコード化できるのか?
Excel、というか Office アプリの図形は「ドキュメントのインスタンス.Shapes」というコレクション経由で操作可能です。例えば Excel なら、
ThisWorkbook.ActiveSheet.Shapes.AddTextbox msoTextOrientationDownward, 100, 100, 100, 100
というコードで「現在のブックのアクティブなシートの座標 100:100 の位置に縦横 100 ピクセルの縦書きテキストボックスを挿入」という操作になります。AddCurve や AddPloyline で自由に図形を描画できますから、原理的には図形描画出かけるものは何でもコード化可能です。
コード化可能ですよね。Excelなら「新しいマクロの記録」等で手作業をVBAコードできた筈なんで、描画作業をひたすら記録して貰い、> ThisWorkbook.ActiveSheet.Shapes.AddTextbox msoTextOrientationDownward, 100, 100, 100, 100みたいなコード数百行を生成する事もできる筈。
寧ろそっちが欲しいw。自分のエクセルでキャラが出来上がってゆく様を眺めたいw
それだと出来上がった絵から、オブジェクトを一個づつ列挙して、それをVBAに落としてテキストとして吐き出させるVBAを作った方が早い。
その発想は無かった。コレクションの全メンバ対象に処理すりゃ出来るのか。
只、絵師が一から描き上げてく工程を再現できなさそう…。オブジェクト名の自動命名で振られる連番を手掛りにする位か。
すまん。昔、そういうお仕事していたもので、そういう発想になった。万人には使えないだろうが、可能であることはわかっている。
ミンキーモモ速描きコンテスト?
こういうことですね。わかりますん。【Forza 4】 『窓辺ななみ』をバイナルペイントモードで作製 [youtube.com]
より多くのコメントがこの議論にあるかもしれませんが、JavaScriptが有効ではない環境を使用している場合、クラシックなコメントシステム(D1)に設定を変更する必要があります。
身近な人の偉大さは半減する -- あるアレゲ人
Excelお絵かきなら (スコア:1)
こっちの方がすごいかも(まあ、オートシェイプ?的には同じことなんでしょうけど)
http://togetter.com/li/445626 [togetter.com]
# 特許図面はどちらかといえばvisioじゃないかなと思った
Re:Excelお絵かきなら (スコア:2)
【エクセル講座】オートシェイプで書いてみた【双葉理保】 [youtube.com]
機能的に制限はあるにしても、これを見てるとIllustratorとかInkscapeっぽい。
制限がキツければキツいほど燃える(あるいは萌える)職人魂の持ち主は結構いるもんですね。
#ところでreo氏の属性ってそっち方面だったんですか、部門名
Re: (スコア:0)
更に古いものでは
Excelのオートシェイプで水銀燈描いてみた(2007年06月18日 08:31) [nicovideo.jp]がありました。
PowerPointでは
【PowerPoint】 チルノのぱわーぽいんと教室(2009年07月28日 15:18) [nicovideo.jp]でスライドショーアニメ作ってます。
Re: (スコア:0)
そういえばこんなのもあった。
http://getnews.jp/archives/49456 [getnews.jp]
Re: (スコア:0)
もしかしてVBAコード化できるのか?
Re:Excelお絵かきなら (スコア:1)
Excel、というか Office アプリの図形は「ドキュメントのインスタンス.Shapes」というコレクション経由で操作可能です。
例えば Excel なら、
ThisWorkbook.ActiveSheet.Shapes.AddTextbox msoTextOrientationDownward, 100, 100, 100, 100
というコードで「現在のブックのアクティブなシートの座標 100:100 の位置に縦横 100 ピクセルの縦書きテキストボックスを挿入」という操作になります。AddCurve や AddPloyline で自由に図形を描画できますから、原理的には図形描画出かけるものは何でもコード化可能です。
Re: (スコア:0)
コード化可能ですよね。
Excelなら「新しいマクロの記録」等で手作業をVBAコードできた筈なんで、
描画作業をひたすら記録して貰い、
> ThisWorkbook.ActiveSheet.Shapes.AddTextbox msoTextOrientationDownward, 100, 100, 100, 100
みたいなコード数百行を生成する事もできる筈。
寧ろそっちが欲しいw。
自分のエクセルでキャラが出来上がってゆく様を眺めたいw
Re: (スコア:0)
それだと出来上がった絵から、オブジェクトを一個づつ列挙して、それをVBAに落としてテキストとして吐き出させるVBAを作った方が早い。
Re: (スコア:0)
その発想は無かった。
コレクションの全メンバ対象に処理すりゃ出来るのか。
只、絵師が一から描き上げてく工程を再現できなさそう…。
オブジェクト名の自動命名で振られる連番を手掛りにする位か。
Re: (スコア:0)
すまん。昔、そういうお仕事していたもので、そういう発想になった。万人には使えないだろうが、可能であることはわかっている。
Re: (スコア:0)
ミンキーモモ速描きコンテスト?
Re: (スコア:0)
こういうことですね。わかりますん。
【Forza 4】 『窓辺ななみ』をバイナルペイントモードで作製 [youtube.com]