Excel VBA質問箱 IV

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

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


30690 / 76738 ←次へ | 前へ→

【51312】Re:OnTimeメソッドで呼び出すプロシージャへの引数の渡し方
発言  Lindy  - 07/9/11(火) 15:20 -

引用なし
パスワード
   ▼jabjab さん:
こんにちは

試してみましたけどうまくいきませんね。
私はこのような事をする場合、引数で渡さずに
変数をPublic宣言して使ってしまいます。

ご参考になれば^^

Public A As testType

Type testType
  i As Integer
  B As String
  dummyFlag1 As Boolean  'Testでは使用しません
  dummyFlag2 As Boolean  'Testでは使用しません
  dummyFlag3 As Boolean  'Testでは使用しません
End Type

Sub test()
  ' Dim C As testType
  With A
    .i = 10
    .B = "ABC"
  End With
  TestOnTime
End Sub

Sub TestOnTime()
  If A.i > 0 Then
    Cells(1, A.i + 2) = A.B & CStr(A.i)
    A.i = A.i - 1
    Application.OnTime Now + TimeValue("00:00:3"), "TestOnTime"
  End If
End Sub
0 hits

【51308】OnTimeメソッドで呼び出すプロシージャへの引数の渡し方 jabjab 07/9/11(火) 13:49 質問
【51312】Re:OnTimeメソッドで呼び出すプロシージャ... Lindy 07/9/11(火) 15:20 発言
【51313】Re:OnTimeメソッドで呼び出すプロシージャ... jabjab 07/9/11(火) 15:42 発言
【51374】Re:OnTimeメソッドで呼び出すプロシージャ... ichinose 07/9/13(木) 19:10 発言
【51375】Re:OnTimeメソッドで呼び出すプロシージャ... ichinose 07/9/13(木) 20:22 発言
【51389】繰り返し処理プロジェクト 設定編 ichinose 07/9/14(金) 10:46 回答
【51390】繰り返し処理プロジェクト 運用編 ichinose 07/9/14(金) 10:47 回答

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