Excel VBA質問箱 IV

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

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


27796 / 76732 ←次へ | 前へ→

【54253】Re:onTime 動作
回答  かつし  - 08/3/2(日) 15:04 -

引用なし
パスワード
   ichinoseさん こんにちは。ご教示有難う御座います。出張から帰り画面を見ました。ご指示の動作確認をしましたが、どうもうまくいきません。test1の文は下記です。test2の文も確認のボックスが表示されます。この表示消しがどうも分かりません。私はまだVBAの知識が薄いのでこれから少しずつ学びます。とりあえず「onTime」を使っていきます。
Sub test1()
  Option Explicit
  Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
  MsgBox Now()
  Sleep 15000
  MsgBox Now()
  Columns("G:G").Select
  Selection.Copy
  Columns("G:G").Select
  Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
    False, Transpose:=False
  Range("G5").Select
  With Selection.Interior
    .ColorIndex = 6
    .Pattern = xlSolid
  End With
End Sub

0 hits

【54187】onTime 動作 かつし 08/2/28(木) 17:52 質問
【54190】Re:onTime 動作 ichinose 08/2/28(木) 21:26 発言
【54199】Re:onTime 動作 かつし 08/2/29(金) 11:38 質問
【54211】Re:onTime 動作 ichinose 08/2/29(金) 18:20 発言
【54234】Re:onTime 動作 かつし 08/3/1(土) 16:04 回答
【54235】Re:onTime 動作 ichinose 08/3/1(土) 16:27 発言
【54253】Re:onTime 動作 かつし 08/3/2(日) 15:04 回答
【54274】Re:onTime 動作 ichinose 08/3/2(日) 17:32 発言

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