遠くをはかる者は富み

遠くをはかる者は富み
近くをはかる者は貧す
それ遠きをはかる者は百年のために杉苗を植う。
まして春まきて秋実る物においてや。
故に富有り。
近くをはかる者は
春植えて秋実る物をも尚遠しとして植えず
唯眼前の利に逢うてまかずして取り
植えずして刈り取りことのみ眼につく。
故に貧窮す。

二宮尊徳のことば。

先を読み勤勉にということなのだろう。

日本でいちばん大切にしたい会社

Word2007で行間が開き過ぎていると感じた場合の対処法

Word2007を使っていて、フォントを縮小したときに、行間が開き過ぎていると感じた場合の対処法。

1. 対象となる文章を選択する。
2. 右クリック
3. 段落を選択する。
4. 1ページの行数を指定時に文字を行グリッド線に合わせる(W)のチェックを外す。

これで開きすぎた行間が狭まる。

TortoiseSVNで競合SideBySide

職場でそろそろちゃんとソフトウェアのバージョン管理をしようということで、Subversionを導入した。
ちかごろは大分便利になったもので、サーバ側は Bitnami Redmine Stack とやらで簡単にセットアップ完了。
その後、クライアントPCに TortoiseSVN にインストールを試みた。

クライアントPCは Windows Vista の Ulitimate(SP2)。
これに TortoiseSVN-1.6.12.20536-win32-svn-1.6.15.msi をインストール。
VB5がインストールされており、最近までVisalStudio2010がインストールされていた。

無事インストールが済んだと思い起動しようとすると、こんなメッセージが

C:¥Program Files¥TortoiseSVN¥bin¥TortoiseProc.exe

このアプリケーションのサイド バイ サイド構成が正しくないため、アプリケーションを開始できませんでした。詳細については、アプリケーションのイベント ログを参照してください。

さらにログを確認すると

「C:¥Program Files¥TortoiseSVN¥bin¥TortoiseSVN.dll" のアクティブ化コンテキストの生成に失敗しました。マニフェストまたはポリシー ファイル "" 行 のエラーです。 アプリケーションで必要なコンポーネントのバージョンが、既にアクティブな別のコンポーネントのバージョンと競合しています。 競合しているコンポーネントは次のとおりです: コンポーネント 1: C:¥Windows¥WinSxS¥manifests¥x86_microsoft.vc90.crt_1fc8b3b9a1e18e3b_9.0.30729.4148_none_5090ab56bcba71c2.manifest コンポーネント 2: C:¥Windows¥WinSxS¥manifests¥x86_microsoft.vc90.crt_1fc8b3b9a1e18e3b_9.0.30304.0_none_d9c474bda3593bfa.manifest」

解決を試みる。
C:¥Windows¥WinSxSを「x86_microsoft.vc90.crt_」検索すると4フォルダ見つかる。
うちログに記載があるのは
「x86_microsoft.vc90.crt_1fc8b3b9a1e18e3b_9.0.30729.4148_none_5090ab56bcba71c2」と「x86_microsoft.vc90.crt_1fc8b3b9a1e18e3b_9.0.30304.0_none_d9c474bda3593bfa」。
中身を確認するとどちらにも「msvcm90.dll, msvcp90.dll, msvcr90.dll」が存在する。
プロパティの詳細を確認するとMicrosoft@ Visual StudioR 2008の製品とある。

Microsoft Visual C++ 2010に問題があると思い下記をインストール。
Microsoft Visual C++ 2010 再頒布可能パッケージ (x86)
引き続き動作しない。

おなじく下記をインストールし2010の方をアンインストール。
Microsoft Visual C++ 2008 SP1 再頒布可能パッケージ (x86)
引き続き動作しない。

ついでに下記もインストール
Microsoft Visual C++ 2008 再頒布可能パッケージ (x86)
引き続き動作しない。

プログラムの追加と削除を確認すると
「Microsoft Visual C++ 2008 Redistributable - x86 9.0.21022」と「Microsoft Visual C++ 2008 Redistributable - x86 9.0.30729」がある。
問題点は9.0.30729と9.0.30304が競合していること。
ただし9.0.30304はいつインストールされたかわからない。

とりあえず「Microsoft Visual C++ 2008 Redistributable - x86 9.0.21022」と
「Microsoft Visual C++ 2008 Redistributable - x86 9.0.30729」をアンインストール。

その後あらためてTortoiseSVNをインストールしたところ起動するようになった。

やたらと時間がかかった。
これで学んだことは、 Windows の深いところは訳がわからないということ。

恐怖の独り言

家族で隣の駅のショッピングモールへ買い物に行った帰りのこと。
日も落ちて暗くなった夕方。駅のホーム。丁度帰る人が重なる時間なのだろうベンチが埋まりそうな位は人がいた。

次の電車を十分ほど待たねばならない。空いているベンチを見つけたので子供を座らせた。隣には読書中の四十代位の女の人が座っていた。
うちの子は三歳。落ち着きが無いので、隣の人の邪魔になってもいけない。大人しく座っているよう言い聞かせた。

隣の人が本を詠むのをやめ子供の方を向く。よくあるのだが女性は小さい子供をみたら構いたくなるものか話し相手になってくれたりする。そんな事だろうと思った。
次の瞬間「何してんのよ!」と叫ばれた。
何が起きたかわからなかった。
続けて「言いたい事があるならこっちに来なさいよ!」
全く意味がわからない。
どうやら少し離れたところに知り合いでもいるようだ。目を向けてみるがそれらしい人は見当たらない。

しばらく聞いてわかったのだが、どうやら独り言らしい。幻でも見えているのか、本人は人に向けて話して居る様子だが、その相手は近くにはいない。

その女の人が言ったことをまとめると
全く関係がない社会問題について某テレビ局からインタビューを受けた。
テレビで放送された内容はデタラメ。例えば本人が会ったことも無い人物と知り合いだとされた。
そのテレビ局の人間に執拗な嫌がらせを受け続けている。
自転車を壊されたり、家の鍵を取られたり。
そのテレビ局の人間は電動自転車に乗っている。

独り言は電車に乗る直前まで続いた。

家に帰ってから気になったので、独り言に出て来た社会問題について調べて見た。
驚いたことに独り言に何回か出て来た人物の名前が見つかった。別段有名な人ではない。
どうやら完全な妄想ではないようだ。

なんにしろ、今度近くにいると気がついたら近づかないようにしよう。
子供もびびっていたし。

幼児のメガネ

子供が3歳児検診で引っ掛かってしまった。視力を病院で検査することに。

検査した結果、近視があり、視力も0.1程度と平均より低いとのこと。
再度検査はするがメガネをかけさせる必要があるそうだ。

3歳児の視力はおおよそ0.5から0.6とのこと。
殆どの子は遠視で生まれ徐々に矯正されてゆくそうだが、逆に近視で生まれる例もあるそうだ。

先生の云う事には

1. 人の視力はおおよそ7歳くらいで定まる。
2. 視力の成長を助けるには、モノを見るのに出来るだけピントがあっていた方が良い。
3. メガネをかけたり外したりしても視力が下がる原因にはならない。

総合すると、視力が成長するこの時期にメガネをつかってピントをあわせてモノをみせておいた方が良い。
出来るだけ寝るとき以外は、メガネをかけるようにした方が良いということだ。

なお、メガネのかけはずしで視力が下がるというのは、よくある誤解らしい。

嫁の両親は、嫁が小学校に入るくらいの時にえらく医者にしかられたそうだ。
網膜色素変性症で視力に異常があると知りつつもメガネをかけさせることに熱心でなかった為だそうだ。
それだけ聞くと「何で?」と思うが、視力が成長する時期にかけさせていなかったということが問題だったということだ。

病院の帰りにメガネ屋を見て回った。クリスマスも間近だ。せっかくだからよく似合うやつを買ってやろう。

近視・遠視・乱視 - [目の病気] All About
子供メガネ研究会
こどもメガネ アンファン

特例子会社のありかた

ある特例子会社が主催したセミナーを受講した。
厚生労働省委託事業「働く知的障害者からのメッセージ発信事業」ということで行われたものとのこと。

障害者雇用は右肩上がりで、実雇用率は3年前に1.55%だったのが1.68%。
身体障がい者で2万人増。知的障がい者でも同様に2万人増。精神障害者では3733人からおよそ3倍の9941人になったとのこと。

障害者雇用率のNo1の都道府県は山口県で2.2から2.3%とのこと。
理由はユニクロの本社があるため。
障害者雇用率として定められているのが1.8%にたいしユニクロは8%。これによって平均が引き上げられているという。

特例子会社への批判についての話があった。
批判の内容としては「閉鎖的である」といことらしい。つまり企業グループ全体で受け持つはずの障害者雇用を一社にまとめることにより従業員が障害者ばかりになる。これが閉鎖的ということ。
この批判については、講演者の特例子会社の方は「就労機会を設けること優先する」と言っていた。

批判の内容は理想からきたものであるが、特例子会社のありかたとしては現実を優先しているということだろう。
なお、その会社では従業員の約半数が知的障がい者である。これはこれで障害者雇用として達成するのがむずかしいことをおこなっている。立派な会社だ。

障害者雇用促進法による雇用率

ExcelVBAでの"算術型"Round

ExcelのVBAを使用してデータの編集を行っている。

もともとExcelファイルで貰ったデータでこれをシステムに合うように編集する。
例えばExcelファイルでは千円単位でデータが作成されているが、システム上では円単位なので1000を掛けたりといった編集を行う。

もとのファイルは多少の式も入っており、見ただけではわからないが小数点以下の端数もデータとしてはある。
ただし必要なのは見てわかる数字だけ。隠されている端数は使用しない。
編集する際にはこの端数に注意が必要だ。

例えば以下のようにセルの値を取得した場合、表示されていない端数も取得される。

val = ASheet.Cells(row, col).Value

端数がある状態で、千円単位から円単位にするため1000を掛けたりすると誤差が生まれてしまう。
Excelで表示されている通りに値が取得出来れば良いのだが、出来るかどうかわからない。
とりあえずRoundで対処することにした。

Round関数は以下の2通りを選択出来る。

Excelのワークシート関数Round

"算術型"の丸め処理

VBAのRound関数

"銀行型"の丸め処理

Excelで表示されている通りにするのが目的なのでワークシート関数を使用するのが正しそうだ。

参考 :
[XL2000]VBA の Round とワークシート関数 Round の違い

関連 :
消費税計算で四捨五入