2012年4月1日日曜日

エクセル セル内の改行の削除 備忘録

セル内で改行されているデータの改行を取る


置換して改行コードをなくす


[検索する文字列]ボックスに,改行コードを指定する。
何を指定する?
ここでAlt+Enterキーを押しても,それは改行コードを指定したことにはならない。
Alt+Enterキーで改行コードが入力されるのはセル内だけ。

 [検索する文字列]ボックスに改行コードを指定するには,ボックスの中でCtrl+Jキーを押す。

なお,VBAでは改行コードに次のような定数が定義されています。

16進の0D → vbCr
16進の0A → vbLf
16進の0D + 0A → vbCrLf

 テキストファイルなどで使われている一般的な改行コードはvbCrLfである。
しかし,Excelのセル内改行では,vbLfが使われている。


エクセル 全角半角スペースを削除 備忘録

選択範囲の全角と半角スペースを削除するサンプルマクロ


標準モジュールで


Sub 全角スペース削除()
Dim c As Range
Worksheets("Sheet1").Activate
Range("A1", "B3").Select
For Each c In Selection
 c.Value = Replace(c.Value, " ", "")
 c.Value = Replace(c.Value, " ", "")
Next
End Sub

文字間にスペースが入っているなどの処理に利用する。
この場合は,A1からB3のセル範囲を選択している。


2012年3月31日土曜日

指宿で温泉

本日は8割オフの日。
ちょっと足を延ばして指宿で温泉に入ってる。
バタバタと忙しかった最近、来週以降もっと忙しくなりそうな予感を感じつつ、ゆーっくりと温泉した。
世間は引越しなど多忙な土日だろうなぁ。

2012年3月17日土曜日

熊本城

17時を過ぎていた。残念ながら外側だけ見学、散策。

太宰府の梅

飛梅が満開
春の息吹を感じさせる
穏やかな天候に観光客も大勢

太宰府天満宮

新幹線一日乗り放題チケットで博多、太宰府天満宮、熊本に娘と。
一人一万円の切符。
西鉄で太宰府へ御礼になるのかな?複雑な心境。
娘とラーメン食べたり、熊本城行ったり、本屋に行く予定。

2012年3月7日水曜日

吹上庵

そば定食。
他には板そば大盛りなど家族で。
店内はレトロよりも古い田舎感覚。
娘のお疲れさんの意味を込めて。

2012年3月4日日曜日

ケンタッキーの醤だれチキン

じゃんだれだって。醤。
甘辛コチュジャンにコクの隠し味ってコピーで、韓国テイストを感じさせる。
ケンタのチキンはたまーに無性に食べたくなるけど、一度食べると、しばらくは遠慮って感じさせる。
子供と自然の家の帰り。
単なるグルメレポートにもならん、つぶやき日記になってきたのだ。

少年自然の家ボランティア

こどもとお手伝い。
アスレチックで遊んで帰る。
クイズラリーや屋内遊戯、どんぐり玉投げ、竹馬など。
楽しそう。

2012年2月26日日曜日

桜島足湯

まったりと足湯。
ランナーが疲れを癒す。

桜島

娘と桜島に渡ってみた。
特に用事は無く、フェリーのうどんを食べたかった。
ランニング桜島からの帰りのランナーでフェリーは満員の様子だ。
足湯に浸かって帰ろう。のんびりした午後。

2012 鹿児島大学 2次試験(数学)終了

鹿児島大学 2次試験(数学)終了

覚えているうちにコメントを書いておこう。

やっとこさ2次試験が終わった。
実力を発揮できただろうか?
手ごたえはあっただろうか?
準備した学習は役に立っただろうか?

我らが鹿児島大学の入試問題を早速手に入れた。
全てを解いたわけではないが,第一印象を書き残しておく。

1 小問3つ
(1)同じものが隣り合わない並べ方
問題:K,A,D,A,I 2つのAが隣り合わない
コメント:教科書レベル。それも例題,問レベル ウォーミングアップには適切。
鹿児島大学に入学したいなら,絶対解きたい問題。

(2)2次不等式と3の倍数
問題:2次不等式を満たさない,3の倍数でないものをすべて
コメント:満たさず,でないもの。日本語を正しく捉えられるかどうかだけか。
3に関して,3k,3k+1,3k+2などとすると時間がもったいない。

(3)三角形平面図形
問題:中点と中線で二等辺三角形の証明
コメント:どこかで見たことある気がする。重心とは何かがテーマ。
作図力がポイントか?図にもかなりの部分点がありそう。

2 指数関数と微分法
問題:2^x+2^-xをtとおき,tの3次関数に持ち込む。
コメント:相加相乗の定番パターンである。文字の変換も,”一度は”では無く,
少なくとも,”数問”は解いたことがあるはず。
定義域を正しく変換し,正しい増減表を作り,正しくlogに戻す必要がある。

3 平面ベクトル
問題:平面ベクトル 三角形 内積と対称な点
コメント:これも,全く定番の問題で大きなひねりは無く素直な出題である。
対称な点は,垂直条件である,つまり内積が0ということは気づくだろう。
ベクトル絶対値の表記法,適か不適かの判断が,減点対象だろう。

4 微積,漸化式,極限
問題:eについてのf(x)。部分積分で求値。n+1とnの漸化式ができる。
漸化式から和が∑表現されている。更にその和の極限。
コメント:やはりどこかで見覚えのある出題である。
難しい表現は一切無く,基本的なごく当たり前のオーソドックスな出題である。
部分積分は予想通り出題され,部分分数的な発想が和に適用される。
(1)~(4)までが自然な出題で,流れに乗る(前の結果を利用する)必要がある。
ハサミウチの原理は極限の基本パターンである。

5-1 行列
問題:行列Aに対して,A^nを求めさせる。
コメント:逆行列を持たないという条件に言い換えることができるか。
問題文に表記は一切無いが,固有値,固有ベクトルを知っているかどうかで,
見通しが一瞬で立つのか,地味にさせられてしまうのか(大学入学後,
あの問題はこれだったのか!と気づくかな?)分かれるだろう。

5-2 極方程式
問題:r=a/(2+cosθ)に関して,直交座標でかけ。平行移動させよ。一定を証明せよ。
コメント:極方程式は,一見何を言いたいのかが手ごわさを感じさせるところだろう。
しかし,慣れによって,直交座標系に直すのは困難は無く,それらは,
2次曲線(多くは楕円)がテーマになる。問題文は,漢字も多く,(!)
文章自体も他の問題と比較すると,長めである。嫌な感じはするだろう。
最後は扁平率に関する出題になっており,数学的にも面白い。
なお,これから車に乗り,走りに興味が出てくると,タイヤに”へんぺいりつ”
が関わってくる。タイヤに関しては偏平率と書く。扁平率と書くと意味が異なる。
(偏平率とは,サイドウォール部分の幅をタイヤ幅との割合で表したものである。)

5-3 確率
問題:商品1個で景品1個もらえ,n個の景品とn枚のカード。
少なくとも1個…,全種類の景品…。
コメント:文章解釈の問題であろう。カードを引き,景品がもらえる。
なんとも,駄菓子屋的な(イマドキの子は知ってるのか?駄菓子屋?)
出題でほほえましく思えるが,出題としては,m個買ったとき…や
少なくともや,全種類そろわないなど,文字オンパレードの答えが出ても
不安を感じるだろう。

5-4 確率分布は省略

教育学部の3-2
問題:y=plogxで,囲まれた部分の面積と回転体の体積
コメント:やはり基本的出題であった。logの積分に慣れているか,いないか。
eの扱いをできるか,否か。ホントにそれだけの気もする。
ためらわず,一気に攻め込んでも,慣れた生徒にとっては,10分で
解き終わってしまうかもしれない。見直し力,計算力を評価だろう。


全体的に

基本的な出題ばかりであった。熊本大学の問題のようにも見えた。
数学力低下が叫ばれる昨今,大学側のメッセージは,基本的なものを
普通に解くことが大切なのですよ。と受け取った。
しかし,いわゆる”受験勉強”した受験生にとっては,過去問や他大学で
出題されたものを深めていくことで,かなりの高得点が得られただろう。
医学部,歯学部あたりでは,”落とせない”問題ばかりだった気がする。
もしかしたら??高得点での争い=センターで決着が着いている。



セネガルの大統領選挙

先日,アフリカのセネガルに留学中の友人と久しぶりにチャットする機会があった。

近況を伝え合ったが,セネガルの大統領選挙の話題になった。

そんなこと(と言ったら失礼だが,)日本では全く報道されないし,報道しても,誰も興味を持たないのかもしれない。でも,その国の人にとっては,当たり前だけど”おおごと”なんだと感じた。デモやストが多発しているそうである。

西洋中心の世界観を考えさせられることであった。

(30秒でわかるセネガル大統領選挙)ワタシの勝手バージョン
1 現職は3選目を狙っている
2 でも法は3選目を禁じていた
3 自分で3選OKに変えた
4 この人けっこう高齢(85歳)
5 当選しても在任中に…?
6 対抗馬に出た世界的ミュージシャンあり
7 でも推薦人不足で立候補できず
8 首都ダカールに巨大ブロンズ像建設中
9 アフリカ最貧国にそんなもの必要?
10 ブロンズ像観光収入は現職大統領の親族が…。

と,なにやら書こうとすると,きな臭いものしか検索にはヒットしない。
んー,平和な日本と感想を述べるべきか,アフリカには無関心な日本なのか。
以下関連サイト情報から転載。


(外務省サイトから)
外務報道官談話
大統領選挙を前にしたセネガル情勢について

平成24年2月1日
1月27日(金曜日),セネガルの憲法院は,同国大統領選挙の候補者リストを発表し,29日(日曜日),同リストが最終的に確定しました。このリストの中で,現職のアブドゥライ・ワッド大統領(H. E. Mr. Abdoulaye Wade , President of the Republic of Senegal)の立候補が認められたことに対し,野党グループを中心に抗議行動が続き,治安部隊との衝突の中で犠牲者が出ています。
我が国は,民主的伝統を有するセネガルにおける大統領選挙を巡る情勢を注視しています。我が国は,与野党双方に対し,自制と憲法秩序に則った責任ある行動を求めるとともに,一連の選挙プロセスが,平和裡かつ民主的に透明性と公平性をもって行われることを期待します。
(参考)
1月27日,セネガル憲法院は,2月26日に投票が予定されているセネガル大統領選挙の候補者リストを発表し,1月29日,これを最終的に確定した。この中で,三選を禁じる憲法規定との関係で立候補権が問題となっていた現職ワッド大統領の立候補が認められた。(ワッド大統領側は,既に2期を務めているが,初当選は三選禁止規定の制定前であったことから,再選制限に関する当選回数に含まれないと主張している。)
これを受けて,1月27日以降,ワッド大統領の立候補に反対する野党グループであるM23(6月23日運動)を中心とした抗議行動が行われ,治安当局と衝突。これまでに少なくとも5名が死亡している。M23は,今後も抗議行動を続けるとしている。
http://www.mofa.go.jp/mofaj/press/danwa/24/dga_0201.html

http://africaryu-kon-roku.blogspot.com/2012/01/blog-post_05.html

2012年2月19日日曜日

久保田利伸"GOLD SKOOL"

久保田利伸の「GOLD SKOOL」

タイトルが何のことと思い,調査の結果の備忘録。

英語の「OLD SKOOL」っという俗語的な表現があり,それをもじったようである。
OLD SKOOLとは,簡単には,schoolをskoolと表記して,古い縛り付ける規則的なもの(私の意訳)
との意味合いを持っているようで,久保田のライフワークの"R&B,ヒップホップ"での古典的クラシックという意味のようである。

久保田利伸からすると,自分の音楽が「クラシック」ではなく,
「GOLDのように輝き続ける」曲である,という意味でこんな題名を付けたのではないか。

鹿児島でのコンサートも,OLDスタイルを見せながら,しかし,最新のものであり,
歌の中で,"ちょっとだけ久しぶり〜鹿児島〜"と,おそらく各地でも言っているだろうフレーズがあり,
まだまだ挑戦姿勢を見せていた。真剣に挑戦しながら,遊び心は忘れないというのがやっぱプロの仕事でしょう。

エクセル VLOOKUP関数で0を表示しない(備忘録)

『VLOOKUPで出た値が”0”の場合表示しないようにしたい』

住所録を作ってます。 ただ、データーベースとしても使いたいので、住所録としてはデーターベースから別表に「VLOOKUP」で反映されるようにしました。そこで、反映される文字が無い場合、『0』で値が出てしまいます。

値が『0』となった場合、空白の状態に出来ますか?

Sheet1
A B C D E
1 名前 〒    住所   備考
2 1 山田 123-4567 東京都 土曜休み
3 2 田中 111-1111 千葉県 
4 3 鈴木 222-3333 神奈川県 土曜休み

Sheet2
A  B     C    D E
1 1  山田
2 123-4567 東京都
3    土曜休み 
4
5 2  田中
6    111-1111 千葉県
7    0 ←この"0"を空白の状態にしたいです。
8                  
9 3 鈴木
10    222-3333 神奈川県
11    土曜休み 


計算式を消せば済むのですが、データーベース(sheet1)を変更した場合に反映されないと困るので、計算式は残した状態にしたいのです。



解決方法

VLOOKUPをIFの中に入れる。

=IF(VLOOKUP(...)=0,"",VLOOKUP(...))

エクセル IF関数のネスト数(備忘録)

IFのネスト回数は7回が上限です。

工夫しないと単純に個々を比較していては階層が足りない。

エクセル IF関数でFALSEを表示させない(備忘録)

(備忘録)

エクセル IF関数でFALSEを表示させない

1の入っているところに条件の値,入ってないところは空白とする

=IF(A1<>"","~","")

【IF関数】
IF(条件,条件に一致したときの答え,一致しないときの答え)
です。


こんな条件検索を作った。

=IF(E7<>"",$E$5,"")
&IF(F7<>"",$F$5,"")
&iF(G7<>"",$G$5,"")
&IF(h7<>"",$h$5,"")
&IF(i7<>"",$i$5,"")
&IF(j7<>"",$j$5,"")
&IF(k7<>"",$k$5,"")
&IF(l7<>"",$l$5,"")
&IF(m7<>"",$m$5,"")
&IF(n7<>"",$n$5,"")
&IF(o7<>"",$o$5,"")
&IF(p7<>"",$p$5,"")
&IF(q7<>"",$q$5,"")
&IF(r7<>"",$r$5,"")
&IF(s7<>"",$s$5,"")
&IF(t7<>"",$t$5,"")
&IF(u7<>"",$u$5,"")
&IF(v7<>"",$v$5,"")
&IF(w7<>"",$w$5,"")
&IF(x7<>"",$x$5,"")
&IF(y7<>"",$y$5,"")
&IF(z7<>"",$z$5,"")
&IF(aa7<>"",$aa$5,"")
&IF(ab7<>"",$ab$5,"")
&IF(ac7<>"",$ac$5,"")
&IF(ad7<>"",$ad$5,"")
&IF(ae7<>"",$ae$5,"")
&IF(af7<>"",$af$5,"")
&IF(ag7<>"",$ag$5,"")
&IF(ah7<>"",$ah$5,"")
&IF(ai7<>"",$ai$5,"")
&IF(aj7<>"",$aj$5,"")

2012年2月18日土曜日

シーバス

2009年の10月に博多湾で釣ったシーバス
結構でかいやつが釣れた。
いつもは,携帯で移動先からブログを投稿しているが,
パソコンからでも,メールを利用して複数のブログに投稿できるはずだと思い実験中。

カケロマの海

白い浜
海
メールによる投稿実験

2012年2月17日金曜日

TIME 映画

金曜日でのんびりと映画を見て帰宅。
本日封切りのTIMEという映画。
ついつい腕時計を見てしまったけど、我々は何のために生きているのか?と考えてしまうものでした。
ポジティブに明日も頑張ろっと思えるから、まだ正常かもね?
ミッテ10の帰りのエレベーターで、何とかカードのポイント引き換えは、いついつで失効しますって掲示物は悪いジョークみたいだった。