Office TANAKA2010-02-18T10:17:24+09:00Excel MVPの不定期BlogJUGEM大阪セミナーとメルマガhttp://blog.officetanaka.com/?eid=12568732010-02-18T09:54:39+09:002010-02-18T00:56:35Z2010-02-18T00:54:39Z ■VBAセミナーの4月開催予定を公開しました。 リクエストがあったので、4月は大阪でもやります。 最近、大阪方面に行っていないので、たまにはウマイもん食いたいです(笑) 2010年2月20日(土)-21日(日)　ベーシック 2010年2月27日(土)-28日(日)　スタンダード 20...田中亨Excel

■VBAセミナーの4月開催予定を公開しました。
リクエストがあったので、4月は大阪でもやります。
最近、大阪方面に行っていないので、たまにはウマイもん食いたいです(笑)

2010年2月20日(土)-21日(日)　ベーシック
2010年2月27日(土)-28日(日)　スタンダード
2010年3月20日(土)-21日(日)　ベーシック
2010年3月27日(土)-28日(日)　スタンダード
2010年4月10日(土)-11日(日)　ベーシック (大阪)
2010年4月17日(土)-18日(日)　ベーシック
2010年4月24日(土)-25日(日)　スタンダード

大阪は、5月にスタンダードをやる予定です。

▼詳しくは、こちら
http://officetanaka.net/seminar/index.htm

-------------------------------------------------

■メルマガ始めました

Office TANAKAのメルマガ(メールマガジン)を始めました。
無料です。

Excelのネタはもちろん、セミナーや講演の予定、Office TANAKAサイトの新着やお薦めコンテンツ、ちょっと公には言いにくい裏情報などを配信します。

とりあえず登録しませんか？無料ですから(笑)

▼詳しくは、こちら
http://officetanaka.net/magazine/index.htm
]]>1月〜3月のセミナー日程http://blog.officetanaka.com/?eid=12404812009-12-07T13:27:17+09:002009-12-07T04:27:18Z2009-12-07T04:27:17Z 嬉しいことに毎回多くの方が参加してくれる「VBAセミナー」ですが、2010年1月〜3月の実施日程が決まりました。 2010年1月23日(土)-24日(日)　ベーシック 2010年1月30日(土)-31日(日)　スタンダード 2010年2月20日(土)-21日(日)　ベーシック 2010年2月27日(土)-2...田中亨Excel

嬉しいことに毎回多くの方が参加してくれる「VBAセミナー」ですが、2010年1月〜3月の実施日程が決まりました。

2010年1月23日(土)-24日(日)　ベーシック
2010年1月30日(土)-31日(日)　スタンダード
2010年2月20日(土)-21日(日)　ベーシック
2010年2月27日(土)-28日(日)　スタンダード
2010年3月20日(土)-21日(日)　ベーシック
2010年3月27日(土)-28日(日)　スタンダード

ほぼ毎回、満席でキャンセル待ちになりますので、お申し込みはお早めにお願いいたします。

ネットで検索したコードをコピペしてるだけでは、いつまでたってもVBAはマスターできません。自分でマクロを作ったり、他人の作ったマクロを読めるようになるには、VBAの基礎を学習する以外に方法はありません。

2日間で、必ずマクロを作成できるようにしてみせます。
もちろん「VBAエキスパート」にも、必ず合格させます。

私は、日本では数少ない"Excelのプロ"です。
私を信じてください。
]]>Excel 2010のレビュー始めましたhttp://blog.officetanaka.com/?eid=12308272009-10-01T15:43:00+09:002009-10-29T06:49:00Z2009-10-01T06:43:00Z来年(2010年)発売予定の「Excel 2010」をレビューします。 11月頃にはベータ版が配布されるという噂も聞いています。パソコン雑誌やWebでも、レビュー記事が掲載されるでしょう。ただ、そうした記事は一般的に、Microsoftから提供される資料を元に書かれますから、Micr...田中亨Excel
11月頃にはベータ版が配布されるという噂も聞いています。パソコン雑誌やWebでも、レビュー記事が掲載されるでしょう。ただ、そうした記事は一般的に、Microsoftから提供される資料を元に書かれますから、Microsoftの"オススメ機能"が中心になります。

でも、実際に使ってみると、そうした大きな機能変化よりも、ちょっとした小さな機能変更や仕様変更が使い勝手に大きく影響を与えます。なので、そうした「実際に触ってみないとわからない変更点」と中心にレビューします。

http://officetanaka.net/excel/excel2010/]]>VBAセミナー「スタンダード」やりますhttp://blog.officetanaka.com/?eid=12221802009-09-30T22:03:12+09:002009-09-30T13:04:10Z2009-09-30T13:03:12Z 毎回多くの方が参加してくれるベーシックに加えて、リクエストの多かったスタンダード向けセミナーをやります。 教室の関係上、ベーシックと同じで、定員は10名までです。 また、これまた教室を借りる都合上、次回以降の開催予定は未定です。 詳しくは、以下のペ...田中亨Excel

毎回多くの方が参加してくれるベーシックに加えて、リクエストの多かったスタンダード向けセミナーをやります。
教室の関係上、ベーシックと同じで、定員は10名までです。
また、これまた教室を借りる都合上、次回以降の開催予定は未定です。

詳しくは、以下のページをご覧ください。

■ベーシック：10月17日〜18日
http://officetanaka.net/seminar/seminar1.htm

■スタンダード：10月24日〜25日
http://officetanaka.net/seminar/seminar2.htm

]]>緊急連絡http://blog.officetanaka.com/?eid=12091442009-08-25T04:16:18+09:002009-08-24T19:16:18Z2009-08-24T19:16:18Z昨日(2009-08-24)の午前中から、Office TANAKAサイト(http://officetanaka.net)にアクセスできない状況が続いています。 借りているレンタルサーバー「リンククラブ」のトラブルと思われます。 現在、ホスティングサービスおよびドメインの移管手続きを行っていますの...田中亨雑記
借りているレンタルサーバー「リンククラブ」のトラブルと思われます。
現在、ホスティングサービスおよびドメインの移管手続きを行っていますので、もしかすると、しばらくサイトが利用できなくなるかもしれません。

また、ドメインに(いろんな意味で)トラブルが生じると、officetanaka.netのメールアドレスも使用できなくなる可能性があります。
その際は、このブログにコメントしていただくか、
officetanaka@gmail.com
までお送りくださいますようお願いします。

ったく・・・リンククラブは最低最悪です。
]]>8月のVBAセミナーは東京と大阪で開催http://blog.officetanaka.com/?eid=11991562009-07-29T18:17:33+09:002009-07-29T09:18:19Z2009-07-29T09:17:33Z 毎回たくさんの方が参加してくれるVBAセミナーを、8月も開催します。 セミナーの目的のひとつは「VBAエキスパートに合格すること」ですが、試験対策の内容ではありません。要するに、ビジネスの現場におけるVBAの基礎をしっかりと身につけること。 マクロの経験がな...田中亨Excel

毎回たくさんの方が参加してくれるVBAセミナーを、8月も開催します。
セミナーの目的のひとつは「VBAエキスパートに合格すること」ですが、試験対策の内容ではありません。要するに、ビジネスの現場におけるVBAの基礎をしっかりと身につけること。
マクロの経験がない方でも、2日間のセミナーを受講すれば、必ず自分でマクロを作成できるようになります。事実、今まで参加された方は、みなさん作れるようになりました。

今まで、雑誌や書籍でVBAを学習しようとして挫折した方には、特にオススメです。挫折した原因は、あなたの理解力が足りないのではなく、教え方が悪いんです。特に「マクロ記録から始めよう」的な教材には要注意です。VBAの学習を、マクロ記録から始めたら、ほとんどの人は理解できません。「マクロ記録から始めよう」は、それが最適な教え方なのではなく、教える側(書く側)の勝手な都合でしかありません。

さらに8月は

東京と大阪でやります。

今まで何回か東京で開催してきましたが、そのたび「大阪でやらんかい！」と、暖かいご要望をたくさんいただきました。今回、ようやく教室をお借りできましたので、8月の29日〜30日で開催します。ぜひ、ご参加ください。
]]>VBAセミナーやりますhttp://blog.officetanaka.com/?eid=11901532009-07-05T19:02:05+09:002009-07-05T11:35:05Z2009-07-05T10:02:05Z VBAのセミナーやります。 使用するテキストから「VBAエキスパート絶対合格セミナー」と銘打っていますが、要するに「VBAの基本をマスターするセミナー」です。 実は先月、同じセミナーを開催したのですが、まったくマクロを作ったことがない人でも、セミナー終了...田中亨Excel

VBAのセミナーやります。
使用するテキストから「VBAエキスパート絶対合格セミナー」と銘打っていますが、要するに「VBAの基本をマスターするセミナー」です。

実は先月、同じセミナーを開催したのですが、まったくマクロを作ったことがない人でも、セミナー終了後は自分の力だけでマクロを作成できるようになりました。

ちなみに、そのコードは・・・

Sub juryosuukei()
　　Dim i As Long
　　Dim hantei As Long
　　Dim gyocount As Long
　　gyocount = Cells(Rows.Count, 1).End(xlUp).Row
　　'ソートキーは発行? 納入日
　　Range(Cells(4, 1), Cells(gyocount, 13)).Sort key1:=Range("H4"), key2:=Range("G4")
　　For i = gyocount To 4 Step -1
　　'同じ発行?の行が複数あったら
　　　　If Cells(i, 8) = Cells(i - 1, 8) Then
　　　　　　'数量を合計する
　　　　　　Cells(i, 6) = Cells(i, 6) + Cells(i - 1, 6)
　　　　　　'hanteiは、同じ発行?の行があったかどうかの判定に使用
　　　　　　hantei = hantei + 1
　　　　Else
　　　　　　If hantei > 0 Then
　　　　　　　　'重複行を削除
　　　　　　　　Range(Cells(i, 2), Cells(i, 3)).EntireRow.Delete
　　　　　　　　'hanteiカウントクリア
　　　　　　　　hantei = 0
　　　　　　End If
　　　　End If
　　Next i
End Sub

です。一人でここまで作成できるようになりました。

私のセミナーを受ければ、絶対にマクロを作成できるようになります。
もし今までVBAの学習に挫折したのなら、それは教える人が悪かったのでしょう。あなたが原因ではないので、あきらめる必要はありませんよ。
万が一、私のセミナーに出て、それでもマクロを作成できないとしたら、それは私の責任です。私はExcelを教えるプロですから、安心しておまかせください。

ということで、セミナーの詳細は下記をご覧ください。

http://officetanaka.net/seminar/seminar1.htm

来月あたりは、大阪でもやりたいと思ってます。
パソコンを使える、安い教室を探しているのですが・・・
どこか、よい教室をご存じの方は、ぜひ教えてくださいな。

場所があって、受講生が集まれば、全国どこへでも私は行きます。]]>Google DocsのSpreadsheetがヤバイ件(1)http://blog.officetanaka.com/?eid=10737712008-11-11T11:14:02+09:002008-11-11T03:13:48Z2008-11-11T02:14:02ZGoogle DocsのSpreadsheetがおもしろいです。 あ、「ヤバイ」はほめ言葉としての意味です。 目指す方向性が違いますから、現在のExcelと比較することはあまり意味がありませんが、とりあえず、実装しているワークシート関数を比較してみました。 まず、Excel 2007...田中亨雑記 あ、「ヤバイ」はほめ言葉としての意味です。

目指す方向性が違いますから、現在のExcelと比較することはあまり意味がありませんが、とりあえず、実装しているワークシート関数を比較してみました。

まず、Excel 2007にはあるけど、Google Spreadsheetにはない関数です。

 AMORDEGRC CUBESETCOUNT GAMMALN NUMBERSTRING
 AMORLINC CUBEVALUE GESTEP ODDFPRICE
 AREAS DATEDIF GETPIVOTDATA ODDFYIELD
 ASC DAVERAGE IMABS ODDLPRICE
 AVERAGEIF DBCS IMAGINARY ODDLYIELD
 AVERAGEIFS DCOUNT IMARGUMENT PHONETIC
 BAHTTEXT DCOUNTA IMCONJUGATE REGISTER.ID
 BESSELI DELTA IMCOS REPLACEB
 BESSELJ DGET IMDIV RIGHTB
 BESSELK DMAX IMEXP ROMAN
 BESSELY DMIN IMLN RTD
 BETADIST DPRODUCT IMLOG10 SEARCHB
 BETAINV DSTDEV IMLOG2 SQL.REQUEST
 CALL DSTDEVP IMPOWER SUBTOTAL
 CELL DSUM IMPRODUCT SUMIFS
 CHIDIST DVAR IMREAL TDIST
 CHIINV DVARP IMSIN TIMEVALUE
 CHITEST ERF IMSQRT TINV
 CLEAN ERFC IMSUB TTEST
 COMPLEX EUROCONVERT IMSUM TYPE
 CONVERT EVALUATE INFO VDB
 COUNTIFS FDIST ISPMT WEEKNUM
 CUBEKPIMEMBER FINDB JIS YEN
 CUBEMEMBER FINV LEFTB YIELDMAT
 CUBEMEMBERPROPERTY FTEST LENB 
 CUBERANKEDMEMBER GAMMADIST LOOKUP 
 CUBESET GAMMAINV MIDB 


誰も使わないような関数はともかく、よく使う関数では

・全角の文字列を半角にするASC関数や、半角→全角にするJIS関数はない
・Excel 2007で追加された次の関数はない
　　AVERAGEIF
　　AVERAGEIFS
　　COUNTIFS
　　SUMIFS
　　ただし、IFERROR関数はある
・ちょっと特殊なCELL関数、EVALUATE関数、INFO関数、TYPE関数はない
・Excelの隠し関数
　　DATEDIF
　　NUMBERSTRING
　　はない
・DSUM関数やDAVERAGE関数など、いわゆるD関数(データベース関数)はない
・FINDB関数など、バイナリを扱う「〜B関数」はない
・ピボットテーブルがないのだから、当然GETPIVOTDATA関数もない
・ふりがな機能がないのだから、当然PHONETIC関数もない
・LOOKUP関数がないのは、ちょっと悲しい
・SUBTOTAL関数もないのか
・DATEVALUE関数はあるけど、TIMEVALUE関数はない
・WEEKNUM関数はない
・YEN関数もない。なくていいけど

実害はありませんね。普通に使う分には「関数がなくて困る」ということはないでしょう。できれば、LOOKUP関数は欲しかったけど。

逆に、Google Spreadsheetにはあるけど、Excelにはない関数は次の通り。

 ADD FILTER
 CONCAT SORT
 DIVIDE SPLIT
 EQ UNIQUE
 GT GoogleFinance
 GTE GoogleLookup
 LT ImportData
 LTE ImportFeed
 MINUS ImportHtml
 MULTIPLY ImportRange
 NE ImportXML
 POW 


表の左列にあるのは、＋や／などの演算子と同じ働きをする関数です。
演算子があるから、普通は使わないでしょう。

右列にある関数に注目したいですね。
「Google〜」や「Import〜」は、インターネットならではの特殊な関数です。
これについては、あらためてじっくり紹介しますが、まずは

FILTER関数
SORT関数
SPLIT関数
UNIQUE関数

です。こいつらが、実におもしろいです。正直、次のExcelにも実装して欲しいですね。
まず、FILTER関数から。
こいつは、リストを条件で絞り込んだ結果を返す関数です。絞り込んだ件数じゃありません。絞り込んだ結果のリストを返します。
たとえば、下図のようなリストがあったとします。



このリストを「数値が10より大きい」という条件で絞り込んでみます。セルD3に「=FILTER(A2:A13,B2:B13>19)」という式を入力します。



Enterキーを押して確定すると



と、なります。なんと、式を入れなかったセル範囲D3:D7にもデータが表示されます。Excelでも配列を返す関数などを使ったとき似たような結果を得ることができますが、それにしても入力時にはあらかじめセル範囲を選択しておかなければなりません。でも、FILTER関数は結果が何件になるか入れてみなければわかりませんので、それは無理ですね。

で、おもしろいのが、勝手にデータが表示されたセル範囲D3:D7です。実は、これらのセルには自動的に別の関数が入力されています。



「CONTINUE(D2,6,1)」というような関数です。Spreadsheetの関数一覧には記載されていない関数ですから、おそらくSpreadsheetが勝手に入れてくれる関数でしょう。もちろん、ユーザーが手入力して使うことも可能です。ExcelでいうとSUBTOTAL関数みたいなものかな。

CONTINUEという名前と引数から想像すると「セルD2に入力した数式の結果を6行×1列に拡張して表示せよ」的な関数なんでしょうね。この状態で、たとえば、B列のデータを編集したとします。セルB3を削除すると、



このように、ちゃんと反映されます。もっともCONTINUE関数が「CONTINUE(D2,6,1)」と、結果を返すセル数を固定していますので、最後の「該当なし」のセルは「--」となります。では、FILTER関数の条件に設定した「B2:B13>19」に一致するデータが増えた場合はどうでしょう。


　　↓


と、今度はちゃんとCONTINUE関数が拡張されます。う〜ん、Excelでは経験したことのない結果なので少し違和感もありますが、なかなか賢いです。
もちろん、複数の条件を指定することもできます。



今度は「数値(B列)が10より大きい」かつ「フラグ(C列)が"OK"」という条件です。すると、



ちゃんと絞り込んでくれます。ヘルプによると条件は30個まで指定できるようですね。数的には問題ないでしょう。

>If there are multiple conditions, then all must be true for the corresponding values in the source array to be returned.

ということですから、指定した複数の条件はAND(かつ)で判定されるようです。なお、第1引数に複数列を指定すれば複数列を返してくれます。

Excelでも工夫すれば同じことを実現できますが、それにしてもあらかじめ結果が表示されるであろうセルに数式を入れておかなければなりません。

他にもかなり便利な関数が実装されていますが、長くなったので今回はここまで。次回に続きます・・・
]]>タイミングhttp://blog.officetanaka.com/?eid=10533262008-10-10T10:10:10+09:002008-10-11T01:52:06Z2008-10-10T01:10:10Zちょっと事情があって、ここのところ、実家の兄とひんぱんに会っています。 先日、その兄から「Blu-ray Discを見てみたいからプレイヤーを買う」という話を聞きました。 で、候補に決めたのがPS3。なるほど、PS3ならゲームも楽しめますしね。 なんて話を聞いたのが、つ...田中亨雑記 先日、その兄から「Blu-ray Discを見てみたいからプレイヤーを買う」という話を聞きました。
で、候補に決めたのがPS3。なるほど、PS3ならゲームも楽しめますしね。
なんて話を聞いたのが、つい先日の10月6日。
まぁ、言ってみれば"人ごと"なので(^^; 「ふ〜ん、そうなんだ」程度に聞いていました。

2日後の8日。ナニゲにネットの情報を漁っていると、次のような記事を発見。

■ソニーがいよいよ明日に新型PS3を発表か、小売店からも在庫消滅 - GIGAZINE
http://gigazine.net/index.php?/news/comments/20081008_ps3_new/

ああ、なるほど。兄はコレを狙っているのかと。
ふむふむ、もうそろそろ市場から在庫も減っているのかと。
なんて思いながら、昨日の9日に会ったら「PS3を買ったよ」と。

へ？もう出たの？新型PS3。てか、まだ"発表か？"って段階だったのでは？
え？まさか、買ったのって、旧型？

・・・だそうです(^^; 新型が出ることは、まったく知らなかったらしいです。
どうりで、近所のショップを探しても、在庫がなくて困ったそうです。
店員も一言くらい言ってくれてもいいのに。
あ、それじゃ在庫が処分できないか。

そしてとうとう

■ソニーが新型PS3を正式発表、HDD容量2倍でDUALSHOCK3などを同梱、低消費電力も - GIGAZINE
http://gigazine.net/index.php?/news/comments/20081009_ps3_80gb/

ああ、人ごととは言え、タイミングが悪かったですね＞兄
しかも記事によると

>そして新型の発売に合わせて従来の40GBモデルは10月10日（金）からオープン価格に改定されるほか、「リトルビッグプラネット」ソフト単体とワイヤレスコントローラ「DUALSHOCK3」を組み合わせた「リトルビッグプラネット DUALSHOCK3 同梱版」が数量限定で10月30日から7980円で発売されるとしています

嗚呼・・・慰めの言葉が見つかりません・・・ ]]>トライアスロンhttp://blog.officetanaka.com/?eid=10166312008-08-21T10:02:47+09:002008-08-21T01:07:20Z2008-08-21T01:02:47Zひとりの選手が・水泳・自転車・ランニングの3種目を行う競技といえば、有名なトライアスロンです。トライアスロンにはいろいろな種類があり、その中のアイアンマンともなれば、水泳3.8Km・自転車180Km・ランニング42.195Kmという距離。最後のランニングなんて、フルマラ...田中亨雑記トライアスロンです。トライアスロンにはいろいろな種類があり、その中のアイアンマンともなれば、水泳3.8Km・自転車180Km・ランニング42.195Kmという距離。最後のランニングなんて、フルマラソンじゃないですか。これを連続でこなすとは、まさにアイアンマン。

トライアスロンという競技名じたいは、ずいぶん昔から知っていましたが、何となく語源から「トライ = Try = 挑戦」って意味で、何かこう、人間の限界に挑戦するような競技かと思ってました。

で、最近北京オリンピックが行われていることから、ナニゲに近代五種について調べてみました。五種って、何をやるんだろうって。近代五種は、射撃・フェンシング・水泳・馬術・ランニングをひとりでこなす競技らしいですが、気になったのは英語表記。ペンタスロンと言うのだそうです。
あ！・・・もしかして・・・

ペンタスロンのペンタは、どう考えてもペンタゴンなど「5」という意味でしょう。ちなみにギリシャ語だそうです。だから五種競技がペンタスロン。てことは、トライアスロンのトライも。そういえば三角形のことをトライアングルなんて言うしな。三種類の競技をするからギリシャ語の「3」を意味するtriに「競技」のathlonでトライアスロンか。そっか。

そういえば、冬季オリンピックでバイアスロンて競技があったっけ。もちろんこれも、ギリシャ語で「2つ」を意味するbiにアスロンでバイアスロン。バイリンガルとか言うしな。クロスカントリースキーとライフル射撃の2種目をひとりの選手が競う競技です。

調べてみると、まだありました。

100mハードル・走高跳・砲丸投・200走・走幅跳・やり投・800走の七種競技(ヘプタスロン)

100m走・走幅跳・砲丸投・走高跳・400m走・110mハードル・円盤投・棒高跳・やり投・1500走の十種競技(デカスロン)

100m走・走幅跳・200mハードル・砲丸投・5000m走・800m走・走高跳・400m走・ハンマー投・3000m障害走・110mハードル・円盤投・200m走・棒高跳・3000m走・400mハードル・やり投・1500m走・三段跳・10000m走の二十種競技(アイコサスロン)

まるで、ひとり運動会ですね。どうやって練習するんでしょうか。
ちなみにアイコサスロンは、男子と女子で種目が異なるそうです。
]]>Excelのバグhttp://blog.officetanaka.com/?eid=9843662008-07-10T06:13:25+09:002008-07-10T12:15:28Z2008-07-09T21:13:25ZたまにはExcelネタを。それもVBAのバグネタです。 つい先日、私自身がこれにハマりました。 まず「前提」の1つめ。 Excel VBAではプロパティを省略することが許されています。 プロパティを省略すると、そのオブジェクトの"既定のプロパティ"が指定されたものとしま...田中亨Excel つい先日、私自身がこれにハマりました。

まず「前提」の1つめ。
Excel VBAではプロパティを省略することが許されています。
プロパティを省略すると、そのオブジェクトの"既定のプロパティ"が指定されたものとします。
たとえばセルに値を代入するとき、セルの値はValueプロパティですから、本来なら次のように書くのがセオリーです。

Range("A1").Value = "tanaka"

これを、プロパティを省略して、次のように書いてもOKです。

Range("A1") = "tanaka"

次に「前提」の2つめ。
VBAの変数にはバリアント型という型があります。
バリアント型にセル(Rangeオブジェクト)を格納すると、変数を介してセルを操作できます。
次のコードで確認してみましょう。

Sub Sample1()
　　Dim c
　　Set c = Range("A1")
　　c.Font.ColorIndex = 3
End Sub

以上の「前提」から、次のコードは何も問題がないように思えます。
選択したセル範囲(Selection)の各セルに対して、セルの値(数値とします)を10倍します。

Sub Sample2()
　　Dim c
　　For Each c In Selection
　　　　c = c * 10
　　Next c
End Sub

ところがコレ、まったく機能しませんし、エラーも発生しません。
いったい、どうしたことでしょう。

あれこれと試した結果、回避策はわかったのですが、そもそも原因は何なのでしょう。
調べてみたら、Excelのバグでした。
詳しくは、次のサポート情報(機械翻訳)に書かれています。

■XL98: Value プロパティがバリアント種類の For Each ループに unchange しました。
http://support.microsoft.com/kb/191176/ja

Excel 97とExcel 2007で確認しましたが、確かにおかしいです。

回避策は次の2点です。

・セルを格納する変数は、バリアント型ではなくObject型やRange型を使う

Sub Sample3()
　　Dim c As Range
　　For Each c In Selection
　　　　c = c * 10
　　Next c
End Sub

・代入される側のプロパティを省略しない

Sub Sample4()
　　Dim c
　　For Each c In Selection
　　　　c.Value = c * 10
　　Next c
End Sub

どうせプロパティを省略しないのなら「c.Value = c.Value * 10」と書くべきでしょうけど。
また、Microsoftのサポート情報では「For Eachループ内で発生する」ように書かれていますが、次のようなコードでも同じバグが発生します。

Sub sample5()
　　Dim c
　　Set c = ActiveCell
　　c = c * 10
End Sub

これは、遭遇する機会の多いバグだと思います。十分に注意してくださいな。
]]>えっちでよくないブラウザhttp://blog.officetanaka.com/?eid=9697912008-07-01T05:08:24+09:002008-07-01T08:41:20Z2008-06-30T20:08:24Zちょっと今、新しいサイトを立ち上げようとしています。おおむねのデザインはできたのですが、慣れないCSSを駆使しているためか、ブラウザによってレイアウトが崩れることがわかりました。 まぁ、そっちは何とか直すしかないんですが、その前に、そもそも現在主流のブ...田中亨パソコン
まぁ、そっちは何とか直すしかないんですが、その前に、そもそも現在主流のブラウザは何なのかと。別に、少数派のブラウザを無視する気はありませんけど、ちょっと調べてみることにしました。半分は興味本位です。

Office TANAKAサイトの生ログからユーザーエージェント情報を集計してみました。もちろん、ユーザーエージェント情報は偽装が可能ですから、正確な集計だとは思っていません。あくまで目安です。さらに、Office TANAKAはExcelの情報サイトですから、どうしてもWindowsユーザーが多いでしょう。そうした特性もあると思います。ちなみに調査期間は2008/6/1〜2008/6/30で、ページのリクエストごとに集計しました。ユーザー(IP)ごとではありませんので、サイト内で多くのページを見るのに使われたブラウザは件数が多くなってます。

■ブラウザ別
ブラウザPV%
 IE 2,391,117 83.70%
 FireFox 321,559 11.20%
 Opera 29,858 1.10%
 Sleipnir 5,022 0.20%
 Other 104,369 3.80%




やはりIEが圧倒的に多いんですね。ヘッダのユーザーエージェントに「MS7.0」とか「MS6.0」などの文字が含まれているかどうかを判定しましたので、もしかするとIEエンジンを使っている他のブラウザもカウントされているかもしれません。正確ではないにしても、それほど非現実な結果ではないと思います。

で、そのIEは、どんなバージョンが使われているのでしょう。最新のIE7はどれくらい普及しているのでしょう。実は今回の集計の目的はこちらでした。結果は次の通り。

■Internet Explorerのバージョン
バージョンPV%
 IE7 628,992 22.00%
 IE6 1,745,254 61.10%
 IE5 16,356 0.60%
 IE4 515 0.00%




まだ主流はIE6のようです。IE7は四人に一人といったところでしょうか。IE4によるアクセスがあったのは意外でした。他にも、携帯電話からのアクセスもけっこうありました。これはこれで、今後携帯電話向けのサイトを作るとき参考にしようと思います。


ユーザーエージェント情報には、さまざまなブラウザ(だけではありませんが)の名称がありましたが、その中で気になったのが「えっちでよくないブラウザ」という名前のブラウザ。なんだこりゃ？誰か自作ブラウザによるイタズラかな・・・と思いましたが、その割にはけっこう複数のIPでアクセスされているます。気になったので調べてみたら「ぶら。」という名前のタブブラウザでした。

■タブブラウザ「ぶら。」配布所
http://www.geocities.jp/tabbrowser/index.html

詳しいことは上記のページを見ていただくとして。
試しにダウンロードして使ってみました。



ブラウザとして基本的な機能は充実しているし、動作は軽いし、他にもいろいろ便利な機能があるし。なによりユーザーエージェント情報を簡単に偽装することが可能です。MozillaやOperaはもちろん、DoCoMoなど携帯電話もOK。そして、選択リストの一番最後に「えっちでよくないブラウザ」と。なぜ「えっち」なのかは、あえてここでは書きません(^^;

世の中には、いろんなブラウザがあるんですね〜
]]>みゆき通りhttp://blog.officetanaka.com/?eid=9643372008-06-25T08:55:44+09:002008-07-10T12:04:33Z2008-06-24T23:55:44Zテレビ番組を見ていたら「みゆき族」という話題が出て。 この意味を、若い芸能人が 香坂みゆきさんなど、みゆきという名前の女性のファンである男性の集団的に答えてました。 もちろん間違っているし、もしかするとヤラセの回答なのかもしれませんが。 「みゆき族」...田中亨雑記 この意味を、若い芸能人が
香坂みゆきさんなど、みゆきという名前の女性のファンである男性の集団
的に答えてました。
もちろん間違っているし、もしかするとヤラセの回答なのかもしれませんが。

「みゆき族」は、私よりもう一世代上の時代に流行った言葉(現象)で、銀座のみゆき通りに集まる若者たちを指したはずです。当時は第一次アイビーブームで、VANの紙袋を小脇に抱える若者も多かった・・・と、何かで読んだ記憶があります。

と、そこまではテレビを見ながら考えていたのですが、では「みゆき族」「みゆき通り」の"みゆき"とは、誰のことなのだろう？と疑問に思いました。もちろん、香坂みゆきではないだろうし、間違っても井森美幸のはずはなく、あだち充原作の「みゆき」も関係はなさそうです。

悩んだときはWikipedia。さっそく検索してみると「みゆき族」「みゆき通り」ともに編集されていませんでした。それでは、と「みゆき通り 銀座」などでググってみると、やたらと店のページがヒットします。カフェとか、美容整形とか。WikipediaやGoogleで検索して、目指す情報に一発でたどり着けなかったのは珍しかったです。で、しかたないので(てゆーか、それが当然ですけど)、それらしい情報がありそうなページを順に読んでみました。そしたら、ようやく由来がわかりました。"みゆき"って、人の名前じゃなかったんですね。

「みゆき通り」は、そのむかし明治天皇が宮城から浜離宮や海軍兵学校などへ、御幸(みゆき：天皇がお出かけになること-三省堂国語辞典より-)されるときに通られた道なんだとか。なるほど、だからATOKで「みゆきどおり」を変換すると「御幸通り」となるんですね。そっか、女子の名前じゃなかったのか。へぇ〜

]]>firefox 3http://blog.officetanaka.com/?eid=9615612008-06-22T02:58:07+09:002008-06-21T17:58:08Z2008-06-21T17:58:07Z以前、評価記事を書いたりしましたので、かなり多くのブラウザを過去に触ってみました。で、結局いまはSleipnirを愛用しているのですが、先日firefoxの新しいバージョンが公開されたようで。描画の速度が速くなったなどの記事を読んで、試しにダウンロードしてみました。...田中亨パソコン

実はいま、Office TANAKAサイトのリニューアル作業を進めています。ちょっと新しいことも始めるので、それにあわせてデザインを一新しようと考えているわけで。

言うまでもなく、最近の主流はCSSであり、昔のようにtableタグを使ったデザインに関しては、いろいろな意見を耳にします。まぁ、私はWeb関係の専門家ではありませんから、ガリガリとtableタグを重ねたページを作ったところで、シロウトですから許してね…ってのが本音なんですが、いい機会ですからCSSについても勉強してみようかなと。自分のページをCSSで作ることで、少しは知識が増えるかなと、そんな思いでチャレンジしてみました。

かなり苦労しながら、数ヶ月かけて何とかデザインできて、完成までもう少しのところなんですが、これをfirefoxで見たらナント全滅・・・レイアウトが崩れるなんてもんじゃありません。Webページとしてあり得ない状態になってしまいました。

float関係の書き方が悪いのかな・・・なにせシロウトなんで、よくわかりません。頭にきて、いっそtableタグで書き直してやろうかな、なんてことも頭をよぎりましたが、他の人のページを見ると、けっこうfirefoxでもちゃんと表示されてます。むむう…悔しいです。もうちょっと調べて、何とか対応させてみましょう。って、公開日に間に合うんかな(^^;


自分の知らないことを学習すると「わからない」「理解できない」ことに遭遇します。日頃、ExcelやVBAを教える身として、学習者の気持ちを理解しようと努めてはいますが、自分がその気持ちを忘れてしまってはいけませんね。何かを調べて、さんざん迷って、遠回りをしたあげくに、ようやく理解できたりすると「なんで先にこれを説明してくれないんだろう」とか「どうしてこういう例を示してくれないんだろう」などと痛感します。自分が知っていることを教えていると、そういう感覚をつい忘れがちになります。「こう教えればわかるだろう」と勝手に判断したりします。いけませんね。教える者は、常に「どう教えるべきか」を模索すべきです。万人に対してベストな教え方なんてないのですから。

そういう意味で、新しいことを習得するのは勉強になります。
]]>甘いものは別腹http://blog.officetanaka.com/?eid=9598992008-06-20T01:02:58+09:002008-06-19T16:04:05Z2008-06-19T16:02:58Z「甘いものは別腹」と、よく言われます。食事が終わって、十分に満腹であっても、デザートのケーキなどをペロリといけてしまうアレです。特に女性は、よくそういう話を聞きますね。別腹つったって、人間に胃はひとつしかないわけだし、物理的にありえないだろ。要するに気...田中亨雑記
胃に食べ物が充満すると、血糖値の上昇などによって指令を受けた視床下部は、満腹中枢から「もうお腹いっぱい、もう食べられない」という信号を出します。この働きによって人間は過食から身を守ることができるわけです。

さて、ここでケーキなどの甘いものを見ると、脳内にはβ-エンドルフィンが出てきます。β-エンドルフィンは"脳内麻薬"とも呼ばれる神経伝達物質で、モルヒネの約6.5倍もの鎮痛作用があるそうです。またβ-エンドルフィンは、幸せな気分やウキウキした気分など、いわゆる多幸感をもたらす作用があり、マラソン中に気分が高揚する"ランナーズハイ"や、セックスの快感もβ-エンドルフィンが原因だと言われています。

β-エンドルフィンの増加はドーパミンの分泌を促します。ドーパミンは、運動調節やホルモン調節、意欲や学習などに関わる神経伝達物質です。ドーパミンはさらにオレキシンを分泌させます。オレキシンは脳内の摂食中枢に局在する物質で、摂食量を増加させる働きをします。その結果、脳は「もっと食べたい」「食べろ」という指令を発して、胃の動きを活発にするのです。胃は消化の活動を高め、食べ物を小腸に送り込み、胃の内部には新たなスペースが生まれます。そう、この新たなスペースこそが「別腹」なのです。

別腹のキッカケとなるβ-エンドルフィンは、他の味に比べて甘いものを見たときに多く分泌されるそうです。さらに、β-エンドルフィンは男性よりも女性の方が出やすいこともわかっています。ラットに砂糖水を好きなだけ飲ませるという実験では、メスはオスの約2倍もの量を飲んだそうです。世の女性がスイーツに目がないのは、β-エンドルフィンのせいだったんですね。同じ量のβ-エンドルフィンが分泌されたとき、女性の方がより感受性が高く、より感激して、より美味しいと感じます。これは、来るべき妊娠・出産に備えて皮下脂肪を蓄積しようとするためでしょう。

人間のカラダは、実によくできていますね。


ネタ元：NHK「解体新ショー」, Wikipedia
]]>