2017.10.16 Monday
EXCEL213以降
EXCEL2013以降のバージョンで起動するとApplication.Visible = Falseで隠していたシートが表示されるようになってしまいました。MDIからSDIに変わってしまったのが原因の様です。
ThisWorkbook に記述
Private Sub Workbook_open()
'EXCEL起動時ユーザーフォームを表示する
With UserForm1
.StartUpPosition = munaak1
.Top = 100
.Left = 500
End With
UserForm1.Show vbModeless
End Sub
Sheet1記述
Private Sub UserForm_Activate()
''★起動時Excelを非表示にする★
Application.Visible = False
End Sub
解決方法をご存知の方は教えてね!
vafeeさん ありがとうございます。
その方法だと以下のようになってしまいます。
2017/10/20
勤務先、情シスの方に見てもらったところ
UserForm1.Show vbModeless −−> UserForm1.Show とvbModelessを外すとシートが表示されなくなりましたと連絡がありました。(目から鱗だわ!) 但し、フォームにボタンを付けそこからシートを表示させ編集とかは無理です。
起動させたフォームにボタンを付け、そこからデータ入力用フォームを更に表示させるようにすれば、目的は叶いそうです。