-
投稿日 2022-11-20 15:08
LAN-PRO
by
KUMA
今回はIF-Thenの条件判定式。 数あてGame、乱数で発生させた数値と入力した数値が一致させる。 10回が限度。 入力都度、大きいか、小さいかを答える仕組み。 更にExcelらしく、その値をセルに記入させた。 以下、Source Sub kazuate01() ' ' kazuate01 Mac...
-
投稿日 2022-11-20 08:57
LAN-PRO
by
KUMA
今年、最後の柿の収穫です。 今年は9月末から始まり、二ヶ月もかかりました。 柿の実にはヘソと呼ばれる花弁の残存があり、これが硬いため、他の実に傷を付ける ので、収穫時に除去します。 慣れれば小指で跳ね飛ばすことが出来ます(動画参照) わかお かずまさVegaSystems 📷📷📷📷📷📷 #LAN_P...
-
投稿日 2022-11-18 15:33
LAN-PRO
by
KUMA
[12]で作成した、乱数発生の一覧表500セルの集計一覧表の作成です。 1-99/100-199/200-299・・・・10分類を、列に集計・一覧にします。 [12]の応用で、別のセルに集計する手法で、Sheetでの関数操作では大変です。 こんな場合はVBAが強みを発揮します。 以下、そのSourc...
-
投稿日 2022-11-18 06:47
LAN-PRO
by
KUMA
地平線に霞があり遠景がききません。 昨日は社外にあった観葉植物の屋内取り込み、勝手口のクロージャーの交換など 本業以外で時間をとられました。 明日は最後の柿の収穫の予定・・・・ わかお かずまさVegaSystems 📷📷📷📷📷📷 #LAN_PRO #Bloguru #kuma_ichinomiya...
-
投稿日 2022-11-18 01:31
LAN-PRO
by
KUMA
今回は、セルの値に応じた色での塗りつぶしです。 まず、セルを乱数を発生させた値で埋めます。 次が本番、このセルの値を読み込み、該当する色で 塗りつぶします。 意外に簡単なプログラむです。 以下、Source Sub RANSU_01() ' ' RANSU_01 Macro ' 乱数を発生させる D...
-
投稿日 2022-11-18 01:19
LAN-PRO
by
KUMA
kuma山荘の電飾を下から撮影してみました。 わかお かずまさVegaSystems 📷📷📷📷📷📷 #LAN_PRO #Bloguru #kuma_ichinomiya #VegaSystems #photography_Ichinomiya #AVIUTL #LX100M2...
-
投稿日 2022-11-17 17:52
LAN-PRO
by
KUMA
20X25のセルに連続番号を入れるだけのVBAです。 Renzoku1は、X-Yの連続番号、 Renzoku 2は、Y-Xで連番を振ります。 今回はCellsの理解のためのVBAです。 ExcelのSheetを使うだけではCellsはあまり使いませんが VBAでは多用します。Range(”A1”)な...
-
投稿日 2022-11-17 06:50
LAN-PRO
by
KUMA
かすみがあり、御嶽山が視界にありません。 わかお かずまさVegaSystems 📷📷📷📷📷📷 #LAN_PRO #Bloguru #kuma_ichinomiya #VegaSystems #photography_Ichinomiya #S1R #sunrise_ichinomiya #Suns...
-
投稿日 2022-11-16 17:38
LAN-PRO
by
KUMA
名古屋TV塔の撮影。 芸文の帰路の撮影です、手前がオアシス21。 日曜日の夜、と言っても8時前、地下鉄もJRもガラガラ、地下街も・・・・ わかお かずまさVegaSystems 📷📷📷📷📷📷 #LAN_PRO #Bloguru...
-
投稿日 2022-11-16 07:49
LAN-PRO
by
KUMA
日の出位置は猿投の南麓を下りきって、設楽の低山に差し掛かっています。 今日も快晴、気温がやや下がってきていますが、まだ暖房は不要です。 わかお かずまさVegaSystems 📷📷📷📷📷📷 #LAN_PRO #Bloguru #kuma_ichinomiya #VegaSystems #photog...