なかのにっき

最新版はこちら。 突っ込みは各日付の BBS エントリのほか、 メール (nakano@st.seikei.ac.jp) や フォーム からどうぞ。 なおスパム除けのため、BBS 機能には 緩い認証を入れて います。 検索エンジンから来た方は、エンジンの方のキャッシュを見るか、 下の簡易検索を試してみてください。


hns - 日記自動生成システム - Version 2.19.5

先月 2002年05月 来月
1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30 31
Namazu for hns による簡易全文検索
詳しくは 詳細指定/ヘルプを参照して下さい
検索式:

2002年05月30日(木) [n年日記]

#1 [LDP] 5/30 の update

#2 [labo] 工学研究報告

3 節まで書けた。あと結果と考察。 まあ書く内容はもう決まってるので、そういう意味では気楽。

とかいいつつダラダラ居残ってグラフを作る。 SMA4 で 3x4 枚のグラフを A4 に詰め込み、 都合 18 本の線をちまちまと引いていく。あほだ。

しかしさすがにそんな単調作業が終わった後には、 もう文章を書く脳ミソは残っていなかった。

まあだいたい 6 ページというところかな?

#3 [cycle] 登校

もう暑い。夏場は無理かなー。

#4 [dept] 助手会

会員数が増えた :-)

#5 Excel VBA で特定の名前のシートがあったら消す

あおきさん からコメントをいただいた。
Private Sub CommandButton1_Click()

Const DEL_NAME = "sheet3"

Application.DisplayAlerts = False
For Each ws In Worksheets
    If StrComp(Trim$(ws.Name), Trim$(DEL_NAME), vbTextCompare) = 0 Then
        Worksheets(ws.Name).Delete
    End If

Next ws
Application.DisplayAlerts = True

End Sub
すばらしい。ありがとうございます。For Each で嘗めればいいのかー。

なおうちの環境だと
Option Explicit
が自動的につくようになっていたので、 最初に
Dim ws As Worksheet
のように宣言する必要があった。

#6 [freshmeat] 5/29 分の新着メールから

#7 今日のビジネス英会話

shelve 棚上げする
escapist 現実逃避者
provocative 挑発的な、刺激的な
controversial 議論の的になっている [n は controversy、但しイントネーションは第一音節]
jeer あざける、馬鹿にする <at>
crack jokes ジョークを飛ばす
laugh away 〜を笑い飛ばす

keywords:

spoof 茶化す、かつぐ、からかう
in poor taste 趣味の悪い
thorny 異論(争点)の多い、とげのある
コメント [全部読む/投稿する]

以上、1 日分です。
タイトル一覧
カテゴリ分類
book
dept
issp
labo
paper
snap
stock
vsj
Powered by hns-2.19.5, HyperNikkiSystem Project

中野武雄 (NAKANO, Takeo) <nakano@st.seikei.ac.jp> Since 1999-10-07
RSS feed, 更新時刻, LIRS エントリ, アクセス制御 (解説)

中野のホームページへ