月曜日, 8月 03, 2026

Illustratorパターン登録のバグ?

Illustrator(30.6)で1ptのデータをパターン登録すると何故か2ptのサイズとして登録されてしまい、隙間が発生してしまいます。

グリッドを1pt(0.3528mm)として任意の図形を作成し・・・

パターン登録するとこんな感じになってしまいます。

ちなみに2ptで作成すれば問題はありません。2pt以下で問題が発生します。

上は、左が1pt四方を4分割した元データ。右はそのままパターン登録したデータをスウォッチからドラッグしたデータ。外枠は2pt四方になっています。真夏のホラー? 実際のデータはこれではありませんが、2ptで作成して50%縮小しました。少し前までは問題なかったんですけどね〜。ちなみにmacOS版だけでなくWindows版も同様の結果でした。

TCDW8847 
花火大会が今年から座席が有料化されるそうです

私は参加した事はありませんが、地元の花火大会が今年から座席が有料化されるそうです。ルール無用の外国人が増えているので、この方向性は英断ですね。私は支持します。真面目に生活している外国人にとっても、ルール無用の連中には不快感しかないでしょう。

日曜日, 8月 02, 2026

3Dプリンタ遊び 22 
M42マウントアダプターが完成しました

3Dプリンタを購入した目的の一つがカメラ用パーツ作成でした。ということでM42マウントの延長アダプターが完成しました。Fusionで作成しています。なお、今回FreeCADでの制作はM42などの規格ピッチを円柱へ雄ネジ作成が処理が出来ないようなのでカットしました(※)。今後仕様が改善されれば改めて整理したいと思います。

※スケッチで描いた三角形などをスロープ回転させて作成するようですが、市販品との整合性が得られないため。ちなみにオプションで規格サイズのネジ類に対しては簡単に設定できます。


制作途中の失敗はFusionの解説で触れていますが、Baambu Studioでエラーも出なかったのでサポート材を無しにして髭を出す大失態をしてしまいました。

取りあえずサポート材は要チェックですね。

プリント結果で、左はノーマル設定、右は雌ネジを拡大、雄ネジを縮小設定。どちらも2つずつ作成しています。

最終的に雌ネジを拡大、雄ネジはノーマル設定とし、ローレットをくわえました。右は市販の金属製アダプターです。これらとの組み合わせが出来ないとおあうとですから、何度もプリントしてチェックしました。一番難しいM42 マウントが完成したので、これで少し楽になりました。

Bambu Studio 2.6.0.51
Fusion 2702.1.58 arm64
eSUN PLA Plus(黒色)

TCDW8846 
昔の記憶がフラッシュバックしてしまいました

気がつけば、もう8月なんですよね。8月と言えば縁日とお祭り。幼児体験から私は縁日とお祭りがあまり好きではありません。ヤンキー系の集会場だったり、不衛生な屋台とか、絶対に無理です。もちろん時代は変わりましたが、先日、不衛生や屋台の仕込み映像を見てしまい、昔の記憶がフラッシュバックしてしまいました(>_<)

土曜日, 8月 01, 2026

HTMLとCSSの様々な表現 28 
TableデータはExcelで整理すると何かと便利です

前回の様にTableデータのように類似した記述が必要な場合はExcelを活用すると効果的です。

HTMLとCSSの様々な表現 27 色名を直接記述できる標準的な140色の一覧を16進数順に乱立 2026/07/24

まず類似データを列ワケして作成し、行部分はコピーで処理します。

少しずつ整えていきます。

ある程度まとまったらエディターへコピーします。

コピー後に[検索置換]でTABキーを一括削除します。

上は処理結果です。

あとは必要に応じて行頭に[検索置換]でTABキーを入れて体裁を整えます。意外と効果的で癖になります。


TCDW8845 
エネルギー源なので定期的に食べています

Cute Baby Alien 053(^o^)
コロネパン星人・・・。
最近は大好きな菓子パンのアンパンはエネルギー源なので定期的に食べていますが、スペシャルサンド、コロネ、ツイストシュガーパン、メロンパン、カレーパンを食べていません。美味しい店を探さないと・・・。

金曜日, 7月 31, 2026

Excel VBA 55 
ExcelでA列の16進数の色でB列を塗りつぶす

A列の16進数の色でB列を塗りつぶします。

Sub FillColorFromHex()

Dim ws As Worksheet
Dim lastRow As Long
Dim i As Long
Dim hexColor As String
Dim r As Long, g As Long, b As Long

Set ws = ActiveSheet

lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row

For i = 1 To lastRow

hexColor = Trim(ws.Cells(i, "A").Value)

' #を除去
If Left(hexColor, 1) = "#" Then
hexColor = Mid(hexColor, 2)
End If

' 6桁の16進数のみ処理
If Len(hexColor) = 6 Then

r = CLng("&H" & Mid(hexColor, 1, 2))
g = CLng("&H" & Mid(hexColor, 3, 2))
b = CLng("&H" & Mid(hexColor, 5, 2))

ws.Cells(i, "B").Interior.Color = RGB(r, g, b)

End If

Next i

End Sub

A列に16進数を記述します。

マクロ実行後はこんな感じです。

TCDW8844 
ネガティブな事は考えないようにしています

そう言えば,最近ネットで見ない友人のページに行くと、あれだけ小まめにSNSに近況や情報をアップしていたのに2年、人によっては10年も沈黙している事が判明したりすると、かなり心配になります。なかには飽きてしまった人もいるので、出来るだけネガティブな事は考えないようにしています。

木曜日, 7月 30, 2026

Blender Study Notes 77 
ベジェ操作はIllustratorとかなり異なる(1)

ベジェデータを元にモデリングしたい場合は、ついつい慣れているIllustratorで作成してからBlenderに読み込んでいるのですが、Blenderだけでも処理出来るようにすることは大切ですね。ということでBlenderでの処理を纏めてみました。Illustratorとはかなり違うので慣れるのに少し時間が掛かりますね。

ベースとして[オブジェクトモード]>[追加]>[カーブ]>[円]で円を作成して、[TAB]で編集モードに切り換えてから、移動[G] スケール[S] 回転[R] 押し出し[E]の基本操作をまとめてみました。[G][S][R][E]は面やオブジェクトの操作と同様です。

ポイントを選択して[G]キーを押すと移動ができます。

ポイントを選択して[S]キーを押すと両端のハンドルのサイズを調整できます。

ポイントを選択して[R]キーを押すと回転ができます。

ポイントを選択して[E]キーを押すと押し出しができます。結果としてねじれた状態になります。

ハンドルの先端を選択して[G]キーを押すと選択した方のハンドルだけを移動ができ、結果としてそのハンドルの長さを調整出来ます。

ハンドルの先端を選択して[S]キーを押すと選択した方のハンドルだけ長さを調整できます。



ハンドルの先端を選択して[R]キーを押すと選択していない方のハンドルも一緒にポイントを起点に回転できます。



ハンドルの先端を選択して[E]キーを押すと押し出しができます。結果としてねじれた状態になります。なを、ポイントを選択した場合の処理と同じで違いが分かりませんでした。

Blender 5.2.0

TCDW8843 
合計人数は約21億5,000万人になるそうです

機能の続きです。民法で、親族は「配偶者」「六親等内の血族」「三親等内の姻族」と定められています(民法725条)。つまり六親等以上の血族は他人ということですね。「すべての血縁者が必ず子どもを1人しか授からない」という条件のまま家系図全体(直系・傍系すべて)を考慮して30親等までカウントすると、合計人数は 2,147,483,676人(約21億5,000万人)になるそうです。本当かな〜? もう人類皆兄弟ですね〜(^o^)汗