VBAの最近のブログ記事
Excel(エクセル)のVBAで、フォームのボタンをクリックして印刷プレビューを行うと
なぜかExcelが固まってしまう。(Xp, Excel2000)
回避策として、以下のようにしたらうまくいきました。
１．フォームを隠す
２．印刷プレビュー
３．プレビューの閉じるボタンでフォームを表示
なぜかExcelが固まってしまう。(Xp, Excel2000)
回避策として、以下のようにしたらうまくいきました。
１．フォームを隠す
２．印刷プレビュー
３．プレビューの閉じるボタンでフォームを表示
Private Sub CommandButton1_Click()
Dim ret As Boolean
'フォームを閉じる
UserForm1.Hide
ret = Worksheets("Sheet2").PrintPreview
'戻り値を判定することで閉じるが押されたかがわかる
If ret = False Then
'フォームを表示
UserForm1.Show
End If
End Sub
Dim ret As Boolean
'フォームを閉じる
UserForm1.Hide
ret = Worksheets("Sheet2").PrintPreview
'戻り値を判定することで閉じるが押されたかがわかる
If ret = False Then
'フォームを表示
UserForm1.Show
End If
End Sub
