投稿者: 溶接板金CAD自動化研修所

言いたいこと、忘れないように書く。

書いている時に、自分はわかるが、今の自分ね。時間が経った自分や他人が読むとわからない。

基本、自分よがりの文書だからしかたないが、読み直したりしていると当初の思いと違う表現に変えているかもしれない。実際に、読み直しして直している。

自分が書いていても、ネットで調べて、そのリンクを付けたりする。前提知識がいる。新規投稿だとその時の臨場感がいる。臨場感抜きで書いているとあとから読んで何書いてんだかわからない。

とりあえず、電流値など忘れやすいことを書いて、その時の気づきを書く。でないと無くなるから。

文書を書くって、読むときのこと、タイミングを考えると。
１，前提知識、経験値
２，やりたい度
３，読むタイミング前の状況
なんかで読み取り方が違うんだろうなー。

キッチン20kg  IHコンロ8kg。ちっちゃなキッチンがあるが結構軽いかも。

今度買う冷蔵庫58kg 入れて100kgにはならないが。

冷蔵庫を買おうかどうかと。

 「住宅の場合、一般的に床の耐荷重は100kg/平方メートル程度」らしい。工務店の人いわく。

でも、

冷蔵庫の230L容量だと8割り程度入れるとして150kgになるのかな。

58kg (冷蔵庫の重量) + 150kg (内容物の重量) = 約200kg

ん。結構あるな。入れすぎ注意だな。

もっと小さい冷蔵庫だな。ほぼ、使わんような気もするし。

完成しない。
そのときは進歩したと思う。
また、時間が経つ。ま、辞めている。
やめることはOK。
またできる？。そこで向かい風が吹いているような感じって何だろう？
・データが壊れないか？
・エラーの位置がわからない
・エラーの意味がわからない
・他のアプリを動かすような難しいことをしている
・やろうとしていることが困難なのか不安
・できるのかできないのか不安
・複雑になると責任が

由無し事を書かないと残らない。話したり何かしてると3分後には思い出せない。

そんな時は、ヒラメいた時の行動。内容を繰り返すと思い出す。思い出せない時はホンマにどうでもええこと。

トラップとは罠のこと。
「トラップ を 仕掛ける」とは、「罠を仕掛ける」。
On Errorでエラーになった時の処理を 仕掛ける。ということ。
「AppActivate “無題 – メモ帳”」は、新規にメモ帳が開いているかどうかでエラーになる。AppActivateが関数ならエラートラップは使わない。
r=AppActivate(“無題 – メモ帳”)で、大抵は戻り値rの値をチェックして繰り返せばいい。Do LoopでUntil r=Trueでいい。
あいにく、AppActivateステートメントは、関数じゃない。だからエラートラップを使う。以下は、新規メモ帳（タイトルが無題 – メモ帳）が起動しないと無限ループ。

Option Explicit

Sub ボタン1_Click()
    On Error GoTo myErr 'トラップを掛ける
    AppActivate "無題 - メモ帳" '-は半角、前後に半角空白
    SendKeys "%{F4}", True 'これはエラーになることない
    Exit Sub
myErr:
    Resume 'エラー処理をもう一度
End Sub

もし、複数の新規メモ帳があったら１つだけ閉じる。全部閉じるならDoLoopでAppActivateからSendKeysまでを囲み、Resumeを削除する。つまり新規のメモ帳が見つからないとエラーになってmyErrに飛んで終わる。

関数じゃないためとか、対象の引数や要素番号があるかチェックする機能が無い場合はOn Error。使えます。

調査はいいこと。

バイナリエディター。30年前に日本語メッセージを変更したことがあった。ただ、文字数、位置を変えたらだめ。

今、どんなことが書いてあるか見るならメモ帳かな。ただし、保存しない！。バイナリファイルをテキストエディターで保存すると改変されて使えん、実行できなくなる。テキストエディターは、データを何とか文字コードに解釈して表示するため。

生のデータを見るのはバイナリエディター、ビューアの方がええ。文字だけなら、テキスト。

ファイルは二種類ある。