2012年に @wada811 が読んだ技術書まとめ

2012年も終わりに近づいているので@wada811が読んだ技術書を振り返ってみようかと思います。

2012/01/14 [書評]Web標準の教科書―XHTMLとCSSでつくる“正しい”Webサイト | DevAchieve

趣味でやっていたHTML/CSSを業務レベルに上げるために基礎からおさらいしました。
最近HTML5が仕様策定完了したのでHTML5/CSS3バージョンで出して欲しいですね。
CSS3まだまだぐちゃぐちゃしてて無理かもしれませんが…。(linear-gradientとか使ってみたけど酷い…)

2012/01/15 [書評]WEB+DB PRESS 総集編 [Vol.1～60] | DevAchieve

ちょっとずつ読んでいって最近全部読み終わりました。
流石に古くかったり、やってない言語などは参考にはならなかったけど
普遍的な内容は結構勉強になった。効率が良いかと問われると微妙だと言わざるをえないけど…。
最近の号はやはり得るものはそこそこ多いので普通に買うのはありかもしれません。

2012/01/15 [書評]良いコードを書く技術　読みやすく保守しやすいプログラミング作法 | DevAchieve

ある程度良いコードを書けていればリーダブルコードを読んだ方が得るものもあるんじゃないかと思います。
原典にあたる重要性を教えてくれるのと参考文献を紹介してくれるのでそこはいいと思います。

2012/01/15 [書評]コンピュータはなぜ動くのか ～知っておきたいハードウエア＆ソフトウエアの基礎知識～ | DevAchieve

2012/01/15 [書評]プログラムはなぜ動くのか 第２版 知っておきたいプログラムの基礎知識 | DevAchieve

2012/01/15 [書評]ネットワークはなぜつながるのか 第2版<br>知っておきたいTCP/IP、LAN、光ファイバの基礎知識 | DevAchieve

なぜ〜なのかシリーズ。レビューを書いたのがこの日というだけでさすがに1日で3冊読めるものじゃない。
基本情報技術者を取るのと、ソフトウェア会社でエンジニアになるにあたって
非情報学科の大学生だった俺がとりあえず基礎知識を仕入れておかねばと読んだ本です。
まぁそこまで無駄ではなかったと思いたいです。ネットワークはちんぷんかんぷんのままだったけど…。

2012/03/31 [書評]できる逆引き Excel VBAを極める 勝ちワザ700 2010/2007/2003/2002対応 (「できる逆引き」シリーズ) | DevAchieve

内定先アルバイトでExcel VBAをやるのに読んだ本です。なかったら結構きつかったかも。

2012/03/30 [書評]よくわかるPHPの教科書 | DevAchieve

レビュー日だから日付が前後してますが、読んだのはこっちが後です。
プログラミング言語はもういくつか使っていたのでPHPでどんな事するのかの概要を知るために買ってみました。
プログラミング経験があればプロになるためのWeb技術入門と
プロになるための PHPプログラミング入門で十分な内容だったかも。

2012/04/15 基本情報技術者試験を受験するまでに使った参考書3冊 | DevAchieve

基本情報技術者試験に受かったので使った参考書のレビューをしました。
改訂新版 基本情報技術者 らくらく突破 表計算はオススメだと思います。
後は過去問やっておけばなんとかなるような気がしますね。
そのくらい過去問でやってたことが形を変えて出てきます。

2012/04/21 [書評]プログラミングの宝箱 アルゴリズムとデータ構造 第2版 | DevAchieve

基本情報技術者試験に受かったはいいものの、情報科出身ではないのでアルゴリズムとデータ構造について
まともに学んだことがなくてイマイチな得点だったので勉強のために読んでみました。
アルゴリズムとデータ構造について学んだことがない人は読んでおくといいと思います。

2012/04/25 [Twitter][API]改訂で2012年5月14日までに開発者がするべきこと | DevAchieve

Twitter API ポケットリファレンスの事もちょっと書いている記事なので。
TwitterのAPIを叩くなら結構必須だと思います。かなり役に立ちました。
TwitterのAPIが1.1にバージョンアップしますが読んでおくと1.1のこともわかりやすいかもしれません。

2012/05/12 [書評]よくわかるiPhoneアプリ開発の教科書【iOS 5＆Xcode 4.2対応版】 | DevAchieve

iPhoneアプリを作ることになってXcodeやInterface Builderの使い方がぜんぜんわからなかったので
そのへんを解説している一番簡単そうな本を読んでみました。
iPhoneを使っていなかったのでどんな機能、どんなパーツがあるかを知ることができたのは良かったと思います。

2012/05/09 [書評]詳解 Objective-C 2.0 第3版 | DevAchieve

iPhoneアプリを作るにはObjective-Cで書くのだけれど結構他の言語とは異なっていたので
よく理解するために読んでみました。使いこなせてはいないけど理解することはできました。
もっとObjective-CをマスターしてiPhone/Android両方できますと胸を張って言えるようになりたいです。

2012/06/02 [書評]知る、読む、使う！ オープンソースライセンス | DevAchieve

昔、図書館で読んだソフトウェアライセンスの話が電子書籍になって出版されていたので読んでみました。
ソフトウェアライセンスも大事な話ですから一回は学んでおいたほうがいいですね。

2012/06/03 [書評]「プロになるためのWeb技術入門」なぜ，あなたはWebシステムを開発できないのか | DevAchieve

アプリばっかり作っていてWebとかPHPとかのあたりが全然わかってなかったのでコレで勉強しました。
コレはもっと早く読んでおきたかったというくらいの基礎知識でした。

2012/06/09 [書評]iPhoneプログラミングUIKit詳解リファレンス | DevAchieve

話はまたiPhoneに戻って今度はUIKitを解説した本です。
コレがなかったらリファレンスを読むしかなかったかもしれません。
この本はiOS4ベースで今使い物になるか不安になるかもしれませんが、
iOS5/6で追加はされましたが既存のものはそんなに変わっていないと思うので大丈夫かと思います。

2012/06/30 [書評]iPhoneアプリ設計の極意 ―思わずタップしたくなるアプリのデザイン | DevAchieve

iPhoneに限らずAndroidアプリのデザイン設計をするのにも役立つ本です。
こういうの本の内容を理解していない人がアプリって
すごく微妙だったりするので使いやすいアプリを作りたいなら必読です！

2012/07/23 [書評]達人プログラマー システム開発の職人から名匠への道 | DevAchieve

名著だと言われていたので読んでました。
実際のプログラミング、システム開発に近い所でのプログラマがどうあるべきかを説いている本です。
プログラマとしてどうあるべきか不安がある人は読んでおくといいかもしれません。

2012/07/08 日経ソフトウエアをまとめ買いしてやったぜぇ～ワイルドだろぅ？ | DevAchieve

2012/08/09 [書評]日経ソフトウエア 2012年 01月号 | DevAchieve

2012/08/12 [書評]日経ソフトウエア 2012年 02月号 | DevAchieve

2012/08/20 [書評]日経ソフトウエア 2012年 03月号 | DevAchieve

2012/09/03 [書評]日経ソフトウエア 2012年 04月号 | DevAchieve

2012/09/09 [書評]日経ソフトウエア 2012年 05月号 | DevAchieve

2012/09/10 [書評]日経ソフトウエア 2012年 06月号 | DevAchieve

2012/09/16 [書評]日経ソフトウエア 2012年 07月号 | DevAchieve

2012/09/18 [書評]日経ソフトウエア 2012年 08月号 | DevAchieve

2012/09/25 [書評]日経ソフトウエア 2012年 09月号 | DevAchieve

忙しい中で効率的に最新情報を手に入れるには雑誌がいいのでは？
ということで日経ソフトウエアを購読してみました。
最初は興味が有ることが多くて良かったのだけど、
終盤は読みたい記事も少なくなりコスパ悪かったので購読やめちゃました。
他にも読みたい本あるし必要な時にちゃんとした本で情報を仕入れた方が確実な知識が手に入ると思いました。

2012/08/24 [書評]必ず結果が出るブログ運営テクニック100 プロ・ブロガーが教える“俺メディア”の極意 | DevAchieve

ネット上でよくブログ論、ブログテクニックの記事を読んでいたので目新しいことはなかったのですが、
逆にそういうのを読んでいない人は本書を読んでおくと良いかもしれません。ブログで稼ぎたい人向です。
僕はセルフブランディングと備忘録が出来ればいいのでブログで直接お金を稼ぎたいわけではないので
この本を読んでどうこうしようというのはありませんでした。技術ブログで記事量産とか無理ですし…。

2012/08/26 [書評]リーダブルコード The Art of Readable Code | DevAchieve

コードは理解しやすくなければならないという考えのもと、
理解するための時間を最短にするための実践的なテクニック集を解説している本です。
変数名には説明的な名前をつけるべきとか
どういうコメントを書くべきかとかを解説しているので読んでマスターしてください！

2012/09/04 [書評]ウェブデザインのつくり方、インターフェイスデザインの考え方。 | DevAchieve

デザインというから敬遠されがちですが、スタイリングとかデコレーション的なアートな感じではなく
設計なのでWeb系の開発者は読んでおくと良いと思います。(プログラマーもデザインを理解しておくべき論)

2012/09/11 [書評]マンガでわかるデータベース | DevAchieve

データベースの概念、基礎知識をマンガで解説した本です。
なんとなくSQLを書いたことがある人がしっかりデータベースを勉強しようと思ったら
この本から学んでいくのが良いと思います。情報処理技術者試験のデータベースあたりの勉強にも使えます。
ちなみにごっちゃになりやすい第二正規形と第三正規形の違いは連鎖があるかどうかです。(詳しくは記事へ)

2012/09/26 [書評]SQL ゼロからはじめるデータベース操作 | DevAchieve

標準SQLでRDBMSによらないSQLが書けるようになる本です。
コレ一冊でOracle, SQL Server, DB2, PostgreSQL, MySQLで動くSQLが書けるようになります。
この本をマスターしたら後のSQLは応用するだけで組めるようになるので是非マスターしましょう！

2012/10/02 [書評]プログラミングコンテストチャレンジブック [第2版] | DevAchieve

競技プログラミングをたまにやっているので勉強用にと読んでみました。
難しいこと書いてあって睡眠導入剤として優秀すぎたので読むのは諦めました…。

2012/11/03 [書評]Android SDK開発のレシピ | DevAchieve

第1版と第2版ともに読んだ本です。第2版はカメラ周りが実装にかなり役に立ちました。
その他のサンプルも役に立っているので手元において開発をしていました。

1年で書籍25冊と雑誌9冊を読んだ！

正確には書評を書いていない書籍とかあったり、つまみ読みで通して読んでない本とかあったり、
途中で読むのをやめた書籍があったりで書籍と雑誌あわせて40冊くらいだと思います。
今年読んだけど書評を書いてない本は以下のとおり。
Webを支える技術、情熱プログラマー、入門git、Objective-C逆引きハンドブック、
PHP 逆引きレシピ、平成25年度【春期】【秋期】 応用情報技術者 合格教本
12月はレビューを一冊も書いていないのですが、
これは応用情報技術者の勉強を始めたので他の本は全然読んでいないからです。

これだけ本を読んで身につけたのがObjective-CとPHPとSQLくらいでしょうか。
まだまだユニットテストとかTDDとかJenkinsでCIとかの高位な部分や、
JavaScriptやRubyなどの他の言語などをもっと学びたいです。
もっと色々なことを身につけられる機会、環境、時間が欲しいです。速さが足りない！

[Excel][VBA]自分自身(エクセルファイル)を削除するマクロ

[Excel][VBA]エクセルファイルからマクロを除去する | DevAchieveでは
マクロありファイルとマクロなしファイルの2種類ができてしまうので
マクロありファイルの方を削除してしまいたいという希望もあるはず。
そんな時にはこの自分自身を削除するマクロが役に立ちます。
そんなメタ操作できるのか！って感じですができちゃうんですね。凄い。

With ThisWorkbook 
    .Save 
    .ChangeFileAccess Mode:=xlReadOnly 
    Kill .FullName 
    .Close(False) 
End With 

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

[Excel][VBA]エクセルファイルからマクロを除去する

エクセル初回起動時にデータを読み込んでマクロで動的に表示を作成した後は
マクロをもう使わないので削除したいって時のための方法です。
マクロが残っていると起動時にセキュリティの警告が出たり、
利用者にマクロを見られるという問題を回避したい場合に使えます。

コピーとかでシートを移すとすべて移した段階で
何故かマクロも移るという現象が起こるので一枚シートを残してやる必要があります。

Sub CreateNoMacroBook()
    Dim fname As String
    Dim ns As Integer
    Dim cnt As Integer
    
    'マクロありブックの名前を取得
    fname = ActiveWorkbook.Name
    'マクロありブックのシート数を取得
    cnt = ActiveWorkbook.Worksheets.Count
    
    'すべてのシートをMoveするとエラーになるのでシートを追加
    Worksheets.Add After:=Worksheets(Worksheets.Count)
    '新規ブック作成時のデフォルトのシート数を保管
    ns = Application.SheetsInNewWorkbook
    '新規ブック作成時のシート数を変更
    Application.SheetsInNewWorkbook = 1
    '新規ブック作成
    Workbooks.Add
    '新規ブック作成時のデフォルトのシート数に戻す
    Application.SheetsInNewWorkbook = ns
    
    'マクロありブックのシートを新規ブックの"Sheet1"シートの前に移動
    For i = 1 To cnt
        Workbooks(fname).Worksheets(1).Move Before:=Workbooks(Workbooks.Count).Worksheets("Sheet1")
    Next i
    '表示用に新規ブックの一枚目のシートをアクティブにする
    Workbooks(Workbooks.Count).Worksheets(1).Activate
    
    Application.DisplayAlerts = False
    '新規ブックのデフォルトシート"Sheet1"を削除する
    Workbooks(Workbooks.Count).Worksheets("Sheet1").Delete
    'マクロありブックを保存せずに終了
    Workbooks(fname).Close SaveChanges:=False
    Application.DisplayAlerts = True
    
End Sub

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

[Excel][VBA]CSVファイルを読み込む

改行を含まないが、カンマを含む可能性があるCSVは
ダブルクオートで囲んでカンマ区切りにする。
例.
"foo","bar","baz"
"hoge","fuga","piyo"
上のような形式のCSVファイルをパースする手順
(1)一行で読み込み、先頭と終端の"を除去する
(2)","でSplitして配列にする

Function LoadCSV()
    Dim FileType, Prompt As String
    Dim FileNamePath As Variant
    Dim textline, CsvArray() As String
    Dim RowCnt As Long
    Dim ch1 As Long
    
    FileType = "CSV ﾌｧｲﾙ (*.csv),*.csv"
    Prompt = "CSV File を選択してください"
    
    FileNamePath = Application.GetOpenFilename(FileType, , Prompt)
    
    'キャンセルされた
    If FileNamePath = False Then End Funciton
    
    '空いているファイル番号の取得
    ch1 = FreeFile
    
    'FileNamePath のファイルをオープンします
    Open FileNamePath For Input As #ch1
    
    'エラーが発生したらファイルを閉じます
    On Error GoTo CloseFile
    
    '表の行番号の初期化
    RowCnt = 1
    
    'ファイルの終端まで
    Do Until EOF(ch1)
        '1行読み込む
        Line Input #ch1, textline
        'CSVをパース
        textline = Mid(textline, 2, Len(textline) - 2)
        CsvArray = Split(textline, """,""")
        
        '配列渡しでセルに代入
        Range(Cells(RowCnt, 1), Cells(RowCnt, UBound(CsvArray()) + 1)) = CsvArray()
        
        RowCnt = RowCnt + 1
    Loop
    
CloseFile:
    Close #ch1 'ファイルのクローズ
    
End Function

CSVファイルフォーマットの解説：CodeZine

改行のある場合は1行ずつ読み込む方法じゃ無理だからもっと面倒。
値の中にダブルクオーテーションがある場合のエスケープなんかも考慮してない。
ある程度自由にCSV側の出力をいじれるならパースする方も楽。

[Excel][VBA]シートの存在チェック

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

国本 温子

インプレスジャパン

発売日：2012-02-09

シート名を渡すとそのシート名のシートが存在するかどうかチェックする。

Function IsExistSheet(SheetName As String) As Boolean

    Dim ws As Worksheet, flag As Boolean
    
    flag = False
    
    For Each ws In Worksheets
        If ws.Name = SheetName Then flag = True
    Next ws

    IsExistSheet = flag

End Function

[Excel][VBA]入力規則でドロップダウンメニューを作る

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

国本 温子

インプレスジャパン

発売日：2012-02-09

見た目はドロップダウンメニュー、入力規則で言うところのリストをVBAで作ります。
名前付き範囲を使えば別のシートのセル範囲を指定することも出来て便利ですよ。

With ActiveCell.Validation
    .Delete
    .Add Type:=xlValidateList, Formula1:="=名前付き範囲"
End With

[Excel][VBA]エラーチェックを無効にしてエラーが出ないようにする

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

国本 温子

インプレスジャパン

発売日：2012-02-09

Excelには様々なエラーチェック機能がありますが、それがむしろ迷惑になる場合があります。
なので無効にしてしまいましょう。

Excel全体でエラーチェックを無効にする

書式Application.ErrorCheckingOptions.BackgroundChecking = False

オプション一覧

BackgroundChecking
EmptyCellReferences
EvaluateToError
InconsistentFormula
NumberAsText
OmittedCells
TextDate
UnlockedFormulaCells
ErrorCheckingOptions プロパティ (Microsoft.Office.Interop.Excel)

特定のセルでエラーチェックを無効にする

書式ActiveCell.Errors.Item(xlEmptyCellReferences).Ignore = True

オプション一覧

xlEmptyCellReferences
xlEvaluateToError
xlInconsistentFormula
xlNumberAsText
xlOmittedCells
xlTextDate
xlUnlockedFormulaCells

[Excel][VBA]セルに罫線を引く

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

国本 温子
インプレスジャパン
発売日：2012-02-09

一番簡単な罫線の引き方はこんな感じ。
Range("A1:C3").Borders.LineStyle = xlContinuous

もっと細かく色々設定して罫線を引きたかったら次のページが参考になる。
書式 - 罫線 - EXCEL-LENCE web

[Excel][VBA]連続したセルの終端の行番号・列番号を取得する

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

国本 温子
インプレスジャパン
発売日：2012-02-09

データを入力させたらどれだけデータが入っているかを知りたくなりますよね？
必要なセルだけループ回して処理とかしやすくなりますし。
ということで取得方法を関数にしました。

空白を含まない連続したセルの終端の行番号・列番号を取得する

'右方向(xlToRight)に空白でないセルを探す
'指定した列がすべて空白、または埋まっている場合は256を返す

Function getColumn(row As Long, column As Long) As Long
    getColumn = Cells(row, column).End(xlToRight).Column
End Function

'下方向(xlDown)に空白でないセルを探す
'指定した行がすべて空白、または埋まっている場合は65536を返す

Function getRow(row As Long, column As Long) As Long
    getRow = Cells(row, column).End(xlDown).Row
End Function

欠点としては途中に空白セルがある場合には空白セルの一つで前で止まる。
入力漏れなんかを探すのには使えるかもしれない。

途中に空白を含むセルの終端の行番号・列番号を取得する

'Excelの最大列数(IV=256)から左方向(xlToLeft)に空白でないセルを探す
'指定した行がすべて空白、または埋まっている場合は1を返す

Function getColumn(row As Long) As Long
   getColumn　= Range("IV" & row).End(xlToLeft).Column
End Function

'Excelの最大行数(65536)から上方向(xlUp)に空白でないセルを探す
'指定した列がすべて空白、または埋まっている場合は1を返す

Function getRow(column As Long) As Long
    getRow　= Range(column & "65536").End(xlUp).Row
End Function

途中で空白セルもある場合はコチラを使えば本当の終端で取得できる。

[Excel][VBA]SubとFunctionの違いとPublicとPrivateの違い

VBAを書いているとSubとFuctionというのが出てきますがイマイチ違いがわからなかったのでまとめます。

結論から言うと、以下の通りです。(※この記事は標準モジュールでの記述での話です)

	マクロの実行	ユーザー定義関数	戻り値
Sub	表示される	表示されない	返すことができない
Private Sub	表示されない	表示されない	返すことができない
Function	表示されない	表示される	返すことができる
Private Function	表示されない	表示されない	返すことができる

どこに表示させたいかで使い分けもできますが、表示させない(Privateの)場合は
Sub と Function のどちらを使ってもあまり変わりません。

意識としては Sub は意味や内容がひとまとまりになっている処理を、
Function は汎用性の高く、そのまま移植できる処理を記述するものだと思っておけば良いと思います。

おすすめ書籍
できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

国本 温子
インプレスジャパン
発売日：2012-02-09

[Excel][VBA]行や列の表示と非表示の切り替え

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

国本 温子

インプレスジャパン

発売日：2012-02-09

Range("B2").EntireRow.Hidden = False '表示
Range("B2").EntireRow.Hidden = True '非表示

Rows(2).Hidden = False
Rows("2:2").Hidden = True
Rows("2:3").Hidden = False
Cells(2, 2).EntireRow.Hidden = True
Range("2:2").EntireRow.Hidden = False
Range("B2").EntireRow.Hidden = True

Range("B2").EntireColumn.Hidden = False '表示
Range("B2").EntireColumn.Hidden = True '非表示

Columns(2).Hidden = False
Columns("B:B").Hidden = True
Columns("B:C").Hidden = False
Cells(2, 2).EntireColumn.Hidden = True
Range("2:2").EntireColumn.Hidden = False
Range("B2").EntireColumn.Hidden = True

[Excel][VBA]色々なセルの指定方法

'単一セルを行番号と列番号で指定
Cells(3, 2) 'B3
変数が使えるのでループなどで使いやすい。
文字列表示と引数の順番が逆であることに注意。
Cells(3, "B")
このように直接アルファベットで指定することも可能。

'すべてのセル
Cells

'単一行
Rows(2)
'複数行
Rows("1:3")
'すべての行
Rows

'単一列
Columns(2)
'複数列
Columns("A:C")
'すべての列
Columns

'Excel関数で指定するようにStringで範囲指定
Range(文字列)
例
'単一のセル
Range("B2")
'離れた複数のセル
Range("B2,C3")
'セル範囲
Range("A1:C3")
'離れたセル範囲
Range("A2:A3,B1:C1")
'行
Range("2:2")
'列
Range("B:B")
'複数行
Range("1:3")
'複数列
Range("A:C")
'離れた複数行
Range("1:1,3:3")
'離れた複数列
Range("A:A,C:C")
'名前付きセル範囲
Range("name") '名前定義で定義した範囲

応用
Range(Cells(row, column)[, Cells(row, column)])
太字部分は省略可能＆複数指定可能。
変数を使用してセル範囲を指定することができる。

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)

国本 温子
インプレスジャパン
発売日：2012-02-09

[書評]できる逆引き Excel VBAを極める 勝ちワザ7002010/2007/2003/2002対応 (「できる逆引き」シリーズ)

できる逆引き Excel VBAを極める 勝ちワザ700
2010/2007/2003/2002対応 (「できる逆引き」シリーズ)
国本 温子
インプレスジャパン
発売日：2012-02-09

ブクログでレビューを見る»
ネット上に散らばる対応バージョンもわからない情報を参考にするより
コレ一冊ある方が圧倒的に安心できる。
大抵の事はググるより本を見る方が早く見つかるし説明が詳しいので
Excel VBAをガリガリやる人は持っておいたほうが良いと思う。

VBA基礎文法最速マスター - いろいろ解析日記もあるけど他の言語と異なるところが多いのでコレだけじゃきつそう。
VBA自体の文法がわかってないとキツイので以下の本がオススメ。

Excel VBAのプログラミングのツボとコツがゼッタイにわかる本
最初からそう教えてくれればいいのに!Excel2007/2003対応