Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


51212 / 76732 ←次へ | 前へ→

【30393】If文で・・・
質問  りんご  - 05/10/26(水) 16:47 -

引用なし
パスワード
   超初心者でやりはじめたばかりなのですがぜひともわかる方
教えてください。
注文書を作ってまして、印刷ボタンをクリックすると印刷画面へ行くところの下
の処理で、下文が元で
Sub 印刷btn_Click()
  '画面を固定
   Application.ScreenUpdating = False
     
  'プレビュー画面を表示
  Sheets("印刷").PrintPreview
  
  '画面の固定を解除
  Application.ScreenUpdating = True
End Sub
これに(できればIf文で)もし指定範囲に一つでも入力がなかった場合はMsgBoxを表示するようにしたいのです。
If Range("I4,D9,I8,I9,C13:C27,H13:H27") = Then
     MsgBox "未入力があります。確認して下さい"
   Exit Sub
  End If
画面固定後に上みたいなかたちでいれたいのですがThenの前には何が入るのでしょうか?ちなみに違うとこもあったら教えてください。
1 hits

【30393】If文で・・・ りんご 05/10/26(水) 16:47 質問
【30394】Re:If文で・・・ Jaka 05/10/26(水) 17:13 回答
【30395】Re:If文で・・・ Statis 05/10/26(水) 17:15 回答
【30398】Re:If文で・・・ りんご 05/10/26(水) 17:49 質問
【30400】Re:If文で・・・ Statis 05/10/26(水) 18:10 回答
【30413】Re:If文で・・・ awu 05/10/27(木) 0:58 回答
【30421】Re:If文で・・・・ りんご 05/10/27(木) 10:45 質問
【30426】Re:If文で・・・・ Statis 05/10/27(木) 11:55 発言
【30429】Re:If文で・・・・ awu 05/10/27(木) 12:27 発言
【30430】Re:If文で・・・・ Statis 05/10/27(木) 12:32 発言
【30435】Re:If文で・・・・ りんご 05/10/27(木) 13:16 お礼

51212 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free