« ガラス器の花 | トップページ | Mさんのワード絵展 »

2021年2月14日 (日)

エクセルでフラクタル模様のシェルピンスキーギャスケット???

幾何学模様を作っておいて背景模様などに使うといいよね。

と思いました。 エクセルでいろいろ作ればいいか?と思いました。

手作り?で作れば それなりにいいんだけど ついつい エクセルだもん 何か簡単にできる

方法があるんじゃあ ないかと (面倒くさがりなので)捜しました。  

そうは言っても 結局あれこれ探すのも時間がかかりました。

ややこしそうな模様で エクセルのマクロでVBAを入力して描くというのが ありました。

もちろん VBAなど書けないので コピペでやってみました。

1_20210214111401
VBAをコピペでというだけでも大変でした(>_<)
しかし これじゃあ ねぇ"(-""-)"
と思い コードをいじくって みたけど どうにもなりませんでした。
こうするだけでも 働かない頭がパニクってしまいました。
フラクタル模様で計算式を入力するだけで 描けるというのがありました。
こういうのができます。
まず セルは正方形にします。
B2のセルを選択してここに書いてあるように =if・・・・の式をいれます。

Photo_20210214111301
B2のセルから 右下の小さい四角(計算式ごとということです。)を右にドラッグして
それごと 下にドラッグして範囲を指定します。V1に1を入力します。
最初はこうなります。

Photo_20210214111201
色を付けるのに 範囲を選択して 条件つき書式をクリックして新しいルールを選びます。

Photo_20210214111302
そして1のセルだけに色を塗るようにして下の赤い所の横の書式をクリックして
色などを設定します。

Photo_20210214111303
セルにランダムに色をつけるというVBAを試してみましたが
出来上がりは どうってことないのに これだけでも 頭を使います(*_*)
しかし これは 手作業で色を付ければいいじゃんという 結論に達しました。
一応 エクセルのVBAで作って ワードで画像ファイルにして遊んでみました。

Photo_20210214124501

Photo_20210214124601

« ガラス器の花 | トップページ | Mさんのワード絵展 »

エクセル」カテゴリの記事

コメント

どうも、ここまでくると、根気の続かないアッシには…、無理でヤス、 ヘイ。

サヌ・ヒロさんへ

私も やる気のなさと いい加減さは 人に負けない??と思うのですが
だから ついつい 何か楽な方法はないかとさがし 結局 時間と手間がかかりますが
パソコンの能力の無限さに感心します。

コメントを書く

(ウェブ上には掲載しません)

« ガラス器の花 | トップページ | Mさんのワード絵展 »

2021年4月
        1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30  

ブログ

リンクページ

無料ブログはココログ