ルーター接続 Webアクセス保護の影響があるので、特定のポートを開放 詳細設定>Webアクセス保護>HTTPプロトコルで使用するポートを見直し VNC viewer ファイアウォールで、ルール追加

VSCode関連 鍵作成 鍵作成→authorized_keysに登録 config作成 クローン VScodeのgitから、リポジトリのクローン 上述の鍵により接続 ssh://********（接続名）/**/**/**.gitに接続 拡張機能追加 Git History GitLens Git Graph ブランチ名 古いのはmaster 今…

Mac mini2012のサポート切れ等々により、 更新を検討していたところ、M2 Mac miniが発表となり、購入（２月７日に到着）初期設定の備忘録として、φ(..)メモメモ ※timemachineによる復活をしていない Chrome SafariからChromeを検索 → インストーラーによりイ…

愛用のMajestouch Stingray テンキーの「９」のみレスポンスが悪くて、反応しづらくなってしまいました。メカニカルスイッチは、スイッチ交換でも治せるようだし、修理に出すのも何だし、 分解方法はネットに転がっていないけど、まぁ挑戦ぐらいの気持ちで分…

Sub PrintCurrentPage() ActivePrinter = "プリンタ名" ActiveDocument.PrintOut Background:=True, Range:=wdPrintCurrentPage, Copies:=1 End Sub これをクイックアクセスツールバーや、リボンに置く。ワンクリックでそのページだけを印刷できて、便利。

excelのエンターを押した際の挙動コントロール アドイン化して、リボン等にいれるのがオススメ Sub RetruntoRight() Application.MoveAfterReturn = True Application.MoveAfterReturnDirection = xlToRight End Sub Sub RetruntoLeft() Application.MoveAft…

インターネット等からDLしたファイルのセキュリティ設定を解除するPowershellコマンドを VBSによるツール化し、かつD&Dで解除できるようにしたもの。docs.microsoft.com Option Explicit Dim wsh Dim GetPath Dim path Dim OPT Set wsh = CreateObject("wscr…

定期的な作業とかをするために導入したアラーム これは、１０時の例です。 Option Explicit Dim Alerm Alerm = "10:00" ' 時刻の指定 if CDate(Alerm)>Time then While CDate(Alerm)>Time WScript.Sleep 10*1000 'ms Wend '処理を書きましょう end if wscrip…

ラズパイ４を導入し、移行作業中、 我が家のラズパイは、温度監視をしていますが、 ImportError: cannot import name 'Beaglebone_Black_Driver' from 'Adafruit_DHT' (/usr/local/lib/python3.7/dist-packages/Adafruit_DHT/__init__.py) エラーが出ます。…

FILCO Majestouch Stingray CHERRY社が新規開発した低背タイプメカニカルスイッチ“CHERRY MX Low Profile Red Switch” を採用している、ロープロ系→要はメカニカルキーボードの中でも、薄型（比較的）のものですが、 なんと、この度、気づけば、３台体制にな…

最近パソコン作業の簡素化のために、 自動化ツールなどを検討している中で、 Windowsのデフォルト環境で様々な試行錯誤を繰り返しています。 （特段環境構築しなくても使えるように、作れるように）dionaea.hatenablog.com このあたりを参考にし、 かつ、様…

最近の仕事は、PCを立ち上げないと話にならず、 メールは、ブラウザで見る必要があるので、IEがいつも立ち上がっている。 え？IEとか・・・言うのはなしで。しかーし、このブラウザだと、差し込みによるメール送信とか出来ずに苦労というか面倒。そこで、一…

わかめスープなど、中華スープを作るときに ・・・鶏がらスープの素で、スープを作るときということです。 最初のひと手間として、「ごま油でネギを炒める」そこに水などをいれ、スープを作る。 たったこれだけで、スープの味が何段かレベルアップします。

昨年末来、コロナ感染者が増加していくニュースが増え、 多分にもれず、在宅勤務割合を増やすよう指令が下っています。 もっとこの割合が増えたり職場で感染者が出た場合を考え、準備や環境整備を進める中で、色々と思うことはありますが、 環境というよりも…

Dim FSO Dim OriginalFile Dim NewFile Set FSO = CreateObject("Scripting.FileSystemObject") OriginalFile = "C:\test.txt" NewFile = "C:\new.txt" FSO.CopyFile OriginalFile, NewFile Set FSO = Nothing test.txtが、new.txtとして、コピーされます。 …

大学で学んだことは多々あります。研究の進め方、文章の書き方、 基礎的な勉強から応用的な勉強研究室の厳しい先生に教えてもらい、今の自分がある気はします。 しかし、殊勝な話がしたいわけではなく。 身についたことは多々あれど、教えられて２０年ぐらい…

VBA(access）の場合 variant型から Dim tmp As Variant tmp = array(0,1,2,3,4,5) MsgBox tmp(2) ２が出ます。このとき整数型です。 Dim tmp As Variant tmp = array("0","1","2","3","4","5") MsgBox tmp(2) これも２が出ますが。文字列です。 変数の型を指…

近年、組織内の情報整理のためポータルサイト等を整備している例が多くあります。 多くの場合、システム導入し、イントラネットとして社内の共通システムで、 ブラウザで見ることが想定されているようにも思いますが、 EXCELなどを使ってやられている例もあ…

昨年、新調したものに財布があります。lnnlnnl.hatenablog.comこの財布自体は、非常にコンパクトですし、薄いで、 これまでのストレス感が無くばっちりなんです。しかし、お札自体は、結構特殊な入れ方をするのです。先日、カードを使えず、お札を使用する機…

今週のお題「大人になったなと感じるとき」 人前で、お酒飲めるようになったときとか。 まぁありきたりですね。議論（指摘に近い）とかしているときに、淡々と詰めていってしまうときですね。 （そっちに誘導しようかと）隙を見せつつ、逃げ場をなくすような…

なんとなく職場で浸透してきたことがあります。 とりあえずやってみる。 そうすると誰かがついてくる。 結局、主流になる。 という流れ。 先駆者が必要 意識改革は、誰かがやって、それを黙々とこなし、フォロワーがついてきて、はじめて改革が進みます。 一…

本日は、強い低気圧の影響で雪です。屋根にはうっすら、道路はぼちぼちというレベルですが、最高気温は、２度ぐらい？ 非常に寒い日でした。最近、週１ぐらいでテレワークを行っています。 （もしものときにテレワークだけになったとき用の対策です。 かから…

１４年前、北海道を旅行しているときのこと。ただ、漠然と北海道を一周（半周？）する旅行。 千歳から、帯広→釧路→道東→道北→札幌という日程だった気がします。 その途中にある、北海道枝幸町の風景。 北海道にいるはずなのに、左に曲がれば、北海道・・・。…

年末年始の休みは、今日でおしまい！明日から、仕事ですが・・・えぇ。。。コロナ感染者数は、減ってはおらず、 全国、帰省した人の感染者が増えるなど、 年明けも、コロナか・・・という生活になりそうです。おそらくですが、 人数増加傾向が減らない中、在…

ここ数年使用していた財布は、二つ折りのラウンドファスナー財布で、カードも色々入るし、ランドファスナーで中身を落とすことがないというもので、そこそこ気に入っていました。 しかし、厚い。これだけがネック。カードをどれだけ減らしても厚い。 スーツ…

現在、windowsPC用に使用しているキーボードは、 ①USキーボード（US環境で揃えてしまい、戻れない・・・） ②メカニカルキーボード（赤軸 青は合わず） ③剛性があって ④キーボード全体の高さは低めという選択肢の中から探し、cherry low profileのキーを使っ…

数年に一回（今回は５年・・・前も５年）の更新がやってきたので、運転免許の更新に行ってきました。コロナの影響で、人数制限等があるという話（山口県警察）でしたが、特段の支障はなく。今回は、「優良」更新のため、ものすごく早く終わりました。 受付ま…

最近、気が散ることが多く、 ほんと集中できていないことが多く、ミスも続いています。寒くなってきたからか、散歩減らしたのが良くなかったのか、 とりあえず悶々としていることが増えているので、 そこを打破するために、とりあえず散歩再開。色々思うこと…

サントリー ストロングゼロの期間限定商品ギガレモン！サントリー -196℃ ストロングゼロ ギガレモン 350ml✕12本メディア:スーパーで売っていたので、とりあえず試してみました。レモン感はばっちり、レモンサワーという感じよりも、レモン。ほんと、レモン。…

Access(Microsoft)のVBA備忘録です。ファイルを開きたい場合 Dim FileName As String FileName = "C:\Users\Name\Desktop\sample.txt" 'pathから入力 Call Shell("explorer.exe """ & FileName & """", vbNormalFocus)