Excel VBA 印刷プレビュー後の閉じるボタンでフォームを表示 - D-ramのWeb開発日記

Excel VBA 印刷プレビュー後の閉じるボタンでフォームを表示

Excel(エクセル)のVBAで、フォームのボタンをクリックして印刷プレビューを行うと
なぜかExcelが固まってしまう。(Xp, Excel2000)

回避策として、以下のようにしたらうまくいきました。
1.フォームを隠す
2.印刷プレビュー
3.プレビューの閉じるボタンでフォームを表示
Private Sub CommandButton1_Click()
    Dim ret As Boolean
    'フォームを閉じる
    UserForm1.Hide
    ret = Worksheets("Sheet2").PrintPreview
    '戻り値を判定することで閉じるが押されたかがわかる
    If ret = False Then
        'フォームを表示
        UserForm1.Show
    End If
End Sub


【関連記事】

このブログ記事について

このページは、d-ramが2008年6月11日 16:03に書いたブログ記事です。

ひとつ前のブログ記事は「Apacheのポート変更について」です。

次のブログ記事は「MySQL 大文字と小文字の区別について」です。

最近のコンテンツはインデックスページで見られます。過去に書かれたものはアーカイブのページで見られます。