PDA

View Full Version : Macro called from Menu no longer responding



mike.magill
12-14-2022, 09:22 AM
I have a workbook where the context menus have been updated to call certain macros. These macros run fine from the VBA editor and used to run fine from the context menu but I now get an error message as follows:
30385
http://www.vbaexpress.com/forum/image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAXEAAACwCAYAAAD5RF4BAAAfEUlEQVR4nO2df2wc 5ZnHv uGBAIuS4FT6ZU6WRxMnfSUs2F7deBCqHajxEUXp12j0mvZQycnDle8KXLbbdOSnHK3V1xgDWqdR DpYKjVSYwlHam3L3oLh2qTq1narU2IIMdv4egV6pcoWChRK2Ptj9sfs7PvOr5317tjfj2QlOzvz vs/7fd/3mWfemXnWE4lEsiCEEOJKVgDAww8/XGs7CCGEWGTv3r1oqLURhBBC7EMnTgghLoZOnBBCXAydOCGEuJiG06dP19oGQgghNjh9 jQjcUIIcTN04oQQ4mLoxAkhxMXQiRNC6ppz585h7dq18Hg88Hg82LJlCzKZTK3NEuLxeDAzMyP9 fmZmBh6Px9E6TTrxcezyeODZNS78dn5wEzyeTRicBzA/iE35/9eK8V1Kh28ahL4ZuXap/iRNtGsIdsm0yNvo8cDj2QVHqxVRcb/IxoBOG6tqD1kunDt3DnfddRfOnz PkZERPPPMM0gkErU2S8j09DQ selmoSOfmZnBJzbdjOnpaecqvPxaK5F4BzpOHRRMunEMRE4WPzb34UT2BPqanbDQDuPYtf0Iesa yyJ7oQ7Ohk lA/GwW2azyd3jbIpg4P4hN24GxXJ3Zs614odpevKRfbDpedKDj1HabJzpNnTUfJ8Qt3Hrrrdi/fz 8Xi927NiBjRs31m0k3t7ejp d GmZI8878J d Cna29sdrdPScsqGDcCxUc3MHz OIz096HHSqorpQOu6Wtugw9k5nOxoRcHE5j70LcbJwwG698Vx6qDRFQ4h1SEej NXv/oVduzYUWtTpGgdeTUdOGDRibf278OGyIDq0n8egwdPId6vFlQb5c1jcJN2uULZZ9euTcWlhPlBb BIua4iOl 0/jl2e7TiCk4is82DT4GDJZ9lyUClKfZvyDRjfpVmWMWOPwfLIth3oORnBXaJQWFqOXMdiMerPWo3 z341rNBnE4CbNMlJZm1Ws68O DRLby wX94vSD2bGiUVdyZImkUhg7969ePzxx7Fx48Zam6OL2pFX04EDlm9sbsOOniM4XphgoziGbnRKL 4nnMbhpHY51nxUsV5zEqdYnkM0exjaMY9e6CDaM5ZcX4ji1PTfBxwcQ2TCmOV62/zYczo6hJ7dEcqKvr RzVrhWknMsBSfRjL4TY7mT1Th2bQfGTvShWbc949i17hi688syY8BB3bWKbTicPYvuY s0JyxZOXo66qHWWF23WpM 9O3rwZHjRfc4fvwIevbl2yyw/vAYNkTuEi6tmemX8n5wSleylNm7dy8efvhhhMPhWptSV1h OmVbf/Fyenwggg06kx3zozh2sgf7hAufHejOe//5F3AKPdiRn9vNfdjXcxJzZwGsa0XHke3FyNhof8uo18Tzzm4bDo8B2z3bgTGVA5S1Z/4FnFKfDLYfwUlDY5rRdyLv6HKOXFaOro76beuWn2GLbNuBniPHc1HuOI6fiqNf9ySxDYfHNiAyo ImL7faLo7qSpUomk6n7CDyPeglFtEbuJNYfMWzuRDeOYXR8EAcNJ7sDNPfhRDaLJ3BXFZ4ecZKe 4o3KrCzqF9DchyfiHapI2GY5FbEN/fFTODg4j/nBgzjV3Sk/MRcO6Ufc9k1OK9RCD1KPTE1NYc2aNbU2wxDtGrjsZqdT2HhOvBl9 zYgsj0CGE325k50dxwxvgRuvh4boF6mGcTBI6qIDkBz3wmcjXfg1AvzpvavjNwySnYM2K5ah5W1 J2eP6Uv98cGSteDRYyfR0bpOXo5Ux3Vo7VBFuuPHccRsEzU0d3YDxwYwcAzmonc0oJOE5t316s0 26/OKUrWdI888wzOHfuXK3N0EV2E7OqjjwQCGSNGcv2oCMbP5v/fDYb7 jJjgm/1 47lu0Bssj99YyJ9slms2fj2Y7CfqrvxnoKxwKqOmX7C8oe68nt11O0WGQbgGxHfCwb70C2I1fA2 XhHFh3x7FnJMYUiS zJ1yVop6hetV3CcnTqVevT02PQD8XPIk3GekQayXUt6KPeLu0XbZ1mxomeHmS5ASAbDodrbYYuA LLT09PS76enp7MAHKsvEAhkPYFAIDs5OensmYG4kvFdHhzfsUjPyhNCKiYYDPK1e5JjfpHucRBC HIVOfNmTez573TF0P6HzpBEhpC5ZUWsDSK1RHnXsq7UZhBBbMBInhBAXQydOCCEuhk6cEEJcDJ0 4IYS4GDpxQghxMXTihBDiYujECSHExawAgD/ 8Y 1toMQQogNGIkTQoiLoRMnhBAXQydOCCEuhk6cEEJcDJ04IYS4GDpxQghxMXTihBDiYujECSHExT j6oxDvPP8LvDn2ON59YQbv/uYFpYJrr8eK69uxevs/YeUNNzlZHSGELHscicTfef4XyPzbF3B 306sbPTiqj0PwDf1NnxTb OqPQ9gZaMX5/ftROahPXjn V84USUhhBBUEIm/8/wv8M5//wTv/Oq/8JcXZtC49fP4q8dm8aenf4Dz3/t3vBLdAQBY9VE/Lr35dlz72Cxe/U4/zu/biYuub8fKjX PlX9zC6NzQgipANNO/LWhL O9t/6EC/97Fu/ z/PwrG7ExR/14/1bduL98Ulkjj6A337xVlx49aWS495 LoW3n0vhjZ/ EJfefDuuumcAf3r6B/jzc9M4f xhxYiP3IAV114Pz8WX4v29DzjbQkIIWcJ4AoFAdnh42HDHVzqvwBWf wouWtuKi9d/AgDw5s/H8dbMFN6aeQrvvfm6qQobVjfikvZP4pL2LVj98W24cP53 MtLafzl13M4//1v4YOj5ytqECGELBdCoZC15ZQr/vlf8ds9t APh6JlEbdZ3nvzdbzxk N44yfHAfThfVd9CCuu/jDrs/wfnvf8tWmYQQslyxvCb 9nMpRw248OpLtk8IhBCy3OFz4oQQ4mLoxAkhxMXQiRNCiItZ4k48iYjXC6/XC29wCGnVN mhoLLdG0FS9Tk4lJYVVlWK9gQxlE5jKOiFN5KU7a18b9i2IIbSpZ8jEQfamR5C0GGt9PRXvlPaY rP0Ej21dVWqT X22cFojFgvw9QcSEbg9XpRUbUVUmqnEzq4G0dfu69rUiOYSPei1wcASTwSLb1B6 udRKa3JpahYI8/htnJXviQRCQFoFW8b8QbQsIfw2ymFz6kMRRsQ1sQhWPLyir5DMTji9s6M1RX/xdxRqVnaV1avepTn3JK2 REGbWdA bR9l/lOribJR6J5/D74UcKIxO5CCM5igT88PtV 2gijGJ0ljvL575XRl29TRSWmkXIhshPunMRQMIQEAqSjavEEE858ToWJd ZKHBpCAH7FDisMBfOjtDwOpKB5J6pSViqLNG0HSqJ1ldpbWX8LI7vJjc1F62XaZJib0b9OccIX2 5a8Ogtr2qDTJ61moS6tXuT4yLXTtK3aWRIvyfcrtFtUvGDPqMeKYLiZtL22IiTEv1k89v0r7P3d 1oy1D1H JELzeIIJBdT05mzRXqsL6pVob95HpOaTdZtT3JrHkxN99ZQENqxstV2JoxOpGvPvKguPlFmjtQp cfSI1MIA0gOZoA/F3okp29kxG0RVPwx2aRyWSQiQcKXynb4ggkI/CGEoV9ZmN JEL55YvdiKb8iM1mkMlkMNnrUzpQuL8PvZPDCCuFYzYzicn85/CwUpfKtBdzYUezT7Xxuhb4AczNQ16WP4ZZTVnCdubsDA9nkMkMI4wEQpKBlUIXZjMZDIcBJAaUC efrxWRGaXdmOAwkQogkJZrIKLFrFjHtyVbHvlRrf0FfxSaVvmV6arUv10dYl559aiRa6Gmp2J3b z8yYybfJUV2s2Q7oj3l9/Urnlx6FuVc0UtOGSUz2hwEkMJoEkJ7ASArwd21FyWjTGfei SzXUL8sWV9o2yEs1wKmnfhFLTfizZ PY1UVcp2suuEmvPnzcVzUcqPjZSs0Y6vixTGRTkLx4VvRLNk7OZoAEEa/wNG05rxnen4OgB9dW3Px8Nau0mgfKUTbVOuuhvsvPqJ2KnYCiZAXXm8uypmbL4tkgOLkuK7FDyC FMy8WSlbuRYQSUA4XayKjVCuf0ncm7fO3XAcA8DW3amyyjqyupI595ci0KCWvpTIulP2sjJnq6G LO9iKiMV9u05DO/NKjtdnE/oFOhAEkRpNIT4wgpdKv0CrpuNfXWqShnTmkbUelY9a0E79442a8NTOFS9q3WKvBBJe0b8FbM1O4 eONmx8vOU iU3cpyhLZjHa2rdxKZ2Rj8AFLRNkdvuigOcw4l8 nFM0jB5CA3QIn0ixFVJpNBZrIXZktWLi1DmIvNKhFcDqc0qdQ J q6zuTxMi2qgdO6WLVd1L8ym2TBkzME0Jm7Mtw9kgLC/bB4rqiYxRyjgAUnvir4ebw5/WNcdtsdeN9VH3LMgIs 0oLLbrsDf34uhVXBzztWbhm rcqSSioF Lug58MDyijAgE7EmD9r5s/UZWd9Xy8mM7lLvbl5wGh/EYII2NfbjzBSiO7Or/OlMTSQAPwx3GvuqlS3nco2VQSSHsKQBX rDGAlMslHJCrjSzSRqVsakaQxMVJcc67IPp06Rcjq0rNPja4WGlK58Es9LgzHmKpNTutixfYCmv 69TmKTcH4VlgTTqvotoGpD4N4Y/EghlQLCneWTQlS/Ka0FVGMOAbD0FJBpJ77ig0245OZ/wPknDuLK3TGLFsm54gtfwx 2Vc0nE7VnywybFyy8ndAIRgjUxLII7ZmF JKGQ3GwJxZIbDhX3aoimEhyfR61Pf6AgVb0Lq7C8oHPfG/MWbbZrv4plhhFNRtHm98HrbEEXxyQpLiNqp3dYWxRkrRd4bgx8JhLxe7B4pbhdqomOXsgyrtG8E/pLvrNunp6feYZK69OwzoYWQRKgwLvyxQ8q40B0zmjY5rIsl2yEf8zL9ysadrxfK/Xll28Cc3hKVQRtyARsQhsCHS8e9 flpXFYlc8gqprMYAsqNzT/8y824 r7v4O3TP8cfR75bUeWXd 3BqvUfx6tDX8UHHhivshMnpA5JDyHYFgVis/o3e4kFlMdw55aBppazGK74YBMa73kQ//ftPfjI47/Eu6lMtGaJ1Lb9mBywKfxUv3bUPjPQ/SgRNCKiYZ8SKUgPK0yhJ34Hksv yzeks3Liw8j5e/cjuu dYPAcCyI7/0lh24cs8DePkrt OyO76E1Vu6rZpByNLA14tJN7xh4xIC8QwyrnhZyzlsvbHZGP4mMr dt XI1Q78fevacGlorx0TCCGEoII3Nr1f/x7e9 Hr8dKXP4Ur9zyAy7v2GB5zedceeD97X8GBe79U2Zo6IYQsdyp67d779e/h4tvuwG/ubsMl/iCuigwK3 hsWN2IqyKDWLX 43jpvm24 LY76MAJIcQBGtavX19RAZd1fwmN9zyI3/3rP LC71/CNd8ew6qPFh8PWvVRPz78nzP4y8IZ/P7Be9B4z4NcQiGEEAdYv369M1kMV2/pxopr1uK1w1G8MfM0rr73Ibz1y2cAAJf87a145cDnkM1mccXBJ7GyCq/tE0LIcsWxLIYrb7gJVz38Y1z0sZvx8je6ceHVl3Hh1Zfx8je6cdHHbsaVDyXpwAkhxGEczyfeGP 4mVv3dNrx 5GsAAO/XnqDzJoSQKlGVH4VYecNNuPKh5ftLG4QQslgsjx FIISQJQqdOCGEuBg6cUIIcTF04oQQ4mIa0una/TwYIYQQ 6TTaTSs8a6stR2EEEJscPXVV3M5hRBC3AydOCGEuBg6cUIIcTF04oQQ4mLoxAkhxMXQiRNCiIuh EyeEEBdDJ04IIS6GTpwQQlyMeSeeHkLQG8SQ6bf0k4hY2t8u2nqSiHgjWNxs5mba6rweyYgXXq8 XwbJC1XWZ1cOufdXo58UaO2ZtsDum9Nphp41mx1nRVvkYWUzqoT/z1JMtzmD6RyHSEyNoDbdiZCKN3l5fNW2qkADimUCtjVgEkhhN BGbnYR dywXPaqJWzU0O0aImzEZiacxMdKKzngnWkcmUDyJiaLgIIbSSUS8ISSQQrRNHQUkEfEqkYFXcFw kEixEDfkIwhtJFmwYCuaPzZcpqkdkk7YsI/tV/x KFOosPVxd7miJVubsNLJNUE JbcXypIeaaJM4QlPqzJebHgrm9teJRidEZYq0sFemXPukwXazbdYeP6rZXhwn5bbL26nfDqttGp UdLClPNkYUe4sSReANDuXmtf4clX820RbhGNGrU/878Rgymu9W/JI7MOfE0xMYae1EAAF0tkbxiOF1ZQDxzDDC8CM2m8FkLgxIRkKYi80ik8kgM9yK6O4h1QkhhbmW Q8jMxoBoG0Y7M8jMxuBPjOY6yIfeyYxybGYYrdFHkJTUoyYZCSERHlaOi1uNplKInunM2RtGIqS TFW1pRNIFI4xb2cyEgKGM8hkZhGbGxAOHrFmpeVZa1Zpm1LRRzRONI2h4ABaCuUm8Ui0FcOZDDK ZOMRVycoUaWGvTK32It3kehq1uXi8uE9L9hLYLmunfju0dcvaZGyTCL0x4sPWLj8So7lT0Pwc/F1b4dPWVzZHzSGec/I 0KtT/p14DOnPKTt qf4x5cSTj0TR2qnIFOgMFzrfGsqlXdfWnKMNdCKcGsFEQa3cd75mtMKPluuQ /8c5os9mjtbhpBQbzeoM3av3Uth1bGBToQLdQraUlKtGTuTGE0AiZAXXm8boqkUzrwotl umZNtUhjZ3YYz/erL7 vQ4k8gpBvu65Qp1KKSMmW66emp3 acofp9WkBiu7TPzdYta5MZm6zj29oF/9w80khjYgS5OpwYb7I5Z2EuFerU 07UD2bmlNheZ fY4mLCiauF8cIbSgCF6HgRSUbgHWjBbC7acWowO44lO5WIQIngrEbU1SAFwI 5Ei jRJmzLQP6Sx8ipFpUUCYAuW6LoafAdkfG5iKPBd9WdGEEE8kJjKALW123Zi4bQ/U2p6pPQ8MHPqy/R3K0eGmU xsOJ6AE49ehxa862yVHdS73AugMpzCSP8UlR5HwWxw8rc3wGdajRrFvRHpaNbK/eGx6aEBlr6Zc7XGm7DSyDXBEM0v40XVoEv1n2srWdX29hxDzm7n60aCjhX6ZJrUvYEZPPQz61Mh 2aTtl7TBju55NlT6F5cPWLuDM6Bkgt5SiP97MznWr/aBXp/H4L 0HO2NgseeYszQ2NhpH4snRBMKdpaez4pKKD7394WKUPgpVFKKIo76BEIgPozXalovo5xA71AvTW gU6EU6ETNVTxIfeSVWdZZfvevYDgB tZ3bD6/WiLQqVvT70HlLW7suOM22npgzJhKxIM5sE4rPoGmnL6ZW/6dOGaGu/taccpFqYKdOk9gXdzOkpR6dPSxDYLm2nXjt06pa1SWqTPXzNrUgk5opLCdAbb0ZzRdUW3TlXjt4 Yl38nGkNmxoDDfqkO8EQikez /ftrbUcdkkTEO4AWPp5FlijpoSDaRrowO kup0WK7N /n29sErL8UB4xlF8ZEDdh mWf5YdbX/AgxAjlpmBvrc0gjsBInBBCXAydOCGEuJhFduJOJwRysv5q1sOkXPYSSi29ZEWLw3LQrR7bWBubu Ca KCyX9XUm5SJksTEZiVtNLFTNhEB5ZHUwKReTcpW227lET6oxERTl15DNE7vjS6 /KxjnmvLF7bE7/vU019gq7XM7CakM tNEXcGhIRPz1GgMwEbitsowlzvFcmKh6iUEKqJXhwgm5VpeSbmUdjuf6Ck3JgTPVov6tbLxVa6N bL4Usdqv8vbYG/9yzbVl20mIJcNIZzN1HcJIyVuodjWzmritUizmTrGQWKgqCYG0u1lNiCWqh0m5Sm1bKkm5FJxP9 OQvecOxiKhfHRhfpuaLEfpzWNwek/YJxpVY8/KyrSfE0mufvs5m6vL19pe8VWxXM2uJ2yrH5HKKxaQyi5EQqB4SYtWDDWZYzkm5XJ/oySmq0K ycbVkNHdas rMLRNO3GZioaokBDJTB5NyCY9btkm5qpXoSYtIOye00u9vc3ZWmhxMB G4EmluFjua2dVZb87Y1cxq4rbKMeHEbSQWqlpCIDN1MCnXskzKJbyBplCdRE9ltQj7tXKtdPrb9 DivNDmYBJ15LtLcdLE2NLOns16CMbuaWU3cVjlMgOUqmJRLRjLixWin BLVvYme3NvfbtTcjTYzARZZIiQxmgijs8yBM9HT4uMuzYuPqrrHZi2MxAkhxKUwEieEEJdDJ04I IS7G5U5c/aqt86 zmqu/Fgm1KrFB77Vy0b6LnbgrX2 lulajb ox6ZIeTttrZRy6TavKkSd/qy4ud JA6QP0s4jNhRbZkS9lAojrvtZOCFHIJ38Tp9qoJqacuDjZkCyZi3a71YRClSSJUZ7VDScGxElsj KIISwl5ZImGtOXWU IwHZsnRPaU9p1x0inrCaDKdbCewMl8GZq6TSYZk0dWYq1FOsm1czpJl3qbOBFbcb7pl1Nqs56mV seVXLsSZYz8TkWJywzGatWSvzmPqdwpomRDsmQu1pM7lSaTqTxJTOmbbOaT6VhNyGMu0VV9JQ6T 2WyUgAowk3TKTgKo8nqtJ3AyW4Z5zOghs0mkk5521UjSBej1tTx5U0nrNDbraWp9XBnPc7nfcSJ xmWysLn7yt8ox dq9NtmQLJmLneRO6mQyTieJsZJMx8mEPEZtqXHiMNNtV2OUdMpeAihzyZ1sammbSrQW6aSvnfNJ uvTbZu4tSvNJxvTqsp8MSuZ3nEhcJhurtUj VjnmXrsXJhuqVqKkCstNT2AkJXrxoxbUYeIw21hIOlUV6i0xFyC2SaSTgXZ1mTCq2v1t1J 1GG/1OMaMMX1jszTZkCyZi2i7E4l6LPycV1sUiN2bu/xyIgGRQ8l1zLIYicMqQJ50qloJoGRlV4LdJFfmbRLpJNdusZJ0idugV465JGP26jXTn6X1O6WJ3 E/VV/I3c5haEy9LNiRN5iJKAmQloZCdJDHKzYT8EgSGS9frnEjWJC/DINFVPSYO07VZD9E40NTtWAIoJxI4GfSNrSRXmjKENol0MtKuWkm6jPparxyRzXrlWRlXZvpTrJ kzicskfqpOk78ZwdfuCakD3Jh8idQevnZPSM1xV8IoUn/w1 4JqSnKDbzeWptBXAsjcUIIcTF04oQQ4mJMPp1SnYRJpQlj1Mcuv Q5hBBiB4fXxAOIZ8w IZ9PGDNZeGzR/LGEEEIAw0i8WgmTRAljjCL8WqSaJYSQ sbAiVcrYZK1hDGVJ8UihJClScPp06dtHOZEwiSzOJ0UixBClganT5 u5tMpTiawcWdiGkIIqTZVf8Sw8gQ6lSbFIoSQpYsJJ16thElmsZP8iBBClgeeQCCQHR4errUdhB BCLBIKhfjGJiGEuBk6cUIIcTF04oQQ4mLoxAkhxMXQiRNCiIuhEyeEEBdDJ04IIS6GTpwQQlwMn TghhLgYOnFCCHExdOKEEOJi6MQJIcTF0IkTQoiLcfiHkglZ2jz11FO1NqHu eQnP2l6X 9/vFxFS5YGma9eo/s9nTghFrnxxhtrbULdMj09XWsTlh104oSQmrPQu7rWJtQdTUNvmtqPa KEEOJi6MQJIcTF0IkTQoiLoRMnhBAXQydOSM2YQrSpCU2qv hUJWXtxGPnrH63FCjXsalEyClEm6KwLq07NOXTKYTUlHbc/ yTuHtNre1wO2odz GxnZvRFE1gIbYFwBbEFrbU2L7qwUickLojF U9Fi1EljsLId85PLazSbA9x9NRE1G9KnK1H/rXMWtw95MJ3Hn00VykXBo1n3tsZ06jfHTubk3pxAmpKTM4sLlJ41Ry288GsbCwgIXEnZg5cDj33 Rrc/eSCsn0hgZbC9vJjjobFSwhT0TCQWMDCwrO4/8yjdbEk4Dxrsa59Bmd/rd0 hcMHWpBYWMDCQgxKfO5uTenECakp7bj/2bwDyTuV3PZduU9bgrgTZ/DrvGOYykeGYRxVb9c7psAUJo8CR8NNaGrajAMzIke3lFmLde1HEdZGyy7WlE6cEDcxFUXTo vwbC5qvNNWIeoTxwJiS3G5 NzT NHMnQiWtU2Jup9d92jxysflmtKJE I2WtZiDQBMTeJoyRcz NHTSph47rFHcbT9U7it7IapssyQ329pMoXo5gPA/bsg86Vr7n4I97eromoXa0onTkhNUa JC26qadkSxJ1Hw8r k9BEje1oOfslNDU1YfMB4P6H7kb5Qy9rcPdD9wMHNgvW4d2MWkdlffpJ4SM/ RuQm3Gg5YvK0ywu19QTCASyw8PDi1glIe7lqaeeYhZDHaanp22lomUCrHLyCbD0UtGGQiE J05IrWhqahJuX1hYWGRL3I1MxzxLXU86cUJqxFJ3LovFcteRa KEEOJiGIkTQmqO2R9AIOXQiRNiEf4EGakn6MQJsYCVJy IMUY/AkyM4Zo4IYS4GDpxQghxMXTihBDiYujECSHExdCJE0KIi6ETJ4QQF0MnTgghLsYTCASytTbCCda vX4/Tp0/X2oyqs1zaWSuorzNQR2cwo OK9evX48KFC3jvvfeQzWYL/wJANpst ctvq0c /elP47XXXqu1GVVnubSzVlBfZ6COzvCZz3wGr7/ OgDA4/GU/DU0NKChoQH/D49ur56XwxJKAAAAAElFTkSuQmCC


If I select Disable, I get this message:
30386
http://www.vbaexpress.com/forum/image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAPgAAACYCAYAAADJJSRRAAAOz0lEQVR4nO3dYWwT 1wEH8P FOCshStAiFaa2Mq1saFmqDTlC4zKEoGhSEjZQjFyt0taMD3YnVYqHRNUUOsRGoSrS5qhIa/KBpZuERIRQaMGWKgpCLKGqYqGKjAK2Nqy2GkyiI1lIJ1zy9sGGzf2XdOHMeP/0 ylNydn9 93P/eu3eOrXi9XgEiklItAJw8ebLS9SCiebZz507UVLoSRFQ DDiRxBhwIokx4EQSY8CJJMaAE0mMASeSGANOJDEGnGiRUBQF0WjUdH00GoWiKLbKtBjwCAKKAiU QMVwb72uDorShLw4g3oc27edKiQSgKAqUtj4UqkYkoKAtt6KRQGo/y7IfEQQMy0y3r 5h0tSFlVJni21lvTjz46SE0jLtNZ9/j8VwjBoYGxvDhrYfG4Y8Go1iQ9uPMTY2Zq9Qr9crigsLP1ShqqoIxYzWQQBG6yohVR9/WP 7Sd3CfoHMhulF ueWo25mbahbHgsJFX5Rtmpkve487m8sJFTVL/yGx0kpCvztKlJO Y2NjQnHdx4TY2NjBZdZ4fV6ha0heksLMHQ2t8cbxoDfD7 980qZqVjrtrCZey3UgWFk psIhgf82NFevppZ4lqNFozj5oL0MBbbyoL42SHAtwd7fAbHCVni8XhweeRvsz251nNfHvkbPB6P/QLt9OChWFj4s3qWmAip2nLtDJl7toyJkAoBpB6p3iK1jd vCmjlxUJCRe52Zs83214bTaQeaiiU9Xtub62VPbs4q0fX74f5PmT2M/v3sN/odS324DkjC OyrNTJpO1mX1PfVrEC7WryN8try/Rrx0JCVUMis5vpeoUzZauZnS2 zvJxZdRWYYNjwGjEZL7PoZA/v50Ktu3cab12KT23xnYPDrRjh38Aw1qXFz LIfjQ6TLbPo6 NjeGfDEIISCEQP9s7ziK8bXvQ4h tCOCgDuIlnBqGxELYbwjfY0UOYJgSzjn Wbbt6NfhOGHilBMYKSnJ t30Z/bNbvQ6VMxnu4qI8MD8Bt134Z1KNJS/em6iTD8AwctXO NIuhOX4N3AGHdixiWVbROhdoeAHLbylWgXTN1zPzNcl9Odyy4OuHDELI78VEEDwLvp8tF8OWscs 3XGTHft/y2ai9yDBTf5 C1Hal1YT9Gg0dSI74SjolKsD2L3r4nhPGDqQmZyJEgWvb1wDzfZzE06se HqMtVPi0M0P8JsahGxq7erDPP4prMaSH0R3Zk2GFtrfJ1ekDhs4ijjhujpsMV43qUIw2eaV0YMD SE9IHoBAQsbU4qJ8EMiqrWJ0Ktr2Jou2q 5vlvdwQ4OtMHwsudPqA4BH9ZJuK0PvpY8WgXPN1NvfNbrtb2OfQHu3ssQN 7dKplGPCIv2wXD9cL4X922Ta2TnSh4PjIewp95nL1YMRIfA Xi59drlg dr FBiN2K1DvA9tHUBYCAgRQ0gtoU5q iAzK6vc7WJLBEeCoxgNumfvAriDo0DW/IZeHDfHzcoqtK6Iuba7HWVq/9xr7txrcrtKuA/uQsFgQ7grozttmmnfCpAzhY7CznWo0W6If fTiYM9nl6hlBLJQeTlvY3s7 dPpgaX y6gA31qq6M31kONNjxK5hVF0LN5DubWxWKX4WQ6Pp0USRsrLrpF9hse2znlNiu0aGMaCGEBNids iaCpiuLIxmJt7SPfCOdivrjOppsm ltPscjyXT9i B2YTaXEJe2htd2vcgpFoZ/rnQMxJGi 7Mbnyma0d/LITxjvQ1qHsIvlj6Om92yKXAHWxJv2aB7Q3K3uFPX9 anGZdnT6oBYafxnVwoWefHwNaHYaRuZPQvgchBOFWFCgvX0OLpZ5Edw3uHoIvNoLUrpqUZVinrL 2y2PZ6dtpV1zzDA1DzTo6p Y2B2eSoaLn2crrcIFrC nILrTNism m7V7oGChtn4u3v32tra2ms VayFtbW22VqXi9XsGPbKLyiiCgHMRa7aRleR3NBT yiUhyDDiRxGorXQF6FLSjX5hd1RZaR3PFHpxIYgw4kcQYcCKJMeBEEmPAiSTGgBNJjAEnkhgDTi QxBpxIYgw4kcQYcCKJMeBEEmPAiSTGgBNJjAEnkhgDTiQxBpxIYgw4kcQYcCKJMeBEEmPAiSTGg BNJjAEnkhgDTiQxBpxIYgw4kcQYcCKJMeBEEmPAiSTGgBNJjAEnkljFvx/8weQEvjwXxp1PR3D/qy/w709HstY/vr4Ny554CivWt HJrR2oa2yqUE2Jqk/FAv5gcgLRQ3vx5bkwln7zX6ysU/CMQ8EPm2vhUFLbJAUweeMTfD1 Gdc PIHoob14cmsHPG 8xaATWVCRIfr1wfdwess6JCND2OiYxsblS Cur0GzQ5kNNwA4FKDZocBdX4ONy5dgo2MaycgQTm9Zh uD71Wi6kRVZUF7cK3Xvv3BCXgaatDcYO/8srQG EFDDe4m7 Ozd97Ef66PszcnKmDBevAHkxM494vtuPvhCWxcvgTN q7apmaHgo3Ll Duhydw7hfb8WByYh5rSiSPBQt49NBezMT/jh81LcEcsj3LoQA/alqCmfjfET20d 4FEkloQQJ ffA93P7gxLyFW6OF/PYHJ3hNTmSg7AF/MDmBq0ffwQ8aarLCrTQ0YdnRU1jibrFc1hJ3C5YdPQWlIXPN7VBS1 VXj77DoTpRjrIHPHpoL1Ykp/Kuuevf/jNq16mWQ66Fu3adivq3/5y1rtmhYEVyikN1ohxlDbj2JpbV9fkv8730JMTUJpaCwa8kzP3QgxNYn/9f02b5vV9TX48lyYvTiRTlkDrr2JZanBqzyMjeP q11FQ54b7vuvduFhbDxvu6U1wNJv/osvz4XLsStEVamsAb/z6QhW1pnPqhULudVwa1bWKbiT81ZXokdZWQN /6sv8N0i0 ZmIbcbbgD4rkPB/aKKmukYACJRDRL4CiKKmHleVEi1BZA/7vT0fQWFv8vphRyO2GGwAaa5W8f1axJB7C7wf0CyIIdFzFH2MCQsTwx6sdSGXZbDnR4lT2WXSr9 71zQ2433HZeK1scoV9 jjfD/syiyDAG/G8i6AIAF7b5NuDqjbj5cqJF6pH/f/BIwI3P3 xHu25Z/MZVbHjOPfu7a83zuPx5zHQ50WJV9oAnhbXtcq 5rd5CK W1NPGQit8/F0N/e/FtiapRWQPPo2TH5bPHVGE2pWbqHlmvxW4PH1bZbrd Q3l3H5N 7UhFnHADDQASUQyeuZtZ7bbDnRYlXWgC974il8XaRbNZstt3qfXO/rpMCyJ56yXL9 ISC0R9gP MMQ/e2A zlsGBhGav4sjjNDgG by3w50SJV1oCvWN G2w/MA17sVpjdkN9 ILDCRg9uyhXEaBjoUBQoihtDvr kJtbMlhMtUorX6xUnT54sS EPJidwess6bHRM572bzc59bivbfjMDXErWY/v5K/wACCIAO3fuLG8PXtfYhCe3duDm9Ezeusd6fmf5VlhuT/5Yz /ytrk5PcMPZSTKUfZZdM8bb GOowF3c67Fp1//Fb69Mmr5PrcW8m vjGL69V9lrbubFLjjaIDnjbfmte5E1a7sAa9rbMLzr76Gz6Zmsm5jiakJW29iAfQ9eeY/xpIC GxqBs / hp7b6IcC/JGl2e7X8HKn72ITyYe2r5XXUhSAJ9MPMTKn72IZ7tfmb CiSSxYO9k87zxFmpc35 3kGvhrnF9n0NzIhMLFvC6xiZs/etpNP/0RVy69zDvmtyOu0mBS/ceovmnL2LrX09zaE5kYkE/F72usQkb3j6K68 2IHr0HayYmsLq hrDD4Qw8s1Marb8jqMBz7/2GoflREVU5J9Nnu1 BdvPX4Gj3YdLyXpcuvcQsekZ3E2KrOF7UqR669j0DC7de4hLyXo42n3Yfv4Kw01kQcW m0zrzfVfPviPAl8 uJZfPkhkW8W/XbSusQnPdP0cz3T9vNJVIZLOI///4EQyY8CJJMaAE0mMASeSGANOJDEGnEhiDDiRxBhwIokx4EQSY8CJJMaAE0mMASeSGANOJDEGnEh iDDiRxBhwIokx4EQSY8CJJMaAE0mMASeSGANOJDEGnEhiDDiRxGoBYGJioth2RFSF2IMTSYwBJ5 IYA04kMQacSGIMOJHEGHAiiTHgRBJjwIkkxoATSYwBJ5JYbaUrUG2Wv/2vSldh0bv3 veKbvPxxx8vQE2q2wsvvDDnMhhwqpjW1tZKV2HRGhsbm5dyGPASJX5dX kqLDrOP01XugqUg9fgRBJjwIkkxoATSYwBJ5IYA15NLvTC6XTOPrqO3dKvRK zC9qiC71OOHsvVKSai0N2e5gvs/K86sWAV4lbx7rg7AYGEwkkEgkkEhex7cwm4xBf6EU3BpE4vHnhK0qLCgNeFW7h/Blg/8XDyER2FXb9YT88xz9CdsQvoLcbGGS4LbiAXm1EZDjaSffmxzIjp2obFDHg1eDWeZyJrsHTq3KW r9qCbZ7j Eh30J3Z/S7cWSeCR1kUBzY5dZc13TiuW3uhtxsYTI2G9t9412RYHsWB2E9So6bBl3C8uxfVlHEGvOp54H5a zmKaDSKM cluYCcMw/2X9QuaRJIJAbx0uy6C/joOHC82wmncxMORKOI/dOkjED6dLn5J3gJN/DPKmpeBrwarHoaa4wOrLye3YP9Fwex5sBuaSaJyiv7BCDjVQ0DXhU2I7AfOLBJPzy8hWO7DwD7A znD8c04PLgGB3YfAzNeyNNwe6yMdjLb3Dr2Lo57tmFL7qXSIsb3oleJVbtO4SK6sMnpnF3m2X8R p3YZHG2bD2PwIyc2dQEXT 1CFR2PCyg1SXlm0yY4DwDASxhMGM1deLAmthtOZxSpHr 62pMBryKrdp1CYpfZ2s04nMgcnpsPJ5BYkFotVtntYbhs1S6cymvQ/Oe5A6eQOFyWSpYdh hEEmMPTmTKaBRQXdiDE0mMPXiJ OEGVA0YcKqY fpYIjLHgNtk5QMFqbj5 EBBKo7X4EQSY8CJJMaAE0mMASeSGANOJDEGnEhiDDiRxBhwIokx4EQSU7xer6h0JYioPP4PGMnz eSq6ILoAAAAASUVORK5CYII=

If I select Enable, I get this message:
30384
http://www.vbaexpress.com/forum/image/png;base64,iVBORw0KGgoAAAANSUhEUgAAA78AAABxCAYAAAAd6hTDAAAXuUlEQVR4nO3df2jb 953H8ZdyIfEyOqtdl9y6m9MpkcpV6R11oj aBErXijr2CnU4ZzAYZzKIOXMkIpDQmEIaKE5Ix9XJgUfyR9Bg5I94qwerYq8aLeWcbJwS390SHZ ud6mqz5ijZmNxcRxe6 P7Qr6/k7/err2RJX fr5wNCK n7/fz6fqzv5/39fL5f WKx2OKbb74pAAAAAAC8ao3bBQAAAAAAoNkIfgEAAAAAnkfwCwAAAADwPIJfAAAAAIDnEfwCAAAA ADyP4BcAAAAA4HkEvwAAAAAAzyP4BQAAAACsSD6fT9evX7f8/Pr16/L5fI7Schj8TmjA55NvYML001tndsnn26UztyTdOqNdhf93y8SAfD6ffLvOyL4Y XoZ/llUsd6CaMDttgAAAACAB9S1a9f0zK7dpgHw9evX9cyu3bp27ZqjtGqY d2pnTdfNwnkJvRG7Grp5dZDurJ4RYe2Ok 5sSY00H1eBy4vavHKIW2tGoDu1MjsohYXc//O7WllWQEAAAAAVrZv365fXplaEgAXAt9fXpnS9u3bHaW1JpPJOM542zbpUqIiipz4qc4fOKADjl NphZ16Muh2GQAAAAAAy1UZANcT ErSmkAg4HjjJ4 8qm2xN1RaGXxLZ16/qZEjLxu2qpxpvaUzuyqXFee2GRjYJZ9vIJferTPaZbr82Gx/q 0nNODr1nldVSzo064zZ8peWy3bLpfLb1ehAhMDFcunnZRnQA1dPQ0AAAAAq5gxAK4n8JVqfuDVH r184Lx Wgz4ErqkfeqxXOJ8S2d2BXVp36zJsuKruvnkD7W4eE57NKGBYEzbLueXH8 O6GZ3PoCeeEOxbZcr9rfafo/OLV7WgfxS5iuHDpW9XjRd05wPjItB61YdunI5H RPaKBbunzlkLba1mdCA8FL2ldYPn1Zep0bfQEAAABgxaj5ac97jozo5uu5mdCJN2La9mohMDRxK 6FLVw/oVdMbgHdqXyFqvjWjmzqglwux6dZDevXAVf33rKTgk9p5vrs0E1tt 5oZ7/k9p1ySe3TustTt65YuF96zqc tGd00BtHd53W1vsIAAAAAACoYlzqb3QPsRO0/dbS1R/t0SYmJM3r95oiONPsBUVsP6crion6of2zC05gb6YAuL5YenGU ywwAAAAAqEXlPb5WD8Gqpo7f d2qQ69uU6w7Ju3rsZ71lXKB8s7z1ZcAbw1pm4zLqc/o9fOGmV1JWw9d0ezITt2cueVoXJL3devCx1G 7ftapPvjwsdQYAAACAxrF6uFU9AXAdwa kPUc0stNqObNR4f7ZYJXf0d2jc7MjutmdXzYcvKR9s/nlxoXf7PX5FIxty dps71J2i8fsHvglfGeX592nZnQmV3dujlyRHu0R0dGbqq7 MArq/rkyiPD 84ergUAAAAAsLJjxw7Lh1sVAuAdO3Y4SssXi8UW33zzzUaXEQAAAACAFaO mV8AAAAAAB4gBL8AAAAAAM8j AUAAAAAeB7BLwAAAADA8wh AQAAAACeR/ALAAAAAPA8gl8AAAAAgOcR/AIAAAAAPI/gFwAAAADgeQS/AAAAAADPWytJCwsLbpcDAAAAAICmYeYXAAAAAOB5BL8AAAAAAM8j AUAAAAAeB7BLwAAAADA8wh AQAAAACeR/ALAAAAAPA8gl8AAAAAgOcR/AIAAAAAPI/gFwAAAADgeQS/AAAAAADPI/gFAAAAAHgewS8AAAAAwPNWRPC77s5Frbtz0e1iAAAAAAA8aq3bBZCk9b87JUm695XvuFwSAAAAA IAXuT7zu 7ORa35y7zW/GWe2V8AAAAAQFO4Hvyu/90pLT4sLT5cmgEGAAAAAKCRXA1 C7O 9x R7j8iZn8BAAAAAE3havBbmPXVmtw/Zn8BAAAAAM3gWvBrnPUtYPYXAAAAANAMrgW/ZbO htIw wsAAAAAaDRXgl zWd8CZn8BAAAAAI3mSvBrOutbwOwvAAAAAKDBWh782s36FjD7CwAAAABopLWtztB21rfAMPt77y vfaVXRAAB58/Pzmp fd7sYNZejo6NDHR0ddee3fv16RSKRuvd/kKVSKf35z3 u TMndu/ebfr xo0bFQqF6k4XAIBatDT4Lcz6/qVi1nft5tx/P58rvXf/Eemv/pib/SUABoDWuHjxok6cOKGPP/7Y7aKsGKFQSBs3biy bm9v11NPPVW2zVNPPaX29nbbbdyQSqW0sLCga9euSZJmZ2eLx3ZhYUE3btxws3i2tmzZog0bNhR f379/X3fv3lVbW1vZ8TBqb2/Xhg0b9Jvf/MY27XXr1ukLX/jCssq3adMmBYNB22127NihtrY2y89XSj8BgNWipcGvo1nfAjdmf5Mx fvi RcRDU8nNRhoTdYrU1Ix/2mFTNvB7jODzKiiZ4NKjkSr7pOM dUXlyLD00oOfqCYP6Ge7IiiDSuzKo5xIa9Aad/orA4mB1Xa1Sw9h3WvmVX fYr3jyk7Ut4SmdGoOoeU76dJQ3vVUj6bPI2bmeS/slVrA7N6l/qgVNE3jP3G0BZW21umYyYzqmjnjI4a 7pFfo73t3vfxoULF3T48GGHW68eMzMzmpmZKXsvkUjUlEbljHQkEtH69euLr40zo05mnz/GPNzs6WvZdKpfTJJ58olXpH/zmV1v/VVMKV54MPPrD8rPJ4eM26hx/TXz9UGqLlLq58qn /eENfeulFvfC3f6OHH35Y0m/1s2NxXTXu3PWa3v7nHUvSdDTLbnuObIVmnV8LaTsdV9R7Tm00p WotYwrpX5u8VKdm10XJ k3aptq xnHp/XHaS0Lfq1mfe20dPY3M6poX1rD01kP/CE8iJJKxI0dOaCRbIODrWRM/j5pLJu1OPFFdbD3tM4mB VOnGeTfzyh5EjUUO6MJsdTkiLFfetrL6s8jccio9Fop/yxBy0AtmNS78yoZnuyyo5IuS/bAY125b9si98NubaIJbMa2WKxvazSqSxDLq0hRRRR2PC RX5Lmt5qf6v3qztx4kRN28O5yuXbU1NTjvYzzgx2dHRoYWFBU1NTWlhYaEo5kfO1r31NjzxSPmB p5Sz5vT/e1vwfS6/Llv7/7KKmf2az8 Rr tak Ufr1q3T888/r/7 fr344ovlH1Y9R64m9Z5TG61Z5Vgp9QNqkJxVaDqrbCA3ATQwmdFgHUFbyx54VdOsb0HLn/wcVtBqlsjvl9/vl98f1WjG H5UsVhU/uioMmWvY4pF/YolC5vG8tuYS8b8ihYTzqVTehmTv5RQqSzF92zKa7afSR2sX1ulm6h4P6rR0Vg fUNdAoOGWd8 xZXSUKexrlryWa7IxnLYpG9bLqOMRk nNTxtcsXX0L6Brl6lE1btapHyaDRfrphKe1odA2N/Wbqvef4R9fenddpY5 RZjfcOq78sP7PjlitHqassLVf1Ogc0mBxTf/x0RT8x609medj1MUOb5I9rMmbWv63bc2m/MO9rVds6MKjBYufYolDhukIyoXj/0eJFma7eiNKzGevtrd43bdesssmj5SGqVX5O97d83978/DwB1QpUCHanpqZ08eJFJRIJjlMLfPTRR7px40bZPy 4deJiYm9O1vf1unThnHVjbnSElVxxCG7 HcV3RGo1XGQMZxT2Y0ajqmWXp dXrOqM783F1Rr4zd2MWu/tXazTx/q/qWZTtplZdFvqYbOaufs7Fp7libjc ctHFN5/9i/nb9y6ruTsaKFuWzTdtujGrVNssZ 9RSF6fxi81 S9KvJw6x6mc11i86WJyUmRyXervqm61sSfDr5AnPVlr25OfAoM4Np9Vn8mWSjPUpPTytbDar7Fh YQwPGjpJSOnRO2eLyycLrER3sjSieH1xnZtOK9HbJ6jBtCUWUmskv8UomlI5I45P5P7VEXJHQlm JZNJZVNjut4fRp0yA1Gcsvk81mDcsz7ergTFkaPSpfFquUhmZ68un3KzV0tuKLLqqR7Jj6FdHwd LZiGVX5Z aTi9bp25crLzOpcfWq6t9JYFBHZd6u5pI6OxTWWDarrGEplfVxMvYXk30t8g8dPKrw GTxmCUTafV22d9rlvvSPa2QoU1Ny WozlsUiqRU7KI2/cms/9nLt8n0sDTUqURPVtnpYUXiibJjbNWeS/uFWV9z3ta5DM9qKN9fMrPp4t fJAWC4dLfqsn2jt634Si/Jti4caPtvYkAvOWZZ54pvahyjqw2DjJ D8f7YkrmL9zZjYGiI2MKD51VsvD9vOR8YX5 dXLOqM4q7Up2Yxe7 ldrN7P8nZTJOq y2jkYKzqpn7Oxaf6CazarbLZwTJ3Xx8n5f2kblvevZCJe7F9WdXc0VrQqX36MX9tYRDZt47zuy6 lLbfGLxX4V6TuNQ8q3Me9n9dUvo9HogHSu/mXeLQl 65r1LWjh7G9gMKlsdkzq85dd5UnEI6WrC9Ee9afGNVk82JGKKw l14GuXkXSs8o4uEIR6OotdvhkIq3eo73S KQyymg2XUgzqURcivf55fd3aihVCkZK8suHD0aXvGddBydM0ij73JBntEf9Sst0sqpuVulXK5cD 0ZGyIC3aEy5 uVe3RaFIXH0VV6ysj5Oxv5jta5V/VD3hIZ1NSsqM6rSOVv2jHx/o1MzR8nuVrcpVW53t pNZ/6smn1YgqLAiyp1LgwqXHWPr9nTW72po62RM/tMhTZucEExZbV9rOi5ra2vT3r173S4GgBb56KOPHG5ZfRxk9j1cfQwU1cHhtPr8fUoPHzQJjsy/t6ufM5ywSrseNYxPiu1mlr TMjk55zkZKzrjbGyq3PnO75ff36d4sUzO6lP9/G/ehsb VX2cXO9Y0Thmq3MsYto2Tuu nLrUGr/Y7Ff2mZM4xEn/q7N ybMa7z23rFtUmx78LmfWt6C1v/sb1Uh2WsPKBxrLEehSr8Y1mXQw6xjoUm8krdlMUol0r7qiXerVjD5YcjU2d9UkdxXJapYUSwSCC jsN KMH1Tsz6XBmPHdVbzp0umJZj5PjZLGvRf7Rg8NKJ5LKTI4r3FPtwOfuB166XNaiXNXqnJnUeKpf VbNtmuX2e2dtnRmNyp/oKbsSWjnzapyZNdve8v3MqKJVlwrZ5Odwf0cs0jp58qReeOGF5aUN4IFw584dffbZZ7kXtZwjnX IwBgoEczdnhE3vObM6vzakcE1Mu978G1mmBo0VnYxNCxd687ObpUClyW1s2b aOU6uMW3LtmlSfi3hpExOy11H/aIjy34IX9OD32XN ha0/N5fo6h6 lOl2aFkQvGI02WMAXX1SjOJGclmybNx2/GB00r3dimggLp600qcNe6bW3pqP0Nnto1dHcqXsyqZsFg UZGu5Xat5rRcUR0cVsWSj6RGRzOG 1YKAuoKjecvfuTabshwJSQzenpJHwgMntNwxHi1s9pxstq3Mn/jhl3qTZ/WwEyvqk sRtR7LqmjM52GeyvsymWRpyQpqVjnkFS8Ml 9P5Xn4bSPWamtPe3YtnVmVAMzR5cu1d4SMixDMsxgWG1v9X5gUMn8F7ztcnCr/Jzu74RFWu3t7frx6W/qsb//B0m5JxC/8sor6unpWV5 AFac48eP66233sq/sjlHVh0HlT4rPz ajYGSihnvZ 2TxrJjksXyXcnse7saYx72ak/bjFX9q48fzfK3L5NVXkaNO2c6G5tKCgdz/29yfl9eG9u1YUDBcKqif1nVvRFj2Drb1aZt6svP bi3vvjFLv1645BatqtSv8yoojbPUHKiqcFvI2Z9C5o2ucCfF3aig8VrwCkbsvpTP3WV9aw ecL2MMBMOKx9PlS0MsDlogGFYqlSpeAc3tGzdcEQ1o8Fzu3gDrBwjkHk5ULG8 qLOuQ0CDR/vzyw788idkcWWqIm/L7ezkA0nTh0bUy3m5AoNJTfeOq7N4nBMKWlw9Mj4MKToyreF0X/GBBZ1DYY0VZ/QKN V3aihcekhR9eNkte/S/MvqejQshapdSCmJjkyrd7wz3w/sy1WeZ 44FZbqaKz8XiDb/rSk/zntY1actmdZzSv6WvW2zkyOKxUvHefiwykCg0qOSX35/QvLbay2t0zHcXXN82uVzOS4bv/XjyXlnkh86tQp/fzdf2tdAQA0lc/n09NPP639 /fr eefL75vd460HwdFFJ4ZyJ8fVfbZkjGQQe6 voOKFpY/L1nRYv29vXy1pF1t7GJdf t2M8vfSZms8yqp9ZxpX7 qY9Noj/oL57yy83tjjp9d34v29Ff0L6u624wVqzyQ1tAStY9FLNvGiTrqUpl9XfGLXfoO4xDTbSr72fLrV y9fLBZbfO211xqcbM5D//F38n1pXvcftd9u7ebcfz fs99uze lxU86dPfpXzemgC2QGY2qc7y3eN9fMuZXomelLF2AnWQsqtmD7v0GnBv5u11nt6zWelv57LPP9N JLLymVSrldFMBVjz32mNauLf0qZHt7u9rb28u2uX//vu7evWu6/5o1a/TQQw Zfnbjxo2mPrm7ra1NX//617Vp0ya1t7fr0UcfVXd399KfOFoW 9/urBwDeY Xfi92dWJcvvo07Xd 6/ld32pa ru/y5b/rc1URMPTpSt9iXi/ekZcLhociY4kXf2tQzfyd7vOblmt9bbS1tamZDKpX/ziF/rVr36l73// 24XCXDF7du33S6COjo61NHRUXW7wm9CB4NBhUKh4u9Du8NsDASsNIzLV6Omzfw6nfWVnM/8Sg/m7C8APMi 973v6Sc/ YnbxUDepk2b9N3vfrdsRrIet2/f1ueff1723qeffqo//OEPy0q3Eex euuLX/yivvzlL7e0POvXr1ckYvmj3S1LAwCwPE2Z a111tdJ0FvwYM3 AsCDb3h4WPPz8yyDXgFCoZB 9KMfKRQKuV0UAAAeOE0JfhvyhGcrhic/E/wCQPNt2rRJyWRSU1NTmpqacrs4q9aOHTu0e/duyxlRAABgr HBbz33 tay7Fli9hcA3LB7927t3r3b7WIAAADUpeFzs02d9S1w9Xd/AQAAAAAPmoaGqPX ru/nc7Xd9yu14Hd/AQAAAACe0dDgtyWzvgXM/gIAAAAAHGrYPb/r7lzUmnvzut8m f7UqFTtLbZJa37Pvb8AAAAAAHsNC34LM7BrfteoFGvLm AXAAAAAGClYcHv3ad/3aikAAAAAABoqFbcnQsAAAAAgKsIfgEAAAAAnkfwCwAAAADwPIJfAAAAAIDnEfwCAAAAADyP4Bc AAAAA4HkEvwAAAAAAzyP4BQAAAAB4HsEvAAAAAMDz1rpdAAAA3OA/9b9uF2FFyL7yVbeLAABASzDzCwAAAADwPGZ AQCr2tw/bXC7CK7Y/IM/uV0EAABaiplfAAAAAIDnEfwCAAAAADyP4BcAAAAA4HkEvwAAAAAAzyP4BQCg2d47ps2bNxf/7b3wofFDHdu8V4W33ju2WZuPvedKMQEA8DKCXwAAmujDC3u1uV Kz81pbm5Oc3Pv61tvP2se4L53TP2Ka 7kc60vKAAAHkfwCwBA03yod9 Wjr9/UqVw9nHt/5fj2n7xHZWHv /pWL8UJ/AFAKApCH4BAGiWD9/V29ef0Dcer3j/8W/qW9sv6h1D9Pv24X9VsCxIBgAAjUTwCwCAK7Yr I3C/1/X9evX9fa7H9rtAAAAloHgFwCAZnn8G3pCv9X/VMa0S2aEt v4 3E9ceKwLhD/AgDQFAS/AAA0zXMaOC6dePaY4f7eD3Xh8Anp EDFEufndDL hE4cviDiXwAAGm t2wUAAMDLHt//lt7XXj27eXPxve3H39db ytvBJb03EnF39msZ/dK77 1XyZbAACAOhH8AgDQZI/vf0tz 60 fU4n50pzwM dnNNcS0oFAMDqwrJnAAAAAIDnEfwCAAAAADyP4BcAAAAA4Hnc8wsAWNU2/ BPbhcBAAC0ADO/AAAAAADPY YXALAqZV/5qttFAAAALcTMLwAAAADA8wh AQAAAACeR/ALAAAAAPA8gl8AAAAAgOcR/AIAAAAAPI/gFwAAAADgeb5YLLbYqMTS6XSjknqghMPhVVd36oxqVkt7UU80Au3bGLRjY9COjUE7Nk44HHa7CP CI/weWQp5Xev0wlAAAAABJRU5ErkJggg==

The file it is referring to in the above message is the file I'm in.

Neither option results in the macro running.

I think for some reason calling the macro from the context menu is no longer looking in the right place. Here is a snippet of the menu code.



With ContextMenu.Controls.Add(Type:=msoControlButton, before:=n)
.OnAction = "'" & ThisWorkbook.Name & "'!" & "ImportCVR"
.FaceId = 23
.Caption = "Import CVR data"
.Enabled = True
.Tag = "My_Table_Control_Tag"
End With


Does anyone have any idea what could have changed?

mike.magill
01-01-2023, 01:25 PM
For anyone else who has this problem in the future, I worked out what was wrong...

The problem is in this line:


.OnAction = "'" & ThisWorkbook.Name & "'!" & "ImportCVR"

I hadn't noticed but the user had added an apostrophe to the file name (i.e. St. Peter's House.xlsm instead of St. Peters House.xlsm). This apostrophe was messing up the OnAction line and the code didn't know where to look for the ImportCVR procedure. All I needed to do is strip out any apostrophes from the workbook name.

Took me ages to identify the problem and seconds to fix!

Paul_Hossler
01-01-2023, 01:48 PM
Never trust the User