[[20151125101438]]　『図形テキストボックスへの文字の表示』（初心者）　ページの最後に飛ぶ

『図形テキストボックスへの文字の表示』（初心者）

テキストボックスに文字を表示させる場合，表示されるタイミングが
順番通りになりません。

例えば，下記ではテキストボックス１に”開始”が表示されず
Msgboxで"終了"が開き，OK後にテキストボックスに”開始”が表示されます。

   ActiveSheet.TextBoxes("TextBox 1").Text = "開始"
   MsgBox "終了"

MsgboxがWaitの場合はWait後”開始"が表示されます。

順番通り表示させるには，どのような方法がありますか。
よろしくお願いします。

＜使用 Excel：Excel2010、使用 OS：Windows7 ＞

 開始　をセットした後、MsgBox の前に

 Application.ScreenUpdating = True

 をいれて試してみてください。

（β） 2015/11/25(水) 10:31

 初心者さん(同じ名前が使われそうなものは避けたほうがいいと思うが)の環境でも同じになるかはわからないが。

 私の環境(Windows7+Excel2010)ではMsgBoxの前にDoEventsを二つ入れたところテキストボックスに「開始」が表示されるようになった。
 (一つでは駄目だった)
（ねむねむ） 2015/11/25(水) 10:38

βさん，できました。

Application.ScreenUpdating = False をこの前で使用していないのに
なぜ true がいるのでしょうね。

むねむねさん，できました。
私もDoeventsを 1個入れて試しましたが駄目でした。
2個入れてOKにはきがちきませんでした。

みなさんありがとうございました。
（初心者） 2015/11/25(水) 10:58

コメント返信：