Excel VBA質問箱 IV

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

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


19583 / 76732 ←次へ | 前へ→

【62579】Re:循環問題があります 別解
回答  byronwoo  - 09/8/1(土) 16:09 -

引用なし
パスワード
   ▼ichinose さん:
>1.A.xls
>Private Sub CommandButton1_Click()
>  workbooks.open "c:\b.xls"
>End Sub
>Private Sub CommandButton2_Click()
>  On Error Resume Next
>  With Workbooks("B.XLS")
>    .b_loop = False
>  End With
>  DoEvents
>  MsgBox "TESTING"
>  On Error GoTo 0
>End Sub
>
>
>2.B.xls
>
>Public b_loop As Boolean
>Private Sub Workbook_Open()
>  b_loop = True
>  Do While b_loop
>   DoEvents
>  Loop
>  Me.Close False
>End Sub
Thank you very much.i'll try this code in Monday.It seems working.
107 hits

【62506】循環問題があります BYRONWOO 09/7/27(月) 11:20 質問
【62517】Re:循環問題があります 脱 初心者 09/7/28(火) 14:02 発言
【62551】Re:循環問題があります BYRONWOO 09/7/29(水) 17:05 質問
【62555】Re:循環問題があります ponpon 09/7/29(水) 22:19 発言
【62562】Re:循環問題があります byronwoo 09/7/30(木) 22:06 質問
【62563】Re:循環問題があります ichinose 09/7/31(金) 7:50 発言
【62564】Re:循環問題があります 追伸 ichinose 09/7/31(金) 7:55 発言
【62565】Re:循環問題があります 別解 ichinose 09/7/31(金) 10:27 発言
【62579】Re:循環問題があります 別解 byronwoo 09/8/1(土) 16:09 回答
【62569】Re:循環問題があります 脱 初心者 09/7/31(金) 17:41 発言
【62578】Re:循環問題があります byronwoo 09/8/1(土) 16:03 質問

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