月: 2020年8月

カテゴリー
社会のできごと

05_積水ハウス地面師事件

○積水ハウス地面師事件概要
・ 2017年4月頃
　積水ハウス(S)は土地建物について
　地面師グループ(G)と売買契約を
　締結した。
・ 2017年6月頃
　土地の所有権移転の手続きの際に
　(G)に騙されたことが発覚した。
　 (土地を取得できなかった)
・(S)は約55億円の被害を被った。
・ 2019年1月頃
　 (G)の主犯格が逮捕される。
　 この事件の１７人目の
　 逮捕者であった。
・ 現在も裁判が続いている。

○次1.2.3 考えました
1.詐欺は許せない。しかも 逮捕者は
　”私も騙された”として無罪を
　主張しています。
　改悛の情はありません。悪質です。
2.一度 相手から信用を得ないと
　相手を騙すことはできません。
　地面師グループは信用作りに
　長けており、また相当賢いと
　思います。
　逮捕されてなお、”私も騙された”と
　言い逃れする姿勢は 普段の
　信用作りから培われたもの
　かもしれません。
　また土地建物の紹介者に徹していた
　とすれば被害者に徹しなければ
　ならないのでしょう。
3.この土地建物の売買契約は(G)が有利な
　条件で結ばれていると感じました。
　契約締結前には打ち合わせの際に
　(S)は強く交渉できなかったの
　でしょうか？
　また不利な契約の場合は(S)の
　法務担当者は止めたはずです。
　日常的に不動産を扱う(S)が
　騙されたことが不思議です。
　相当な大金の契約です。

　金額がごく小さいと企業内の審査は
　甘くなるかもしれませんが
　金額が大きすぎる場合も同審査は
　甘くなるのでしょうか？
　それとも ごく限られた人間で
　検討していたのか？
　または 社長の耳に入れておけば
　よいとでも 考えたのでしょうか？
　いずれにせよ(G)担当者は通常の
　状態ではなかったのでしょう。

○終わりに
人が通常の状態でない場合、もとに
戻すための良い方法は尊敬する人に
指摘されることだと私は考えています。

朝の挨拶にはお早うございますがあって
夜の挨拶にはお休みなさいがあります。
身近な人とこういった基本的な交流や
意思疎通を積み重ねて、その人の
尊敬するべきところ発見しておくことが
自分自身の異常時の助けになると
考えました。

以上です



カテゴリー
excell macro

04_determination of a holiday

today’s theme is holiday judgement by excell macro.

I think holiday doesn’t have cycle.
some enterprises has a special holiday.
it is anniversary of founding, and so on.

After some thought,
I decided coding holidays judgement per day.

bellow is macro statement of holiday judgement.

ーーーーーーーーーーーーーーーーーーーーーー
Dim D_num As Date
Dim myData(9) As String
Dim i As Integer

myData(0) = “”
myData(1) = #12/30/2020#
myData(2) = #12/31/2020#
myData(3) = “”
myData(4) = “”
myData(5) = “”
myData(6) = “New Year’s Holiday”
myData(7) = “New Year’s Holiday”
myData(8) = “”
myData(9) = “”

For i = LBound(myData) To UBound(myData)

Dim F_num As Long
For F_num = 1 To 10

D_num = CDate(Cells(F_num, 1))
’assume that there are day of 10 cells from left corner to downward direction
’and format of these cells is day form without asterisk.
’(not *3/14/2012, but 2012/3/14)

If InStr(myData(i), D_num) <> 0 Then
Cells(F_num, 1).Font.ColorIndex = 46
’if the cell matched holiday change the character color.
Cells(F_num, 2) = myData(i + 5)
’and writing holiday name next to this.

Exit For
End If
Next F_num
Next i
ーーーーーーーーーーーーーーーーーーーーーー

i used one-dimensional matrix as two-dimensional
by IF sentence.

thank you.

カテゴリー
エクセル マクロ

04_祝日判定

今回のテーマはエクセルのマクロで祝日判定です。

祝日には周期がないようです。
また企業によっては創立記念日などの祝日もあります。

考えた結果、一日一日 書き込む
ことにしました。

次 コードです

Dim D_num As Date
Dim myData(9) As String
Dim i As Integer

myData(0) = “”
myData(1) = #12/30/2020#
myData(2) = #12/31/2020#
myData(3) = “”
myData(4) = “”
myData(5) = “”
myData(6) = “年末年始の休み”
myData(7) = “年末年始の休み”
myData(8) = “”
myData(9) = “”

For i = LBound(myData) To UBound(myData)

Dim F_num As Long
For F_num = 1 To 10

D_num = CDate(Cells(F_num, 1))
’左角のセルから下に向かって10セル分日付があるとします
’この10セル分の表示はアスタリスクのない日付形式とします
’(*3/14/2012ではなく、2012/3/14とする)

If InStr(myData(i), D_num) <> 0 Then
Cells(F_num, 1).Font.ColorIndex = 46
’祝日に該当するセルの文字色を変更します
Cells(F_num, 2) = myData(i + 5)
’祝日に該当するセルのすぐ右のセルに祝日名を記載します

Exit For
End If
Next F_num
Next i

if文を使って 一次元の行列を
二次元の行列のように
処理しました。

以上です


カテゴリー
take a certification exam

03_2nd class Certified Electrician skills test

the other day, I took 2nd class Certified Electrician
skills test.

The test consisted of the following
・test time:40 minutes
・Complete small scale low voltage wiring work.
・The performance of this construction will be scored to determine pass or fail.
・The test center is indoors.

announcement of pass or fail is some time in the future.
I hope I’m passing.
Actually i took same exam last year and failed it

i have taken variety of certification test,
skills test is second time.

Mark sheet test and skills test are different.
[difference]
1. skills test has a risk of injury.
2. You’ll need physical strength
― strong grip and so on too.
3. And you’ll need feel too that clean wiring is beautiful.
4. It’s noisy during testing for making a circuit.
5. A large amount of wiring scraps and other debris is generated during practice before the test.

skills test makes you serious about injury, physical strength,noise, beauty of wiring.
unlike Mark sheet test.
so skills test more real than mark sheet.

i think i can said, The person who passes this test
is very human.

That’s how I felt when I took the test.

Thank you



カテゴリー
資格挑戦

03_第二種電気工事士 技能試験

先日 第二種電気工事士 技能試験を受けました。
この試験は次の内容で行われました。
・試験時間:40分
・小規模の低圧配線工事を完成させる。
・工事の出来が採点されて合否が決定します。
・試験場は屋内です。

合否発表は少し先です。合格しているといいなと思います
実は昨年も同じ試験を受けて不合格となりました。

今まで私は資格の試験はいろいろと受けてきましたが
技能試験は二度目です。
マークシート試験と技能試験は異なります。
[違い]
1. 技能試験は怪我をする可能性がある。
2. 握力など体力も必要になる。
3. きれいな配線をきれいと感じられる感性も必要。
4. 試験時は工事の音で騒がしい。
5. 試験前の練習中に配線くずなどのごみが大量にでる。

すべて頭の中で考えるマークシート試験と違って
技能試験は怪我・体力・音・配線のきれいさなどに
向き合うため、よりリアルです

この試験に合格する人は人間味ある人ではないでしょうか。
受験を通じて 私はそのように感じました。

以上です