トップ回答者
VBEについて

質問
回答
-
ディッセンバー さん、
ファイルをシェアしていただき、ありがとうございました。
早速ダウンロードして開いてみました。
1.当方の環境では問題なく VBE 画面が開きました。
2.また、フォームにコードを加えてみましたが、VBE 画面が不安定になったり応答なしになることもありませんでした。
Private Sub UserForm_Activate() TextBox1.Text = "テキストボックス" CheckBox1.Value = False End Sub Private Sub CheckBox1_Click() If (CheckBox1.Value = True) Then TextBox1.Text = "check オン" TextBox1.BackColor = &HFF& Else TextBox1.Text = "check オフ" TextBox1.BackColor = &H0& End If TextBox1.ForeColor = &HFFFF& End Sub Private Sub CommandButton1_Click() MsgBox "ボタンが押された" End Sub
なお、当方の環境は次のとおりです。
Windows 10 Pro. (64-bit)
バージョン 1607(ビルド 14393.447)
Excel 2016 (32-bit)
バージョン 1609(ビルド 7369.2055)
ディッセンバーさんの環境をお教えいただけますか?
北窓舎:芦田- 回答としてマーク ディッセンバー 2016年11月10日 15:25
-
ディッセンバー さん、
英語のフォーラムに関連記事がありました。
VBA forms are not working as expected
この記事の最初の方に次の文章があります。
For example:
If you use VBA to develop custom forms,
you may notice that transparent label controls are opaque when they should be transparent,
or that Office stops responding when you set the Cycle property for MultiPage controls to 2-fmCycleCurrentForm.
MultiPage コントロールの Cycle プロパティを 2-fmCycleCurentForm にすると Office が反応しなくなる、との記述があります。
元はフォーム上のラベルの背景色が透明にならなくなった不具合に端を発して、シート上のラベルの背景色の透明にならなくなったり、4Kモニターではシート上のボタンの文字が大きくなったり・・・と、バージョン 1607(ビルド 3769.2038)ではたくさんの不具合が発見されています。
ディッセンバーさんの Excel(Office)を最新バージョンにアップデートされることを強くおススメいたします。
ファイル > アカウント > 右側の[更新オプション]で[今すぐ更新]が選択できます。
なお、同記事の末尾には、バージョン 1609 (7369.2054) でバグフィックスされたと書かれています。現時点では (7369.2055) が最新版です。
北窓舎:芦田
- 編集済み Ashidacchi 2016年11月10日 23:15
- 回答としてマーク ディッセンバー 2016年11月11日 15:00
すべての返信
-
芦田さん
お世話になっております。返信遅れてしまい申し訳ございません。
https://1drv.ms/x/s!Aq_hqpRmt35Ud_0fkyg1f3sfK_E
こちらがOneDriveでシェアした問題のエクセルのファイルです。
-
ディッセンバー さん、
ファイルをシェアしていただき、ありがとうございました。
早速ダウンロードして開いてみました。
1.当方の環境では問題なく VBE 画面が開きました。
2.また、フォームにコードを加えてみましたが、VBE 画面が不安定になったり応答なしになることもありませんでした。
Private Sub UserForm_Activate() TextBox1.Text = "テキストボックス" CheckBox1.Value = False End Sub Private Sub CheckBox1_Click() If (CheckBox1.Value = True) Then TextBox1.Text = "check オン" TextBox1.BackColor = &HFF& Else TextBox1.Text = "check オフ" TextBox1.BackColor = &H0& End If TextBox1.ForeColor = &HFFFF& End Sub Private Sub CommandButton1_Click() MsgBox "ボタンが押された" End Sub
なお、当方の環境は次のとおりです。
Windows 10 Pro. (64-bit)
バージョン 1607(ビルド 14393.447)
Excel 2016 (32-bit)
バージョン 1609(ビルド 7369.2055)
ディッセンバーさんの環境をお教えいただけますか?
北窓舎:芦田- 回答としてマーク ディッセンバー 2016年11月10日 15:25
-
ディッセンバー さん、
英語のフォーラムに関連記事がありました。
VBA forms are not working as expected
この記事の最初の方に次の文章があります。
For example:
If you use VBA to develop custom forms,
you may notice that transparent label controls are opaque when they should be transparent,
or that Office stops responding when you set the Cycle property for MultiPage controls to 2-fmCycleCurrentForm.
MultiPage コントロールの Cycle プロパティを 2-fmCycleCurentForm にすると Office が反応しなくなる、との記述があります。
元はフォーム上のラベルの背景色が透明にならなくなった不具合に端を発して、シート上のラベルの背景色の透明にならなくなったり、4Kモニターではシート上のボタンの文字が大きくなったり・・・と、バージョン 1607(ビルド 3769.2038)ではたくさんの不具合が発見されています。
ディッセンバーさんの Excel(Office)を最新バージョンにアップデートされることを強くおススメいたします。
ファイル > アカウント > 右側の[更新オプション]で[今すぐ更新]が選択できます。
なお、同記事の末尾には、バージョン 1609 (7369.2054) でバグフィックスされたと書かれています。現時点では (7369.2055) が最新版です。
北窓舎:芦田
- 編集済み Ashidacchi 2016年11月10日 23:15
- 回答としてマーク ディッセンバー 2016年11月11日 15:00