0

Excel がクラッシュする このマクロを印刷プレビューとプリンター ウィンドウに使用すると、この問題を解決する方法を Google で検索しましたが、失敗しました。 PrintPreviewに使用するコードは次のとおりです

Sub Print_TimeSht()
Application.ScreenUpdating = False

  With ActiveSheet.PageSetup
  .PrintArea = "$A$1:$Q$599"           ' set print area
        .PrintHeadings = False
        .PrintGridlines = False
        .PrintComments = xlPrintNoComments

        .CenterHorizontally = False
        .CenterVertically = False
        .Orientation = xlPortrait
        .Draft = False
       '.PaperSize = xlPaperA4
        .FirstPageNumber = xlAutomatic
        .Order = xlDownThenOver
        .BlackAndWhite = True
        .Zoom = False
        .PrintErrors = xlPrintErrorsDisplayed

     End With
         Application.ScreenUpdating = True
        With ActiveWindow
         .Zoom = 80
         .SelectedSheets.PrintPreview

        End With
Application.Dialogs(xlDialogPrint).Show
Application.ScreenUpdating = True
End Sub

これらの問題を解決する方法私はWin7 32ビットでExcel 2010 32ビットを使用しています>>??????

4

2 に答える 2

0

まず、次の行を「true」に変更してみてください

Application.ScreenUpdating = False

これにより、Google 検索の問題解決に使用するエラー メッセージが生成される場合があります。

それ以外に、おそらく次の項目を確認してください。

1) マクロセキュリティが低に設定されている (これをテストするには、テスト後に元の設定に戻します) 2)コントロール パネルに移動し、[プログラムのアンインストール]を選択し、[ Microsoft Office ] を 1 回クリックして[変更]を 選択し、[修復] を選択して、プログラムが見つからないことを確認します。 dll ファイルなど。問題は単に .dll の欠落である可能性があります 3) これで問題が解決しない場合は、コントロール パネル/アンインストール/変更に戻り、今度は [機能の追加/削除] を選択します。
a）すべてのExcelがインストールされていることを確認します（グレーアウトされているものはありません） b）オフィスの共有機能で、アプリケーションのビジュアルベーシックを確認しますがインストールされています。また、共有機能セクションには、校正ツールがインストールされています。すべてのベースが確実にカバーされるように、すべての Excel とすべての Office 共有機能をインストールしたままにしています。

于 2012-09-09T19:06:50.063 に答える
0

答えは少し遅れていますが、同じ問題を抱えている人にとっては解決策があるとよいでしょう。Excel の使用がフリーズするのを防ぐために、プリンターに接続していない場合があります。

Application.PrintCommunication = False 'above:
    With Activesheet.PageSetup

以下

End With
Application.PrintCommunication = True
于 2014-11-15T12:27:07.257 に答える