10日でおぼえるExcel VBA実践教室 2000対応（VBテックラボ 瀬戸 遥）｜翔泳社の本
  1. ホーム >
  2. 書籍 >
  3. 10日でおぼえるExcel VBA実践教室 2000対応

10日でおぼえるExcel VBA実践教室 2000対応

著
著

形式：
書籍
発売日：
ISBN：
9784881358559
定価：
3,080円（本体2,800円＋税10%）
仕様：
B5変・416ページ
カテゴリ：
MAC

購入はこちら

プログラミングセミナー」のように、段階的にVBAの使い方やテクニックを、無理なく習得できる好評の入門書のExcel 2000対応版、待望の実践編です。本格的なExcel VBAのテクニックを学べるように、配列やユーザー定義関数などVBA 初心者がつまづきやすいところを豊富な例題とともに、重点解説。サンプルマクロをレッスンごとに分け、約10日で全体を学べるように構成しました。本書はExcel VBAをさらにステップアップしたい人必携の書です。
目次の登録はありません。
本書は付属データの提供はございません。

書籍の購入や、商用利用・教育利用を検討されている法人のお客様はこちら

図書館での貸し出しに関するお問い合わせはよくあるお問い合わせをご確認ください。


利用許諾に関するお問い合わせ

本書の書影（表紙画像）をご利用になりたい場合は書影許諾申請フォームから申請をお願いいたします。
書影（表紙画像）以外のご利用については、こちらからお問い合わせください。


お問い合わせ

内容についてのお問い合わせは、正誤表、追加情報をご確認後に、お送りいただくようお願いいたします。

正誤表、追加情報に掲載されていない書籍内容へのお問い合わせや
その他書籍に関するお問い合わせは、書籍のお問い合わせフォームからお送りください。

追加情報はありません。
この商品の「よくある質問」はありません。

現在表示されている正誤表の対象書籍

書籍の種類:紙書籍

書籍の刷数:全刷


※重版をした際に、内容が修正されている場合があります。「刷数の確認方法（例）」の図を参考に、お手元の書籍の刷数をご確認ください。下の「書籍の刷数」の欄で刷数を選択すると、お持ちの書籍の刷数に合わせて、正誤情報を絞り込むことができます。

書籍によっては表記が異なる場合がございます


本書に誤りまたは不十分な記述がありました。下記のとおり訂正し、お詫び申し上げます。

対象の書籍は正誤表がありません。

　書籍の刷数で正誤情報を絞り込みたい場合は選択してください。

　書籍の種類:

最終更新日:2004年08月27日
ページ数 内容 書籍修正刷 電子書籍訂正 発生刷 登録日
0
付録ディスク Lesson22.xls Module1 Sub チェックボックス() 30行目
誤 If MyBln.CheckBoxes(1).Checked Then
正 If MyBln.CheckBoxes(3).Checked Then
未 未 1刷 2004.08.27
166
Module1:(General)-SUM関数の実行
誤 
Sub SUM関数の実行()
    Dim Total As Integer
正 
Sub SUM関数の実行()
    Dim Total As Long
備
考		 IntegerをLongに
未 未 1刷 2001.03.07
173
下から10行目
誤 
Sub SUM関数の実行()
    Dim Total As Integer
正 
Sub SUM関数の実行()
    Dim Total As Long
備
考		 IntegerをLongに
未 未 1刷 2001.03.07
205
Module1:(General)-アシスタント表示
誤 
        .Animation = msoAnimationAppier
    End With
End Sub
正 
        .Animation = msoAnimationAppear
    End With
End Sub
備
考		 msoAnimationAppierをmsoAnimationAppearに
未 未 1刷 2001.03.07
205
Module1:(General)-アシスタント表示3
誤 
       .FileName = "Dolphin.act"
       .Visible = True
       .Sounds = True
       .Animation = msoAnimationAppier
    End With
End Sub
正 
       .FileName = "Dolphin.acs"
       .Visible = True
       .Sounds = True
       .Animation = msoAnimationAppear
    End With
End Sub
備
考		 "Dolphin.act"を"Dolphin.acs"に、msoAnimationAppierをmsoAnimationAppearに
未 未 1刷 2001.03.08
207
最下行
誤 (最下行に追加)
正 [Officeアシスタントの使用]のチェックをはずした場合、正常に動作しない場合がありますので、その場合は、[ヘルプ]-[Officeアシスタントを表示する]としておいてから、[ヘルプ]-[Officeアシスタントを隠す]としてください。
備
考		 捕捉事項の追加です
未 未 1刷 2001.03.08
208
上から13行目
誤 ここでは、一番最初のシーンを表示させますので、「msoAnimationAppier」を設定します。 
Assistant.Animation = msoAnimationAppier
正 ここでは、一番最初のシーンを表示させますので、「msoAnimationAppear」を設定します。 
Assistant.Animation = msoAnimationAppear
備
考		 msoAnimationAppierをmsoAnimationAppearにします。2箇所変更。
未 未 1刷 2001.03.08
208
下から3行目
誤 
        .Animation = msoAnimationAppier
    End With
End Sub
正 
        .Animation = msoAnimationAppear
    End With
End Sub
備
考		 msoAnimationAppierをmsoAnimationAppearに
未 未 1刷 2001.03.08
209
表の2行1列目
誤 msoAnimationAppier
正 msoAnimationAppear
未 未 1刷 2001.03.08
210
表の「キャラクターの種類」列の2、3行目
誤 スーパーわんた ピンキー
正 F1 ミミー
未 未 1刷 2001.05.18
210
表の「ファイル名」列の1～7行目
誤 Logo.acp Powerpup.act Scribble.acp Clippit.act Dolphin.act Rocky.acp OffLady.act
正 Logo.acs F1.acs Offcat.acs Clippit.acs Dolphin.acs Rocky.acs Saeko.acs
未 未 1刷 2001.05.18
210
上から5行目のコード
誤 "Dolphin.act"
正 "Dolphin.acs"
未 未 1刷 2001.05.18
210
解説7のコード
誤 Sub アシスタント表示3() Dim AnimeType As String AnimeType = Assistant.FileName MsgBox "アニメーションファイルは " & AnimeType With Assistant .FileName = "Dolphin.act" .Visible = True .Sounds = True .Animation = msoAnimationAppier End With End Sub
正 Sub アシスタント表示3() MsgBox "アニメーションファイルは " & Assistant.FileName With Assistant .FileName = "Dolphin.acs" .Visible = True .Sounds = True .Animation = msoAnimationAppear End With End Sub
未 未 1刷 2001.05.18
210
ワンポイントアドバイスの1行目
誤 Dolphin.act
正 Dolphin.acs
未 未 1刷 2001.05.18
214
コードの2行目
誤 Dim Rtn as Integer
正 Dim Ret as Integer
未 未 1刷 2004.08.27
225
「解説１」の1行目
誤 BalloonLable
正 BalloonLabel
未 未 1刷 2001.05.18
225
コード 上から9行目
誤 If MyBln.CheckBoxes(1).Checked Then
正 If MyBln.CheckBoxes(3).Checked Then
未 未 1刷 2004.08.27
227
3行目
誤 番号付きラベル
正 ボタン付きラベル
未 未 1刷 2001.05.18
293
4行目と9行目
誤 MergeCellsメソッド
正 MergeCellsプロパティ
未 未 1刷 2001.05.18
302
表
誤 HTML形式で保存
正 ブラウザで表示
未 未 1刷 2001.05.18
304
Module1:(General)-Boot_IEコードの8行目
誤 .navigate2 SaveFile
正 .navigate2 "file://" & SaveFile
未 未 1刷 2001.05.18
311
4行目
誤 変数「SaveFile」を、
正 変数「SaveFile」に"file://"をつけて、
未 未 1刷 2001.05.18
311
6行目
誤 .navigate2 SaveFile
正 .navigate2 "file://" & SaveFile
未 未 1刷 2001.05.18
322
Filenameの1行目
誤 服務パス
正 含むパス
未 未 1刷 2001.05.18
336
一番下の行
誤 Recordsest
正 Recordset
未 未 4刷 2002.01.09
356
UserForm1:(General)-(Declarations)コード
誤 Dim WrkSpace As Workspace Dim OpenDB As Database Dim OpenTable As Recordset
正 Dim WrkSpace As Workspace Dim OpenDB As Database
備
考		 3行目を削除する
未 未 1刷 2001.05.18
357
下から3行目
誤 Set OpenTable = ...
正 「Set OpenTable = ...」で始まる1行を削除
未 未 1刷 2001.05.18
358
14行目と16行目
誤 OpenTable.Close Set OpenTable = Nothing
正 上記の2行を削除
未 未 1刷 2001.05.18
359
下から8行目
誤 Dim OpenTable As Recordset
正 上記の1行を削除
未 未 1刷 2001.05.18
364
1行目から5行目
誤 できたら、テーブルを開きます。…次に、クエリーを実行します。
正 できたら、クエリーを実行します。
備
考		 「テーブルを」から「次に、」までを削除
未 未 1刷 2001.05.18
366
下から2、4行目
誤 OpenTable.Close Set OpenTable = Nothing
正 上記2行を削除
未 未 1刷 2001.05.18
394
5行目
誤 [navigate2]プロパティ
正 「navigate2」メソッド
未 未 1刷 2001.05.18
394
14行目（コードの6行目）
誤 .navigate2 NewBook
正 .navigate2 "file://" & NewBook
未 未 1刷 2001.05.18
395
上のコードの下から4行目
誤 .navigate2 "c:\koyomi.htm"
正 .navigate2 "file://c:\koyomi.htm"
未 未 1刷 2001.05.18
402
上の「'追加コード」の2、4行目
誤 " & "Yes )" " & "No )"
正 Yes )" No )"
備
考		 「" & "」を削除する
未 未 1刷 2001.05.18
402
上の「'要素数を修正」から4行目
誤 Set OpenTable = OpenDB.OpenRecordset(TableName, dbOpenTable)
正 上記の1行を削除
未 未 1刷 2001.05.18
403
1行目と3行目
誤 OpenTable.Close Set OpenTable = Nothing
正 上記の2行を削除
未 未 1刷 2001.05.18
53
2行目
誤 UserStat(2,2)
正 UsrStat(2,2)
5刷 未 1刷 2001.12.11
53
2
誤 UserStat(2,2)
正 UsrStat(2,2)
未 未 1刷 2001.12.11
カバーの表２
下から12行目
誤 なるべく簡単なものととして
正 なるべく簡単なものとして
未 未 1刷 2001.05.18