2011年4月21日木曜日

VBAエキスパート、合格はしたけれど。

このところの私はもっぱらVBAでのプログラミングがお仕事。
そこでその実力やいかに、と先日VBAエキスパートという試験を受けてきました。
決意表明の記事もエントリしてましたね。

ExcelVBAベーシック 資格試験


資格はオデッセイコミュニケーションズという会社が発行しています。

「VBAエキスパート公式サイト」

実際に試験が行われるのは委託されている各地の試験会場で、資格取得講座を開いている学校である場合がほとんどのようです。
私は実施日数の多さと交通の便から新宿のテストセンターで受験することにしました。
この試験会場は都内では多分一番VBAエキスパート試験の実施をしている会場だと思います。
土曜日も受験ができたのがありがたかったです。

「新宿駅西口テストセンター」

試験は選択式で、PC画面から入力して解答する方式でした。
途中、私も含め数名の方のパソコンでアプリケーションがフリーズしており、試験よりも試験を実施しているアプリがどうなってるのか気になったりもしました 笑
試験の読み込みの遅さや画面遷移の遅さ、フリーズなど気になる現象がいくつかあったのですがあれはいったいどんな構造になっているのでしょうね・・・

脱線しましたが、試験は時間を持て余してしまうくらい簡単でした。

感覚では。

というのも、試験終了後にすぐに試験結果がわかるのですが、その結果が予想を遥かに下回っていたのです。


手応えだとほぼ満点に近いだろうなという感覚でしたが実際は満点1000点中825点。
しかも分野によっては50%を切る正答率なのです。
自分が理解していることにムラがあることがよくわかりました。
独学でもそれなりに体系的に習得してきたつもりでしたが、そうではなかったようです。
内容をみてみると、高得点を出せている分野は仕事でよく使うものだったりします。
つまり使わないと覚えないってことですね、当たり前ですが。

逆に言うと覚えたいんだったら使いまくれ!ってことです。
今回の試験は正答率80%ちょい、という期待はずれな結果でしたがまた次に試験を受けるときはそれ以上の正答率を目指したいです。



もちろん、この次はExcelVBAStandard を受験します(今回受けたのはExcelVBABasic)。
Excel周りのお仕事はささっと終わらせちゃう、しかも綺麗!そんな仕事の仕方が好きです。

2011年4月7日木曜日

VBAでJavaScriptが埋め込まれたリンクをクリックする

仕事場で使用されている業務システムがInternetExplorer6クライアントで動いており、私はこのIE上に表示されるコンテンツをVBAで取得するという仕組みを作っています。



tableタグやinputタグ内のコンテンツは難なく取得できたのですが、リンク先の画面からデータを取得するというところで行き詰まってしまいました。

だってリンクがクリックできないんだもん 笑
(URLを直接指定するのではなくリンクからでないと遷移できない画面なのです)

inputタグのsubmitボタンは簡単にクリックできるのですが、aタグに埋め込まれたリンクがクリックできませんでした。

そこでいつものあのサイトにたどり着くだろうなと思いつつググったわけです。
やはり行き着いたのはこのサイトでした。

「AB型の変わり者 三流プログラマー Ken3のHP」

私がVBAでIEを操作できるようになったのはこのサイトのおかげです。

もともと知人の方がVBAでWebページを操作するという仕事をしていらっしゃるという話を聞いたことがあり、VBAでWebページが操作できることは知っていました。

それを身につけるに至ったのは、仕事場の業務システムリリースにあたって大量のデータをクリーニングのためにチェックしていた際、この作業はVBAで処理できるんじゃないか、と思い立ったからでした。

そこから私のVBAとIEの物語が始まりました。

IEで動く業務システムを支配下に置く(?)ことに快感を覚え、またこのプログラムによっていろんな業務処理が効率化できそうだということで、VBAのツール作成依頼があちこちから湧いてきました。

今回のツール作成もその一つです。

さて、以下プログラムの紹介です。

VBAからIEブラウザ上のJavaScriptのリンクをクリックします。

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

1.リンク先アドレスの確認
まずはリンク先のURLがプログラム上でどう読み込まれるのかを把握します。
対象のWebページのHTMLソースを参照すればリンク先のアドレスを知ることはできますが、プログラム上で処理する場合のアドレスと異なっている場合があります。
確実に操作するためには先にリンク先のアドレスを調べた方がよさそうです。


Option Explicit

'-----変数-----

'IEオブジェクト
Dim objIE As Object

'処理対象のリンクカウンタ
Dim i As Integer
'--------------


'----------------------------------------
'アドレスの確認
'----------------------------------------
'リンク先アドレスを文字列で取得し、イミディエイトウィンドウに表示する

Sub CheckAddress()

'InternetExplorerオブジェクトを生成するサブルーチン呼び出し
Call CreateIE

'生成したIEオブジェクト上で処理対象のURLを指定し、遷移
objIE.navigate "http://oirnao.blogspot.com/"

'ページ読込待機のサブルーチン呼び出し
Call WaitIE

'IEオブジェクト内の全リンクをチェックし、イミディエイトウィンドウにリンク先アドレスを表示
For i = 0 To objIE.document.Links.Length - 1
      
        'イミディエイトウィンドウに表示
        Debug.Print objIE.document.Links(i).href
      
    Next i
  
    '生成したIEオブジェクトを閉じる
    objIE.Quit

End Sub
'----------------------------------------
'End Of アドレスの確認
'----------------------------------------


処理結果をイミディエイトウィンドウで確認するとクリックしたいアドレスが表示されているはずです。



HTMLソースを参照すると大文字で入力されている内容が実は小文字だったりします。
HTMLソースだと"JavaScript"~となっているところが"javascript"~というように。
この大文字小文字の違いで意図したように処理されないという事象が発生するので先にアドレスを確認します。

2.指定したリンクのクリック
1.リンク先アドレスの確認で取得したリンク先アドレスをプログラムに埋め込みます。
ここでは仮にリンク「javascript:openwinA('5');」をクリックするものとします。


'----------------------------------------
'リンクのクリック
'----------------------------------------
'指定したリンクをクリックする
Sub ClickLink

'InternetExplorerオブジェクトを生成するサブルーチン呼び出し
Call CreateIE

'生成したIEオブジェクト上で処理対象のURLを指定し、遷移
objIE.navigate "http://oirnao.blogspot.com/"

'ページ読込待機のサブルーチン呼び出し
Call WaitIE

'IEオブジェクト内のリンクをチェックし、クリックしたいリンクを探す
For i = 0 To objIE.document.Links.Length - 1
      
        '取得したリンク先アドレスを文字列単位で比較
        If objIE.document.Links(i).href = "javascript:openwinA('5');" Then
        
          'クリック対象だったらクリックする
            objIE.document.Links(i).Click
          
            'ループを抜ける
            Exit For
          
        End If

    Next i

End Sub
'----------------------------------------
'End Of リンクのクリック
'----------------------------------------


0.補足
上記で使用しているサブルーチンです。


'----------------------------------------
'IEオブジェクト生成
'----------------------------------------
'Internet Explorerのオブジェクトを生成する
Sub CreateIE()
  
    'IEオブジェクトを生成
    Set objIE = CreateObject("InternetExplorer.Application")
  
    'IEオブジェクトを可視化する
    objIE.Visible = True
  
    'IEオブジェクト画面の表示位置(左上の座標)とサイズ(高さ・幅)を調整
        '左上 上位置
        '左上 左位置
    objIE.Top = 0
  
    objIE.Left = 0
  
End Sub
'----------------------------------------
'End Of IEオブジェクト生成
'----------------------------------------


'----------------------------------------
'ページ読込待機
'----------------------------------------
Sub WaitIE()
'指定したページの読み込みが完了するまで待機する
    Do Until objIE.Busy = False
        DoEvents
      
    Loop

End Sub
'----------------------------------------
'End Of ページ読込待機
'----------------------------------------


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

以上、私がリンクをクリックするまでに行った処理です。
クリックができて画面遷移した瞬間に、嬉しすぎて仕事場でにやついたのは秘密です。
できることが増えるって楽しいですね。

2011年4月4日月曜日

初めてのソースコードレビュー

私は「プログラマ」というポジションで仕事をしたことがなく、ソースコードレビューというのも受けたことがありません。
そもそもプログラミングするのかっていう話もありますが、一応業務で使っている仕組みをVBAで組むくらいのことはしています。
そんな話を愚痴まじりにTwitterでつぶやいていたところ、VBAでツールを作ってくれないかというお話をいただきました。
こんななんとかのたまごもいいところな私に、です。
ありがたいお話ですね。

要件を聞いてみたところ、私にも作れそうだったので引き受けさせてもらいました。

こんな形で成果物を要求されるというのもそういえば初めての話です。
業務担当者に向けてツールを作っている私が成果物として求められているのはその仕組みからアウトプットされたものであって、仕組みそのものではなかったりします。

”自分以外の誰かに向けてモノを作る”
ということに、最初の最初から疑問がわいてきました。
変数名はどうしようとか 笑
コメントはどれくらい入れたらいいんだろうとか、そのコメントも誰にでも理解できる内容になっているのだろうかとか。
プロシージャはどの機能単位にしたらいいのかというのも疑問でした。
どこまで細分化するのか、結構悩みました。

テスト段階までは1プロシージャ15~20行くらいで4つのプロシージャでしたが、動作確認の後全部まとめて1つのプロシージャにしました。
小さなプログラムだったのでここまで分割する必要はないのかな?という疑問符付きの状態で納品しました。


さて、今日納品物のレビュー結果が返ってきました。
指摘されたのは「仕様変更に対応できない」という点でした。
なぜか。
ひとつのプログラムに全部の機能を記述しているから。
仕様変更できるけれど、その度に全部のソースを解析する必要があり、無駄な時間を使ってしまう。

・・・おおぉ、、私は何をしているんだろう。
頭ではわかっていたことが実際には全くできていませんでした。
プログラミングの本を読めば必ず書いてあるようなことが、プログラミングの本を読んできた私にできていなかったのです。
と同時に疑問に思っていたことがすっきり返ってきました。
どんな小さなツールであっても、プログラミングをする上で考えてあげなくちゃいけないことは同じ。
可読性だったり保守性だったり、ソフトウェアとして持っておくべき品質は規模に関わらず同じなのですね。


教科書に書いてあることと自分がやったこと、現場で求められているもの、その3つが同じフィールドに並んだ瞬間でした。
自分だけで完結していては見えなかったものが見え、また自分がやるべきことが明確に現れてきました。
自分のたまごレベルもよくわかりますね。


勉強だけしていても実際にはわかったつもりのことが多いのかもしれません。
こうして実践して指摘をいただいて、何が失敗だったかを理解すること、そこからまた次の成果を出すこと、この過程こそが本当の勉強なのかもしれないですね。
机上で教科書を読むのなんて、予習くらいにしかならないのかもしれません。

2011年3月30日水曜日

ツールバーの活用~Excel~

仕事で最もよく使うソフトであるMicrosoftOfficeやエディタ系のソフトなどは必ずツールバーのカスタマイズを行って使っています。
自分に必要なツールバーを作っておくことで仕事を効率的に行うためです。

私の場合、規定で設定されているツールバーにある機能は使わないものだったり、ショートカットキーで操作する内容のものが多いので、カスタマイズすることによって得られる効果は大きいです。

今回はExcelで使用しているツールバーについて紹介します。
ちなみにここで紹介しているExcelのバージョンはExcel2003です。

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

●「標準」ツールバー
成果物として作成するExcelファイルは印刷して出力できるような形にすることが多いので、ページ設定に関連するツールバーを配置しています。



メニューバーのファイルにある機能と重複する部分なのでメニューバーのすぐ下に配置して使っています。
ファイル作成の最初の段階で基本的な設定を行い、最終段階でシート上のデータに合わせた最終調整を行います。
図形描画のツールバーを表示・非表示にするアイコンも配置しています。
これは作業スペースを広くするためで、図形を使用しないドキュメントでは図形描画ツールバーを非表示にしています。
(仕事場で使用しているパソコンは画面サイズが小さいのでこういう小さな機能も役立ちます 笑)

●「書式設定」ツールバー
セルの操作に関する機能を集めいています。



ショートカットキーの [Ctrl + 1] で開いて使う書式設定画面からの設定でよく使うものを主に配置しています。
書式設定画面はよく開きますが、書式設定画面自体タブで複数のページに分かれており、選択項目も多くて都度開いて設定するのは手間なので、使用頻度が高いものはツールバーに配置します。
ウィンドウ枠の固定や行・列のグループ化を行うアイコンも配置していますが、これはシートの編集を効率的に行うためです。
列や行の選択はショートカットキーの [Ctrl + Space] と [Shift + Space] を使って行い、ツールバーから必要な機能を選択します。
(このショートカットキーはMS_IMEの場合かな入力モードにしていると無効です。ATOKではかな入力モードでも有効です。)

●「コントロールツールボックス」ツールバー
私はマクロが使えるシートを作成することが多いので、コントロールツールボックスはいつでも使えるようにツールバーを表示させています。



これについては規定のまま使用しています。

●「チェック/コメント」ツールバー
ドキュメントの作成途中にメモとしてコメントを挿入することがあり、その編集作業を簡単に行うために配置しています。



コメントの操作はショートカットメニューからの操作で行うこともありますが、それほど使用頻度が高くはないのでメニューに割り当てられたキーを覚えていません。
なのでツールバーを使っていつでも簡単にコメントが挿入・削除できるようにしています。

●「図形描画」ツールバー
図形の作成時に使うツールバーです。
前述の表示・非表示切替でこのツールバーは必要な時にだけ表示させています。



Excelでの図形操作はあまり好きではありませんが、仕事をしていれば使わずにいることもできないので、こうしてツールバーを活用することで少しでも使いやすくなればと工夫しています。
ちなみに図形描画には主にVisioを使ってます。内容によってはCacooも。
----------------------------------------------------------------------------------

ツールバーのカスタマイズはユーザ独自のツールバーを作成することでもっと効率性を上げられると思います。
よく使う一連の機能をマクロにしてみたり、ちょっとこだわりのアイコンを使ってみたり。
(気分的な作業効率の向上も大切だと思っています。)
今回はExcelに標準的に使われているツールバーのカスタマイズについて紹介しましたが、これなら3分から5分もあれば自分好みのツールバーが作れると思います。
とりあえずやってみる、効果を感じてみる、という意味でもお勧めです。
実際に使っていくうちに使わないものは削除すればいいですし、よく使う機能があれば追加すればいいですね。

私ももう少し使い込んでオリジナルツールバーに磨きをかけていきたいです。

2011年3月24日木曜日

Internet Explorer を起動するVBA

Internet Explorerを起動するマクロは以前作成していました。
※参考:http://oirnao.blogspot.com/2011/01/vbaieie.html
今回はこのマクロをもっと使い勝手の良いものにしようと思い、少しだけ改良してみました。


引数指定されたページをIE上で表示する、という簡単なものです。

-----以下ソース-----
'--------------------------------------------------------------------------------------
'InternetExplorerを起動し、引数に指定されたURLを表示する
'--------------------------------------------------------------------------------------
Sub BootIE(URL As String)
    Dim objIE As Object
  
    'IEObjectをセット
    Set objIE = CreateObject("InternetExplorer.application")

    'セットしたObjectをActivate
    objIE.Visible = True

    'Objectの表示位置調整
    objIE.Top = 0
    objIE.Left = 0
   
   '指定されたURLのページ表示
    objIE.navigate URL
  
    '指定したページの読み込みが完了するまで待機
    Do Until objIE.busy = False
        DoEvents
    Loop
  
End Sub
'--------------------------------------------------------------------------------------
'End
'--------------------------------------------------------------------------------------

-----ソースここまで-----

私の知識とともにこういった小さなプログラム達が成長していくことが楽しみだったりします。
まだ少ししかネタはありませんが、VBAはよく使う道具なのでライブラリ化していくつもりです。
きれいなプログラムが書けるようになりたいな。

2011年3月23日水曜日

レビューの進め方

仕事場では業務マニュアルを作ったり、プログラムの改修をしたりすることが多くあります。
その作業工程で発生する「レビュー」について考えてみました。

業務マニュアルの作成にしても、プログラムの改修にしても、担当者との相談はありますが実作業は私一人で行っています。
するとある程度のレベルまでは自分の成果物に対して自分でレビューをする、というふうになります。
その状態に私は少し疑問を持っていて、もっとユーザにもレビューに積極的になって欲しいと思っていました。
では私はユーザに何をレビューしてもらいたいのだろう、と考えてみました。

  • 業務の解析結果
  • プログラムの解析結果
  • 解決策の模索、実装方法
  • 最終成果物(プログラム、マニュアル、仕様に関するドキュメントなど)

これらは私が実際に作業をしていて作成・レビューの段階で行き詰まることが多い事項なのですが、あれ待てよと。
これらに対して頭を抱えるのは、まだまだ未熟な技術者である私には当然のことじゃないかと。
むしろこうして頭を抱えている間にこそ成長のきっかけが見いだせるはず。

…なんとなく抱いていたレビューに対する疑問がクリアになってきました。
レビューするのに必要な知識が足りないこともそうですが、レビューという作業の進め方そのものにもまだ改善の余地がありそうです。
単にいいものを作りたいという気持ちだけでレビューするのではなく、レビューという行為そのものにもレビューが必要なのです。


私は今のレベルの仕事をこの先ずっと続けていくつもりはありません。
もっと自分なりに高いところへ進みたいと思っています。
このブログのテーマでもありますが、今向き合っている仕事を通して成長していかなければなりません。
今向き合っている仕事で成長ができないと思うなら、向き合い方や向き合う対象を変えなければなりません。


辛いけど、頭を抱えた分だけ成長していける、そう信じています。

2011年3月8日火曜日

やりたいことの整理

仕事をもらう範囲が広がり、同時に勉強したいことも広がって、"やりたいこと"が無限大の広がりを見せ始めました。
そうなると私の頭の中は「あれもやりたい、これもやりたい、これをすべきだ」というような意欲に満たされっぱなしで、行動が置いてけぼり。
それではいけないので「頭の中にある全てのこと」をアウトプットすべく、マインドマップを書きました。

最初はとにかく書き出す。
階層は気にせずに箇条書きに近いような感覚で書き出し、その後でグループ化をして階層をつけていきました。

「やりたいこと」というテーマで一通り書き出してみたのですが、そこで「どうしてそれがやりたいのか」を考えてみました。
図の旗がついているトピックは目標、目的を書いたものです。
(表現方法についてはもっと見やすい書き方があるかもしれませんが、それもまた勉強しつつ…)
すでに着手しているものや期日が決まっているものについては優先度を数字でつけました。

「どうしてそれがやりたいのか」を考えてみると意外と漠然とした意志である事項も見えてきました。
目的もなく頑張る、だなんてあまりよい方法ではないですよね。
上の図は思考途中のものですが、まだ落とし込みが足りない感じです。
具体的なタスク(=すぐに実行できる)に落とし込むことが必要です。

ただ、「やりたいな」レベルのものが多いことも確かです。
なのでとりあえずそのやりたい想いの受け皿を準備してみてはどうかなと思いました。
今のところその役割を果たしているのはEverNoteですが、その機能を果たせていない感があるので使い方の見直しもしくはそれに変わる手段を考える必要がありそうです。


…こうして考えてみると、ちょっとやそっとでは形にできないものが多いです。
しかし考えることをやめず、具体的なタスクになり目的が達成できるまでの道のりを作っていきたいと思います。

今週の宿題かな。