Betaのトライアルマシン
91年ころのバイクなので30年以上になります。
95年にCBX400Fと交換したものです。(CBX400Fは今では300万以上になってビックリ)
昨年エンジンをかけていなかったんですが、
キック数回で2年ぶりにエンジンがかかりました。
前タイヤの空気が抜けていたので修理。
だいぶ昔にパンクしてチューブにも構わずパンク修理材を注入したため、
パンク修理材がバルブ奥でつまりエアーが入りません。
バルブを抜いてもエアーが通らなかったため、
千枚通しでパンク修理材のつまりを抜いて、バルブ交換をして修理しました。
次にスイングアームのチェーンガードの樹脂がボロボロだったので木で代用修理。
ブレーキスイッチが壊れていたので修理。
チェーンの遊びを調整
ヘッドライトのハイランプが切れていたので交換
キャブをキャブクリーナで洗浄。
そして公道も走れるよう自賠責に加入
これでバイクを久々に楽しめる。
先日チョイノリしていて、フロントタイヤを上げようとちょっと踏ん張ったら、
太ももがピキっとなり、バイクを修理しても体の劣化はどうしようもないと感じました![]()
エクセル家系図ver6.0を公開します。
①家系図のをフォントを変更できるようにしました。
②家系図の生年月日、没年月日を見やすくしました。
フォントの変更は設定シートで
ダウンロードはこちら(vectorサイトにリンク)
セキュリティ強化のためマクロを実行できない場合があります。
展開したファイルを右クリックしプロパティを表示し、【全般】の一番下に表示される
セキュリティ:このファイルは・・・・・ブロックされる可能性があります。
【許可する】にチェックを入れて適用して下さい。
このブログにサイト内検索を付けました。
2009年から使用していた薪ストーブもだんだんヤレてきたので
シーズン前に交換しました。またもホームセンター安物ストーブです。
90kg弱の重量物なので交換は大変でした。
が、火力もあり暖かく薪ストーブは最高です。
2009年から2022年まで使用していた薪ストーブ
2022年10月交換した薪ストーブ
全身汗だくで、苦しくて辛いんだけど
何か楽しい?
カーポートを作ろうかと庭木を伐採しながら、伐根しています。
30年位たった庭木はそれなりの根を張っています。
今日は3本、前の土日から昨日まで伐採しながら6本伐根しました。
(伐採前に今までの感謝を込めて神様、仏様に伐採のお許しをお願いしました)
スコップと移植ベラ、のこぎり、せん定ばさみなどを使い
無心で穴を掘り、根を切りながら、また、無心で穴を掘り。。。
その繰り返しで、伐根します。
草刈りも薪づくりも本当に苦しくて辛いんだけど
達成感があるからかな~。。。
何かやろうとして、目標を決めてやる事は辛くても苦しくても
結果、楽しいのかな~?
ん~ 無心が楽しいのかな!
小さいのがあと5~6本ぐらいと巨大な根が1本あります。
無心を楽しみます。
エクセル家系図ver5.9を公開します。
(SHINさまのご要望の一部を反映しました)
①家系図の名前部分の背景色を変更できるようにしました。
②家系図の罫線の交差部分を跨ぐようにしました。
③子供の罫線の長さ変化を選択できるようにしました。
④配偶者2の配置エラーを修正
設定シートで変更できます
ダウンロードはこちら(vectorサイトにリンク)
田沢小学校が今年度で閉校になります。地域から小学校がなくなることは寂しいことですが、過疎化に少子化、仕方ないですね。
20数年前、田沢小学校の一部改築に際して「旧校舎に感謝する会」が開催され、その時に上映された「写真で見る田沢小学校の歴史」をもう一度見たいとの声があり、動画にしてみました。当時はJAVAアプレットを使いブラウザで表示していましたが、セキュリティが厳しくなり、いろいろ設定しないと表示できなくなりました。何とかブラウザで表示できたので、それを録画してYouTubeにアップしました。
懐かしい
エクセル家系図ver5.7を公開します。
変更点は、家系図の自動作成と登録関係のエラー修正になります。
ダウンロードはこちら(vectorサイトにリンク)
3/4追記
カード削除のエラーがありました。
カード削除でVBAエラーが出た場合は、デバッグしてください。
Sheets("個票").Select
Range("b6:j6,b9,g9,h9,b13:e13,g13:j13,d17:d30").Select
Application.CutCopyMode = False
Selection.ClearContents
の
Range("b6:j6,b9,g9,h9,b13:e13,g13:j13,d17:d30").Select
を
Range("b6:j6,c8,c9,g9,h9,b13:e13,g13:j13,d17:d30").Select
b9 → c8,c9 に修正して下さい。
最近のコメント