p.69
紙面にファイル名（01-17.xlsx）のアイコンを記載しておりますが、サンプルファイルは提供しておりません。

p.335（初版第1刷）
▼04-19.xlsm　（Else~End If間）
誤）セル.Interior.ColorIndex = vbYellow
正）セル.Interior.Color = vbYellow

p.354
▼05-03.xlsm　（上から3番目のコメント）
誤）’2列目の先頭行から最下行まで繰り返し処理
正）’B列の2行目から最下行まで繰り返し処理

p.376
▼05-07.xlsm　（追記：青字）
‘氏名が取得できた（空白ではない）場合
If 氏名 <> “” Then
‘採用可否によって処理を分岐する
Select Case 採用可否
‘採用通知書をコピーする
Case “採用”
.Sheets(“採用通知書”).Copy , ブック.Sheets(ブック.Sheets.Count)
‘不採用通知書をコピーする
Case “不採用”
.Sheets(“不採用通知書”).Copy , ブック.Sheets(ブック.Sheets.Count)
End Select

‘取得した氏名を、コピーしたシートのA3セルとシート名に設定する
ブック.Sheets(ブック.Sheets.Count).Range(“A3”).Value = 氏名
ブック.Sheets(ブック.Sheets.Count).Name = 氏名
End If

p.378 ページ中部　（追記：青字）
●採用の場合
.Sheets(“採用通知書”).Copy , ブック.Sheets(ブック.Sheets.Count)
●不採用の場合
.Sheets(“不採用通知書”).Copy , ブック.Sheets(ブック.Sheets.Count)

P.379　1行目　（追記：青字）
「(ブック.Sheets.Count)」