Excel vbaでのDoEvents繰り返し中にセル選択先を変更しても数式入力欄の表示が元の選択セルの値のままになる

Excel vbaでのDoEvents繰り返し中にセル選択先を変更しても数式入力欄の表示が元の選択セルの値のままになる
4

Upvotes

Upvote

 Aug 18 2021
20 Comments (20 New)
Working on it

EXCEL VBAで以下のコードを実行中の状態で、EXCELワークシート上のセル選択先をカーソル移動キーなどにより変更しても、数式入力欄の表示が元の選択セルの値のままになる現象が発生しています。

 

Dim NTIME As Double

INTPROC:

  NTIME = [Now()] + [Timevalue("00:00:01")] * 0.2

  Do

    DoEvents

    If [Now()] > NTIME Then

         ' Some Operations (200msINTVL)

         GoTo INTPROC

    End If

  Loop

 

発生が確認できた環境

 Win8.1 + Office365 Ver2002-ビルド12527.21952

 Win8.1 + Office365 Ver2102-ビルド13801.20864

 Win10  + Office365 Ver2102-ビルド13801.20808

発生しない事が確認できた環境

 Win10  + Office2016 Ver2107-ビルド14228.20250

 

※諸事情により、発生環境ではフィードバック送信ができないため当コミュニティに投稿しました。

Comments
Copper Contributor

同現象が、以下の環境においても発生しました。

Win10(Ver.20H2-ビルド19042.1165) +Office2019(Ver.2107-ビルド14228.20250)

 

Copper Contributor

当現象が Win8.1 + Office365(Ver.2008-ビルド13127.21704) でも発生する事が確認できました。

Copper Contributor

当現象は Win10 + Office2016(Ver.2108-ビルド14326.20238) では発生しない事が確認できました。

Brass Contributor

当現象は Win10 + Office2016(Ver.2108-ビルド14326.20348) では発生しない事が確認できました。

Copper Contributor

当現象が Win8.1 + Office365(Ver.2008-ビルド13127.21736) でも発生する事が確認できました。

Copper Contributor

当現象が Win8.1 + Office365(Ver.2102-ビルド13801.20960) でも発生する事が確認できました。

Brass Contributor

当現象は Win10 + Office2016(Ver.2110-ビルド14527.20234) では発生しない事が確認できました。

Copper Contributor

当現象が Win8.1 + Office365(Ver.2102-ビルド13801.21004) でも発生する事が確認できました。

Copper Contributor

当現象が Win10 + Office365(Ver.2102-ビルド13801.21050) でも発生する事が確認できましたが、

マウスでセル選択するとそのセルの表示になりますが、カーソル移動キー(矢印キー)で選択を移動すると表示が変わりません。

Copper Contributor

Win10+MS365(Ver.2108-14326.20852)でも同現象が発生する事を確認しまた。
ただし、当該VBA動作開始後にマウスクリックでセル選択位置を変更した場合は正しく表示更新されますが、
カーソル移動キーでセル選択位置を移動した場合は表示更新されず、かつ、
それ以降はマウスクリックでセル選択位置を変更しても表示更新されない状態になります。
VBAの動作終了後は、マウスクリックでもカーソル移動キーでもセル選択位置を移動した場合は常に正しく表示更新される状態に戻ります。

Copper Contributor

Win10+MS365(Ver.2108-14326.20910)でも同現象が発生する事を確認しまた。

Copper Contributor

Win10+MS365(Ver.2108-14326.20962)でも同現象が発生する事を確認しまた。

Copper Contributor

Win10+MS365(Ver.2108-14326.21018)でも同現象が発生する事を確認しました。

Copper Contributor

Win10+MS365(Ver.2108-14326.21080)でも同現象が発生する事を確認しました。

Copper Contributor

Win10+MS365(Ver.2202-14931.20724)でも同現象が発生する事を確認しました。

Copper Contributor

Win10+MS365(Ver.2202-14931.20764)でも同現象が発生する事を確認しました。

Copper Contributor

Win10+MS365(Ver.2208-15601.20578)でも同現象が発生する事を確認しました。

 

Brass Contributor

Win10+MS365(Ver.2304-16327.20214)でも同現象が発生する事を確認しました。

Copper Contributor

Win10+MS365(Ver.2208-15601.20660)でも同現象が発生する(解消されていない)事を確認しました。

 

Copper Contributor

Win10+MS365(Ver.2302-16130.20694)でも同現象が発生する(解消されていない)事を確認しました。
2023/12/26: Win10+MS365(Ver.2302-16130.20846)でも同現象が発生する(解消されていない)事を確認しました。