■極寒
夜中に寒さで目が覚めた
毛布もあるしヒートテックも
来ていたけど、そんな防波堤
は何も関係がないかのように
寒気が身を包んだ
寒くなるとは聞いてたけど
これほどまでとはと思った
東京では雪が積もってるらしい
FaceBookをチェックすると
カフェバーも親戚も
投稿があり元気なことが分かる
なんだかそれで満足というか
してしまって、わざわざリアル
で合うことも必要ないような
気分になる。
まぁそんな事言えば怒られそうだけど
本場のアメリカでも
同様な問題が起きているらしく
ゆるいオンラインのみの
付き合い的になり
友人が増えているようで深い友人は
できないなんてのがあるらしい
SNSをやればそーいう心理になる
ということだ
■ネタ
毎日のようにエロビーを落としている
し、Dugaなんかでも買ったりとか
もしてるけど、なんというか
なにを観ても興奮しなくなった
というか。どーでもよくなってきてる
いざっシコスを開催する時も
グッとくるネタがなく
古いコレクションをあさってみても
なにをやってもダメだ
かといってリアルな女の体も
同じなんだろうというか
セクロスに対して急速に興味が
薄れていっているのを感じる
■異常
今日はいつもより胃がいたい
ピロリががんばり杉てる
あの野郎、小さいくせに
生意気だ。とにかくガストール
飲んでも、おさまらないし
やっぱ病院行って
退治しないと、宿主のオレの
ほうがまいってしまう
よく考えれば厄年
今年はロクなもんじゃねー
のかもしれない
自分は弱いなと思う
ちょっと無理をすれば体が
エマンジェンシーを体が発する
不安杉、考えすぎだろうか
今更、変えられないというのもある
■Project-D
なんのことはない机と椅子を
amazonから買おうと思ってる
デスクだからProject-D
カード払いだけど
2月の引き落としが
携帯とオンラインエロビとAmazon本
購入で2万あるみたいだから
やっぱ加算するのは愚の骨頂で
3月引き落としになったら買おう
と思ってた。調べるとカードは
16日〜15日〆の10日払いだから
今日はもう23日だから今買えば
2月でなく3月引き落としになるわけで
問題なく買えることが判明
あとで購入しておこう
■ケティ
会社のぶちゃいくキャラ30代女子の
ケティ。常務と話をしているけど
ずっと足をかきながら話しておられる
完全に上司と思ってない舐めたスタンス
ある意味かっこいいかもだけど
いい印象はやっぱない
人のことはあまり言えないけども
自分視点しかない人なんだろう
プライドが人の2倍くらい高いのも
やっかいだ
人のふりしてわが身を直せか
同じレベルだから腹が立つ
ケンカは同レベルでしか発生しないと
いう言葉もある
■エクセルVBA オートフィルター後の行の取得
http://support.microsoft.com/kb/401692/ja
Private Sub CommandButton1_Click()
Dim FilterRow As Range
With ActiveSheet
If .AutoFilterMode Then
For Each FilterRow In _
.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible)
If FilterRow.Row <> 1 Then
MsgBox FilterRow.Row
End If
Next FilterRow
End If
End With
End Sub
■エクセルVBA オートフィルターON/OFFボタン
Private Sub CommandButton2_Click()
With ActiveSheet
If .AutoFilterMode Then
.AutoFilterMode = False
Else
.Range("A5").AutoFilter
End If
End With
End Sub
■自立制御
Amazonで机と椅子で
2万くらいのを購入しようと
したけど、できない、、
やはり2万はでかい
金の話ばかりしてて
節約、節約なんて連呼していて
自己洗脳に陥ったのか
万単位はキツイと思うように
なっていた。
買う決意がつくまで
しばらくかかりそーだ
まぁ寒いしそれでもいいかと
思う
