LAN-PRO

Oct

30,

2022

映像と音声その104（Video三脚）

重いビデオカメラを使うようになって、三脚と雲台の重要性がわかるように
なってきた。
国産ではLibecという良い会社があり、雲台は使っているが、なにせ高い。
さらに、このクラスではSachtle（ザハトラー）という更に高額な機材がある。
機種によっては50万円もするが、私には無用であり欲しいとも思わない。
今回の三脚と雲台は4万円でお釣りがくる中華製、BENROのBV6。
Webでは高評価だが「ブランド品」ではない。

映像業界は、このブランド志向が意外に強い、たしかに良いものがあるが、
そこまで高額な価値があるのか、私にはわからない、信号伝送のプロとして
言わせていただくなら、それよりケーブルや中継機にお金をかけるべきと
思う。

わかお　かずまさ

VegaSystems

📷📷📷📷📷📷
#LAN_PRO
#Bloguru
#kuma_ichinomiya
#VegaSystems
#photography_Ichinomiya

#kuma

Oct

30,

2022

Excel-VBA RangeとCells

Macroを編集してVBAを書き上げるとき、一番戸惑うのはRangeです。
Excelでは、Rangeでセルの指定を行います。
Range（”A1：X10”）のような表記となります。
しかし、このままでは固定したRangeならともかく、変数を使っての指定は
出来ません。

こんな時はCellsを使います
Cellsは以下のよう使い方ですが、Excelの標準のA1の表記は　X-Yであるのに、
Cellsは　Y-X　であることに注意が必要です。

'-------------------------------------------------------------------
Sheets("SKD1").Select

Range(Cells(St_n, 3), Cells(En_n, 33)).Select

Selection.ClearContents
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
ActiveWindow.SmallScroll Down:=-6
Range("A1").Select

'---------------------------------------------------------------

わかお　かずまさ

VegaSystems

📷📷📷📷📷📷
#LAN_PRO
#Bloguru

#kuma

Oct

30,

2022

100gドローンTello

これが100ｇドローン。リモコンは別売、ガードケースも別売、総額で2万円程度。
リモコンはは無くてもスマホで操作可能。

1：Telloアプリをスマホにインストール。
2：Telloの電源をONにし、スマホのWiFiでTelloと接続する。
3：接続完了したら、Telloアプリを起動
4：コネクションが出来ていれば、スマホ画面にTelloカメラの画像が出て、バッテリー
残量が表示される。
このままで離陸可能、2つの操作ボタンで、上下・回転、前進後退・左右の進行可能。
静止画も動画も撮影可能。
5：Telloアプリの調整（歯車）をクリックすると、BTでのリモコンの接続画画面になる
リモコンの電源をいれ、接続が完了すると、コントローラで操作が出来る。

6⃣：撮影画像は本体では無く、スマホのPictureとMovieのホルダにTelloフォルダーが
作成されて、そこに収納されている、動画は必ず録画終了ボタンを押さないと記録され無い。

スマホとBTでリモコンで操作する方法です。

わかお　かずまさ

VegaSystems

📷📷📷📷📷📷
#LAN_PRO
#Bloguru
#kuma_ichinomiya
#VegaSystems
#photography_Ichinomiya

#kuma

Oct

30,

2022

映像と音声その103（XLR結線）

https://www.cable-tsukasa.jp/new/2020-03-27-135307.html

後ほど解説します

わかお　かずまさ

VegaSystems

📷📷📷📷📷📷
#LAN_PRO
#Bloguru
#kuma_ichinomiya
#VegaSystems
#photography_Ichinomiya

#kuma

Oct

30,

2022

やはり残念だった「餃子の〇〇」

最近NEWSになっている、京都の老舗中華のチェーン店に行ってみた。
30年以上前に一度だけ食べた事を、一口食べて思い出した。

餃子は美味かったが、他のチャーハン、麻婆豆腐、担担麺は、どれもベースが同じ
中華味で残念だった。

それでも結構混み合ったいた（午後3時）、失礼ながら皆さん味音痴ではないかと
思った次第。

帰宅後、化調独特の後味を感じた、二度と行かない・・・・・

わかお　かずまさ

VegaSystems

📷📷📷📷📷📷
#LAN_PRO
#Bloguru

#料理_一宮
#男子厨房に立つべし

#kuma

Oct

30,

2022

100g以下のドローン

2022年6月からドローンの規制がやっかいになった。
リモートIDの付加と申請が必須（3年の猶予がある）となり、
指定地域（仕事で撮影する場合は99％該当）での飛行は、事前許可が必要。
当然、お役所仕事であるから面倒くさいし、期日指定であるので天候次第で変更などは
出来す、事実上仕事にならない。

仮に許可を得て飛行させても、近隣の方から「怪しいドローンが飛んでる」等で、
簡単に110番されてしまう。

さりとて仕事で撮影が必要の場合には、100ｇ以下の「おもちゃ」を使う。
中華製の本当のおもちゃでは使いモノにはならないが、TELLO製のそれは、どうにか
静止画の撮影は出来る、動画はあまり使えない。

100ｇ以下の場合、法的にはかなり自由度が高く、ガードを付けておけば、万一
衝突しても怪我に至ることはほぼない。

ドローンが人体に触れた時、一番危険なのはプロペラでの受傷。
高速で回転しているので、100ｇ以下でも、皮膚に当たれば怪我の恐れがある。
このため、ガードをしっかりしておく必要がある。

この手の「おもちゃ」は近接時の障害回避などの機能がほぼ無い、このため操作に
熟練していないと、衝突での破損や紛失、回収不能などの危険が伴う。

それに軽量ゆえ、風にめっぽう弱い。
「使い物ならない」との声も聞くが、それは工夫が足らないし、思い込みが強いの
ではないかと思う。

Web記事の鵜呑みや、使い込みもせず「ダメ判定」は損をする。

写真は仕事での撮影

わかお　かずまさ

VegaSystems

📷📷📷📷📷📷
#LAN_PRO
#Bloguru
#kuma_ichinomiya
#VegaSystems
#photography_Ichinomiya

#kuma

Oct

30,

2022

Excel-VBA MSGBOX、INPUTBOX

Excel Macroを多用するなとの記事を、時々見かける。
内容は大抵、動作はするが、中身がわからないとのことだ。

本当にそうだろうか、これは投稿者は実は孫引きしているだけで、VBAをまともに
記述出来ないのだろうと思っている。

Macroは作りっぱなしでは、実に可読性が悪い、これは事実。
しかし、これにコメントを入れ、MSGBOXやINPUTBOXを少し書き足してやれば、
安全度は格段に向上する。

以下は、その実例、Macroは最後のブロックのみ、あとはMSGBOXで使用者が判断
できるようになっている。
※複数のMSGBOXを使う場合、処理中断はGotoで終了させるが、Gotoは多用してはダメ。

Sub Pre_Print()
'
' Pre_Print Macro

'
Dim St_c As String, En_c As String

Dim St_n As Long, En_n As Long

Dim rc As Integer

St_c = InputBox("開始行を入力してください", "値をクリアします", "14")

St_n = Val(St_c)

If St_n < 10 Then

MsgBox ("値が小さすぎます")

GoTo Continue
End If

En_c = InputBox("終了行を入力してください", "値をクリアします", "25")

En_n = Val(En_c)

If En_n > 59 Then

MsgBox ("値が大きすぎます")

GoTo Continue
End If

rc = MsgBox(St_c & " - " & En_c & "をクリアします", vbYesNo + vbQuestion, "確認")

If rc = vbYes Then

MsgBox "処理を行います"

Else

MsgBox "処理を中断します"

End If

'
'-------------------------------------------------------------------
Sheets("SKD1").Select

Range(Cells(St_n, 3), Cells(En_n, 33)).Select

Selection.ClearContents
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
ActiveWindow.SmallScroll Down:=-6
Range("A1").Select

'---------------------------------------------------------------

Continue:

End Sub

わかお　かずまさ

VegaSystems

📷📷📷📷📷📷
#LAN_PRO
#Bloguru

#kuma

Oct

30,

2022

柿の収穫

100ｇドローンで撮影、ガードを180度反対に取り付けたため、写っている。
山の様に柿がある、この面積の7-8倍はある・・・・

柿の収穫を手伝った。
多分、15コンテナくらい。1コンテナで15Kg前後だから200Kg程度かな・・・
柿の収穫は、時期によって方法が異なる。色づき始めた頃は、個々に判定せねば
ならず、恐ろしく効率が悪い。
ある時期（今頃だけど年によって当然違う）から、いわゆる「全採り」が可能となる。
つまり手当たり次第に採ってOKとなる。

しかし、広大な柿園での収穫は、やたら手当たり次第では効率が良くない。
一番は運び出しの事を考えないと運搬で疲労する、斜面のある柿畑なので、一輪車
、それもきっちり空気が入ったそれでないと、運び出しで疲れてしまう。

わかお　かずまさ

VegaSystems

📷📷📷📷📷📷
#LAN_PRO
#Bloguru

#kuma