Excel 2007 で 97-2003 ブック (*.xls) から Excel ブック (*.xlsx) にシートを挿入すると [印刷タイトル] の [タイトル行] の値が消失する場合がある

現象
Microsoft Excel 2007 を使用し、97-2003 ブック (*.xls) からシートをコピーし、Excel ブック (*.xlsx) にシートの挿入を行うと、Excel ブック (*.xlsx) に挿入されたシートでは [印刷タイトル]-[タイトル行] の値が消失する場合があります
回避策
この現象は、97-2003 ブック (*.xls) からシートをコピーし、97-2003 ブック (*.xls) へシートを挿入する場合は発生しません

以下のいずれかの方法で回避することができます



手動での回避方法 :

(A). Excel の既定の保存形式を 97-2003 ブック (*.xls) に変更する
  1. [Office] ボタンをクリックし、[Excel のオプション] をクリックします
  2. [保存] をクリックし、"ブックの保存" セクションで "ファイルの保存形式" を "Excel 97-2003 ブック (*.xls)" に設定します

(B). 保存済みの 97-2003 ブック (*.xls) を用意し、このファイルに対しシートの挿入を行う


マクロでの回避方法 : 

(A). 任意の場所に保存済みの xls 形式の空白のファイルをあらかじめ用意し、そのファイルにシートを挿入する

このコード例では、オリジナルのファイルと同じフォルダに "Blank.xls" という名前のファイルをあらかじめ用意しシートの挿入を行います

Sub Workaround1()    Dim oWkbTo As Workbook    Set oWkbTo = Workbooks.Add(ThisWorkbook.Path & "\Blank.xls")    ThisWorkbook.Worksheets(1).Copy After:=oWkbTo.Worksheets(1)End Sub


(B). Copy メソッドを使用し、引数 after を指定せずに新規ブックを作成する

引数 after を指定しない場合、自動で作成される新規ファイルは、オリジナルのファイル形式に準じた形式で作成されます
オリジナルファイルが xls 形式の場合は、互換モードの状態で新規ファイルが作成されます

Sub Workaround2()    ThisWorkbook.Worksheets(1).CopyEnd Sub



状況
マイクロソフトでは、この問題をこの資料の対象製品として記載されているマイクロソフト製品の問題として認識しています。
詳細
問題の再現手順 :

  1. Excel 2007 を起動します
  2. [Office] ボタンをクリックし、[Excel のオプション] をクリックします
  3. [保存] をクリックし、"ブックの保存" セクションで "ファイルの保存形式" が "Excel ブック (*.xlsx)" になっていることを確認します
    "Excel ブック (*.xlsx)" になっていない場合は、変更します
  4. [Excel のオプション] ダイアログの [OK] をクリックします
  5. Excel 2007 を終了します
  6. Excel 2007 を起動し、セルに任意のデータを入力します
    ABCD
    1qwer
    2asdf
    3zxcv
  7. A1 セルから D3 セルを選択し、[ページレイアウト]-[印刷範囲]-[印刷範囲の設定] をクリックします
  8. [ページレイアウト]-[印刷タイトル] を選択します
  9. "タイトル行" に任意の行 (例: $2:$3) を設定し、[OK] をクリックします
  10. [Office] ボタンをクリックし、[名前を付けて保存] より、任意のファイル名を設定し、"ファイルの種類" では、Excel 97-2003 ブック (*.xls) として保存します (ここでは、例として Sample.xls として保存します)
  11. Excel を終了します
  12. "10." で保存済みの Sample.xls ファイルを開きます
  13. さらに、Ctrl + N 押下し、新規ブックを作成します (例 : Book1)
  14. "12." で開いた xls ブックに戻ります
  15. Sheet1 をクリックし、右クリックして表示されるショートカットメニューより、"移動またはコピー" を選択します
  16. "移動先ブック名" では "13." のブックを選択します。(例 : Book1)
    "コピーを作成する" オプションにチェックを入れ (有効)、[OK] をクリックします
  17. Book1 に Sample.xls の Sheet1 が挿入されたことを確認します

結果 :

新しいブックに挿入されたシートの [ページレイアウト]-[印刷タイトル] では、[印刷タイトル] の "行のタイトル" が保持されません 
 
注意 : これは、マイクロソフトのサポート組織内で直接作成された "緊急公開" の資料です。 この資料には、確認中の問題に関する現状ベースの情報が記載されています。 情報提供のスピードを優先するため、資料には誤植が含まれる可能性があり、予告なしに随時改定される場合があります。 その他の考慮事項については、使用条件を参照してください。
プロパティ

文書番号:2680534 - 最終更新日: 09/20/2016 11:04:00 - リビジョン: 2.0

  • kbhowto kbtshoot kbnofix kbdeployment kbexpertiseinter KB2680534
フィードバック