以下ライセンスうまくいかない・・・どうやるのこれ??https://www.timsoft.co.jp/stadium/%E3%82%A8%E3%82%AF%E3%82%BB%E3%83%AB%E3%81%A7%E3%83%A9%E3%82%A4%E3%82%BB%E3%83%B3%E3%82%B9%E3%82%92%E3%83%81%E3%82%A7%E3%83%83%E3%82%AF%E3%81%99%E3%82%8B%E3%83%97%E3%83%AD%E3%82%B0%E3%83%A9%E3%83%A0/以下は社内的なやつSub CheckLicense() Dim licenseKey As String ' ユーザーにライセンスキーを入力させる l...
続きを読む
Excel起動時、Noと選択した場合に注意喚起するコード赤色の部分修正で内容修正可能です(Yesの場合はNoでなくYesに置き換え)~~~~Private Sub Workbook_Open() Dim response As Integer ' Display a message box asking the user to confirm response = MsgBox("Have you completed the required checks?", vbYesNo, "Check Required") ' If the user selects "No", display another message box with a w...
続きを読む