PDA

View Full Version : Add Macro to QAT



gmaxey
02-18-2020, 08:47 AM
Hi Experts,

A real novice with Access and Access VBA. However, I've poked my toe in the pond and have managed to create a project that is working well. I have a standard module with the following procedure that when run from the VBE displays the named form. I would like to add this "Macro" to the QAT. However, when I look at the QAT Editor and select choose commands from "Macros" my macro doesn't appear. How would I add this macro to the QAT?

Public Sub ShowForm()
DoCmd.OpenForm "Select Applicant"
End Sub

OBP
02-18-2020, 10:30 AM
Sorry, I am not familiar with the term QAT.
You do not have a "Macro", you have VBA code which is contained in the VBA Editor.
To open the editor click alt + F11.

gmaxey
02-18-2020, 10:36 AM
QAT is "Quick Access Toolbar"

I know how to open the VB Editor. In the other Office applications (well Word and Excel). VBA code (or procedures) are considered "Macros" for the purpose of customizing the QAT:

http://www.vbaexpress.com/forum/image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAjUAAAD6CAYAAABZNLbQAAAgAElEQVR4nO2d 48U552v5w9xbj/7Pzje3GcjpPx0tMpK5xypxWZijy/BXtgoKJsy2CgJnLUSktihEinnJBsNkGM2YBoWbMYDDN2MwdDA3AQYD3EzTBvssYGBJRgYPueHvl VVV1VX93RXv131PNJHMHV9u6aLevi b1UNfOlfvqWeZ93fh aLawkhhBBCwjNgqtAENvqfBwkhhBBCGtI7qVlXjUdo1pYTWWReIIQQQgjpldT4ycw6j8xEEphv1 vM8IYQQQtKc KUmSnUmUGS GSgwX1hDCCGEkDSnB1LTQnXGKTO AvONer5PCCGEkDQnXqnxVmmaCg0iQwghhJBoiU9qWhKaisg8/00fefm6vvCcI89 XZ9/9uv6/LNfI4QQQkiKE6PUBNyy7ZWZF3xkxisvz1Ty9Nf0 ae/Ws4wIYQQQtKc3khN0IDganWmIjJugak3 nNPfaWeJ6v5MiGEEEJSnHikxtn15Nft5Cc0z3ytLDDDFWn53pdreWzo78r5riP/9AQhhBBCUpyYpKZZt1NFatbUhebll18mhBBCCImcWKXGt0JTE5pylebzz5YrNC //LJ MMfEkIIIYRESvelJqxK47ht21ml dxTX0FqCCGEENJSeic1PlWaLzz7dX3 6a/qc08iNYQQQghpLW1LjZfRmYk2up4cVZrvf6N8y/bwV/W5730ZqSGEEEJIS1mR1Pzja tWNp7mecdTgr9f6Xoa/gpSQwghhJCW0xupcVVpGsfTPDb0d0gNIYQQQlpKx6XmH19bJ0l69OiRlpeX9cdjb9Sk5rPPPtOJ 987p7t27 uIL39Tt27f1rzt oZs3b2pxcVG/zv67fvGX3 u9995DagghhBDSUjo2publPdv0pX/5lj79r1v69/xefWndt/SdV9dqeXlZ3/n12prUHDgzXut6Wlpa0tTl8/rC97 h9X/6N5VKJf3n8bf12Hep1BBCCCGktXS0UvPynm2SVOl2Knc9vX tqP87vrsmNf w9QWX1Pzr9p/XXomwsLCgb7/8PT32T08gNYQQQghpKT2SmvIrEW7duqX//spztfE0V69e1bdfHkJqCCGEENJyOj6mRpL mHuj1v308OFDfefX/6wvrv173bt3T/ w9flAqZmfn9e3XxrSY6ujSs0OzXi6wWZ2dPIA7dCMrmtsa8D8He69Xx/b2t5 to7peth CCGEENI0XRko/OjRo9pA4Y1/ea1251N3pKabMhCy/R0zkmveVo1djyo23W43IYQQkr5074nCjjdzN9zO7XyK8Pe/Xn6ScOV27s8NfVmPrf5vhktNWWAaqkJbx3RdM9rR83YTQggh6UsCpcZTMdkxI10f01bP/Ibuqq1jqk uikmAfATKy1aNXa8uX1l3R3275TZ5usxmdjTux9UWpzxVlhurb6FeGQr4XIQQQkhKkgCpcRmCQ0 ZmtKP2Z3X5oC4ij1TsmHEISIDUuETJvf2yUFTaVl3ONW7Gu13nz X13LLlnlcWoR9WusAqn2/HTH06IYQQksIkQGrCxrx4KhZBFRZPZSSwgtJsO36VGse6Ze/wm f42Wfb0ddbwWBlQgghpM D1IRNX9GYGu 63ipOh6WmsuzWSh8U3U EEELSloRKTTvdTxG6pZxxdv34bsPzc6jwNOt irJePVvHrlOxIYQQkrokQGrcXB/b4RKXreUfHONf3Ov4DxRu0v1Ujec5Ne7qSHndmZnrvvNrqzYdKBwmMY6fXW2JcgcWIYQQkqz0ud SYHG7bJoQQQuIMUtO1IDWEEEJInEFquhakhhBCCIkzSA0hhBBCEpGB27dvq9NZWlrS0tKSbt26p Zs3b rGjRv69NNPtbi4qI8//ljXr1/Xhx9 qIWFBc3Pz6tYLGpubk4XLlzQ1NSUTp06hdQQQgghpKUgNYQQQghJRJAaQgghhCQiSA0hhBBCEhG khhBCCCGJCFJDCCGEkEQEqSGEEEJIImK01JRKJUIIIYSQSEFqCCGEEJKIIDWEEEIISUSQGkIIIY QkIgPHjx9Xp5PP55XP55XL5ZTL5XTs2DGNj4/r6NGjOnz4sMbGxjQ6OqpDhw7pzTff1IEDB7Rv3z7t2bNHr7/ ukZGRpAaQgghhLSUAXmoislKePTokR49eqTl5WU9fPhQDx480P3793Xv3j3dvXtXd 7c0dLSUq2Ks7i4qGvXrml fl5zc3OanZ1FagghhBDSUpAaQgghhCQifSk1u3btIiQ0fHcIISR96VupAQhi165wqQEAgGSC1ED iQGoAANIJUgOJA6kBAEgn0aXm BYNDm5Rwxyf6UgN9BKkBgAgnUSQmiv68/CgBrds0RaXvARNR2qgtyA1AADppIXup MN8hI0HamBXoLUAACkE6QGEgdSAwCQTpAaSBymSM1LL73UViYnJ2NrIwBAkkBqIHGYJDXtrPPzn/8csQEAaIN0SU0pKyuTUaYaK6tSe1vqAAXZGUvZ3jUgsfS71Hz00UeIDQBAG6RHakpZWR6JKNi2C q1vqUMgNd2i36VGEmIDANAGKZGakrJWRnbvDMYHpKZbJEFqJMQGAKBV0vFE4VJWVqZJVcbVNVVd tiIeWbvWZWU5LSRkHdu2atMKtqPLq2ZWSE23SIrUSIgNAEArpEdqHONnSlmrIhlVqfAIRsGuyEt BtlNECnaj8ASsY/nainMdpKZbJElqJMQGACAq6ZGahkqNQyq8A4hrIuMVj3bWUUWGMuEiBR2j36UmLMvLy11oKQBAM kiH1PgKhFdQ/LqnmklNhHVcy5WUtZCabtPPUhPn9gAAkkZKpKba5eSUEG9XkF XUYjURF2nYNdvHXfdgYXUdAvTpWbdunWhaXV7AABQJjVSI8nTDRQ26DdC91Pkdcp3XpWfi2PLpl LTdfpBaoJAanLa9MQT2pTr5vZXa6TYre23QpTPalJ7 wHn8eLYpZGBqsR0Mvl8Xvl8XrlcTrlcTseOHdP4 LiOHj2qw4cPa2xsTKOjozp06JDefPNNHThwQPv27dOePXv0 uuva2RkhCcKQ9sgNX4UNbL6CT3xRDWb1L439NPFwtvWDre9OKLVTziPa6ePS vtzW16Qk90zwpXiPd76MjqEa380CE1aWfg9u3b6nSWlpa0tLSkW7du1aoxn376qRYXF/Xxxx/r vXr vDDD7WwsKD5 XkVi0XNzc3pwoULmpqa0qlTp5AaaBukxku5IrDa a97cUQjbV/3 uli0UWpyW1qlJiK5HTOKVpsb3FEq1dv0qbVK5HWuOjG9wipSTtIDSQO06Tm9OnTWr9 fU1YooypWbdunX7wgx9odHS0YXutktvkERr33PCLfm6Tu7rjrUw4rt65TUH/665sM1dfd1POve36Zur7L46sbvjffP1zOP/HH3Dh8m1rY1vcxybCdn2Pm uAOz5/2PFt3IbzGJbb5V6mPD9YWIojq7V6pFj7s7FpfscyaHrIsfB L5pN9yX4GAZ/l5rN9zm Oef3wNMmV3t9vofVdTtSRYI4QGogcZgmNRs3bmw6CNhLdfn169c3bK81ctoUenFpdtH1W7fxYlQ cWe36h9/dBVKuFNXmVy8k1fm5TY6LTcCFziUKnu0XR7Q68KLj9/m8bal/xsjb9bQneJ/RpcZ9DIvK5dxSUxxZ3aRbqaiR1ZXt bTdf/vB04OPRdj3opUKkf/vOvy7FOW75jy biHxftaRTY5j1PA9RGb6EaQGEodpUtOsMhP1bqi2pKY4otUrkhq//0lH6dJxXuCaLd9sn83Wd1zMW/p8zfYdst1QqXGuF3V/TY71yKbm42Rc4uFte9TfZdD0sM/UbFtBRPldV6eFSW/Q/Kjb95tH11W/gtRA4kBqnKykUlP9ObiLKHgfUasVzZb16z6rt6n5AN1W9x1xux2v1IRVP6IN7PZ2Obl/brW60uxY H0vwqb70UxQ/JZr5bvmt3237DV2cSI1/Q5SA4mj36Wms5THRQRfYKIOpG1FUqrTOlCp8ZWHVi44K60SRd2uc1Y7Y2qaHPdclIqb311FTbr1 Vlx1Wcn6varUVJZt G5RqUkCSA0kjiRIzf/ H7taSiiVMSwusand/VSWnur/6Mv/c/X7x9wpR/7VlGjjHJr9HO3CEv225Vb23cp2A45Vw91PYcc3bN NY2q843/cH9NP/txC67/9qNMDj0KANDeTaSno9xv XWrlu1YRPe 6zrFc3vE2bXddgSkgNZA4TJMa50DhZtUYr9Q0I pyDXcCrfYOkKze TIS2B3j7dpo e6nFqXGtb2Gu608lYmQAZ3utkbvbov07BTP3TO 64QeX 4Fe dOO5lqp/FKwtBd7i5Bxf7bT9setCxCPpeBH9fAg5euLR26u6nkU0By7o/d/jvJry9YA5IDSQO06SmUCjIsqzeSg3ERu2Cy50zALHTUamZmppCaqDnmCY1XpAaAIDugNRA4kBqA ADSSc l5pVXXtEzzzyjp59 Wj/96U RGlgx/SA1UQcKn317LnD77717Vf/2v/4DqQEAqNBzqVmzZo3OnDmjt956S9/97neVy WQGlgRpktNFDp69xMAQEroudSsXbtWk5OTWr9 vYaGhvTCCy9odHQUqYG2QWoAANJJz6XmhRde0I9//GOdPHlSTz75pI4cOaLnnnsOqYG2SZrUrGQZAIA00VOpmZ2d1VNPPaXp6WkVi0U9 eSTmpub05tvvonUQNuYJDXtRGoUFj95QWoAANz0TGrOnz vF198UbOzs1pcXNS1a9e0Zs0azc3NaXZ2FqmBtjFFalYCUgMA0Do9kZqLFy9qw4YNOn/ vG7cuFGTmvn5 S5JTUF2JqOMI1a21JUDGq0tlnq2 xSQBKnZ95uTjKkBAGiRQKlZs2ZNQzolNT/60Y Uz dr8 KRGlNEwqS2JJMkSA0AALROaKWmFaFptVLz0ksv6b333vOVmiNHjiA10DZIDQBAOmna/RRVaNoZU7Nx40ZdvHjRJTUTExN65pln4pOaUlaWo1vKLrjXsW1LmYytQnUbhfrydkEqZS2fLi3v/pw/u cVbEe3WG3nJWUtvzZBFJAaAIB00vO7nzZu3Kjz58/r2rVrOn36tJ5//nnt27ev62NqyqJQnl53iawsl3x4RSWjjJVVebbtFpmCXZGf6rLRpMbdxsr0gu0QHGgVpAYAIJ30/Dk109PTevHFFzU6Oqq1a9fq0KFDXXiicIBIlLKyaiJSWdJ2Ck QmDT7uYV5FTkqpzK9Uj3q3WDm/gapAQBIJ7FKzb17A7p7d0B37gxoaWlAN28O6MaNAS0uDujatQHNzw9obm5As7MD6ZAa1/5LylruNla7tijatAZSAwCQTtItNb7dT1G6kJr9XB4TU9tuwa5XYbzdTNXuLFfXV51S1qJi0yJID QBAOkm51MgzULhdifH52dmtZNsBVRzHgGDLlm05ZKfWJnclCZqD1AAApJOUSA2kCaQGACCd9Hyg 8Pz8vIrFoubm5nThwgVNTU11YaAwpAmkBgAgnSA1kDiQGgCAdILUQOJAagAA0klHpaYapAZ6CVI DAJBOkBpIHEgN9Bt/ yhcjOL2n5kXtv2/1V/Grui0bMf6c7fHvS6aQB9BVIDicNMqXG/z6v2fCJecNpFWjy21Ucp1H438fDxrXv65RtzOnTmI12Yv60PP72nS6U7Gjv3sbbsuqTi9f KsTUA/Q1SA4nDOKmpPAvJ9WToUlZZ3ydXQ do5dh6HsQZE/cfLOtXe c0cf5T3/nnLt/Sll2XdPvu/XgbBtCnIDWQOMySGs/TpRtAarpHq1IT/ /h3fc VfbkNde0/7nxL66fD08uavTsR3E2C6BvQWogcRglNT7vF3NTuZgW6k 2ttwvAHM88bqx2uM/z93V5X4NSLMnVUdZ17mvxvbbhfp7y9yfp5Vly 9hqz Vu DeRtb2XcfZTiub9X96d0NFplylcW vvB/bturHqhPHwPlqFEnbj8zrwvxt399ElY9ufqZXs5dDlwGAMkgNJA7jpCZ0jEblglpdpmA7hMPv3W TO120EzCvYDglw7sf9Go/Gd4qVL/yN05u3w91 z0Xc83miLRvU9so2qo0JOV5lqQg7JiHHp7Itt5B14Bh4pMY 8FctfPI3V0u8lZo79x5qy65LIW0HgCpIDSQO46QmSqXG7x1iYW RbzovvOLjrn40aWvH3ma/gvenRdlGg0B6j6WfsEVsS8eOgRu/So1Xaq7duKfX9lGpAYgCUgOJwyipaXlMTQekprrnSvdH0PKNTTVIalz7LClrrVBq/I6Ji95IzelLN7T3RPiYmrFzH vQmeuNKwNAA0gNJA6zpEa1ikO0u58au1rcXR5hXVONQlLKWo4xImGVCqm17idnO7ogNc5umoaun mjHy9X95HtMvJ xWds6cAw83U/3HyzrtX2XNT7zifw4efGGXvnL zyvBiAiSA0kDuOkRmrs/gl8To1fhcDbBdNknqvbxiE63jb4lo/cg2b9Bwq3UpVot/vJMbDXsmVHqdR4PrtroHDQMVHAdvyqK504Bh6pkaSbdz7T/zlU1J53PtS5y7e08MnfNP3Bkv7z1HW9tu yrt1wj7kBgGCQGkgcRkoNQBMK79/Qf QXZB/4q/7fsat65/wnuv9gudfNAugrkBpIHCZJjWtgrk8AAKBzIDWQOEySGgAAiI USI17nEDDA7sgUSA1AADpJEVS03gnQ/jDuPzWg34AqQEASCcplRpFe24HUtOXIDUAAOkkvVLjeSha43tmPF1WlQX930cDJmGK1PzsyB8JI SkJmAFSE/pk0bBKDVUcUzFJapaXlwkhBudnR/6o6ZsfaGBgoO0/kRpzSLnUtPqemaDlwCSQGkJI1PzsyB9rgtJukBpzSK/UOMfURH3PTOByYBJIDSEkaqqVGqQmGaRUajzvcYn6npnA5cAkkBpCSNRQqUkWKZKaTEi3UdB7Zh wDg8uvOg5cDswBqSGERA2VmmSREqmBNNEfUpPX5sFBDW7O 84v7hzW4OCwdhZ7/48 IUkOlZpkgdRA4ugfqRnW8LCfuFSEB6khpOuhUpMskBpIHP0kNZs3D2t4Z9E9L79Zg5s3azNSQ0j XE1SpGRwcDAxSYy5IDSSOfpKancW8Ng9uVr42vaidw9XpdanJb3b8o rqsipq53B93uZ8fdubNw9rsLrt4k4ND3qXC1qfkPQkrFITRWiQGrNAaiBx9JfUlIWlJhPFnRoe3 qnicj6gUuOcXhaShkpPpfuqPr38s2sf1W3kNweO6yEkDWk2pqaZ0CA1ZjEwNTWlTmdyclKTk5M6 d 6czp49q7Nnz rMmTM6ffq0Tp06pZMnT rEiROamJhQPp/XsWPHdOTIEY2OjurAgQPas2cPUgNt029SUxcZp B4pCa/2fGPq2M9V5XHZ9vL/svV9lOp4DSKESHpSJQxNWFCg9SYxUDQP/4rycLCghYWFnT16lXNz8/rypUrunLlij744ANdvnxZ77//vi5duqSLFy/q/Pnzmp2d1eTkpAqFgt555x0dPXoUqYG26TupqXY55ety0yA9NSmpdk95pwdt2385V3VouXq3Fd1P JH3h7qdkgdRA4ug/qVmuVWLcXUaOLqKq7Di7jkK7n5xdV37dT40yVNzpM2iZkISHu5 SBVIDiaMvpWa5qJ3DTtFoHDszODioweHN2jzcKCx A4Vd43FcA4WDurX8qj6EJDtUapIFUgOJoz khhBiQqjUJAukBhIHUkMIiRoqNckCqYHEgdQQQqKGSk2yQGogcSA1hJCooVKTLJAaSBxIDSEkaq qVmqrYtPMnUmMOSA0kDpOkhhCSjoAZIDWQOEyRGgAAiJeBiYkJdTrHjx/X8ePHlc/nlc/nlcvldOzYMY2Pj vIkSM6fPiw3n77bY2Ojuqtt97SwYMHtX//fr3xxhvatWuXtm/fjtRA2yA1AADpZKAbfZQPHz7Uw4cP9eDBA92/f1 fffaZ7t27p7t37 rOnTu1l13euHFDn3zyiT766COVSiUVi0VdunRJ09PTSA20DVIDAJBOUiI1BdmZjDK1WMqWunA0C 3Z5 1ZWpVJWVrf2A6EgNQAA6SRFUlMXjFLWKotHRw9lWZzsQkc3Cm2A1AAApJNUSk3jz52gG9uEdkBq AADSCVJT bttW8pkbBUkqZSV5eiuclVffOe5u7esbMl3H9ms7VmmcZtWNoscrRCkBgAgnaRSatzdT2UhqUuG pxvJNTam2bwwccooU12xYNcFyrPNUtbq3piflIDUAACkkxRJjXOgcFUoqvMcElHKynLNlwp2RTr C5kWoBvnOK2Vlucb30I21UpAaAIB0kiKpCRIFpCZpIDUAAOkEqfEVDm8Xk39XUeO8NqSG7qeOg9 QAAKQTpMZvnmswcNR57UqN6s 3YaBwR0BqAADSSUqkpo/w6eKC1kBqAADSCVJjGAU704UHA6YLpAYAIJ0gNT2npKwVdGcWtANSAwCQTpAaSBxIDQBAOkFqIH EgNQAA6QSpgcSB1AAApBOkBhIHUgMAkE6QGkgcSA0AQDpBaiBxIDUAAOkEqYHEYYrU7Nq1ixCSk oAZIDWQOHbtMkdqjh8/TghJeLgmmQNSA4kDqSGExBmuSeaA1EDiQGoIIXGGa5I5IDWQOJAaQkic4ZpkDgMTExPqdKq/6Hw r3w r1wup2PHjml8fFxHjhzR4cOH9fbbb2t0dFRvvfWWDh48qP379 uNN97Qrl27tH37dqQG2gapiZBtQ3r88ccrGdK2XreHkD4O1yRzGAj6x38lWVhY0MLCgq5evar5 XlduXJFV65c0QcffKDLly/r/fff16VLl3Tx4kWdP39es7OzmpycVKFQ0DvvvKOjR48iNdA2SE2T7N6gVU6R2b1BG7b1qj3bNPT4 Km3YbcBxIaTNcE0yB6QGEgdS05htQw5x2Dakx1dt0G4D2rUyqdmtDauoMpHeh2uSOSA1kDiQGkc q3UxDrkrMNg09/rhWbdjduPzuDVrV0C1VEY9t9XnOdbcNPV7vyhra5tjHKg0Nraptp3G5cjsa1nW1wdn2xm3WtlHb LyHxh2uSOaRHagq2MplMJbYKnT WYAhIzfG6GARe7Hdrwyp/aXBWdMryUhGHanVn9wat8q2uONcPEaeG5ZzbKq9Xa5NrXyHb9JU3QuIJUmMO6ZCaUlaWU2RKWWW xmsSC1FSrIhG6dSryM7TteEOFxF1RcW9r25BDIFyDjoNkJeJy3vE rn2FdVVVJY3uKBJ/kBpzSIfUFGxlrKxK3TmGYBhITTXRLvS7N6wqy4uPUJTjlYnydusiVF1ntzasiiIrUZcrJ1xqqp Rwcakd0FqzCEdUqOC7ExGVrZRawp2pt4tZRcklZS1MrILroXqUlTKyqIby2iQGm 83UobGgTF2c3U2L3jme4UD eg44auooDByWHL XY/ecb2uNqOzJDeB6kxh5RIjVSVlUzGIyw1CrIzlrIllSXGsVDBrq7jWKY8w1eUoLcgNc0SMED3 PHGLihH91N5gK53HE59bM7jq4Y0FFSBCVzOMYDYd6CwV3iQGGJekBpzSJHUVKhUWmrO4hpAXBWW guxaFaYg27dK46zugEkgNZ0OMkFIWJAac0if1EgqZa2yjLgGEJeUtepVmFLWkpUt1f6sTHQPOAY jQWo6HaSGkLAgNebQltRMTU31l9QUsvUuo0o3lJUt YyVcXQtlbKyLFu25ZSY4LE5YA5ITaeD1BASFqTGHNqSmrNnz/aX1FRkpLHLqD7OJmPZsh2Vmto8b/eStwuK7ifjQGoIIXEGqTGHtqTm9OnTfSY1kCaQGkJInOGaZA5tSc3JkyeRGjAWk6QGAJIP57o5t CU1ExMTSA0Yi lSMzAw0BAA6F 4JplDW1KTy WQGjCWfpAaqSoySA1Av8M1yRzakpqjR48iNWAs/SE1UlVskBqA/oZrkjm0JTVjY2NIDRhLP0hNV7qffN9E73kKdjco2IGvDHG9hsQRHosASYJrkjm0JTWHDh1CasBY TJeaKh2t0AS ib6TUuPdVvWxB7bjCdxR113JfgHMgmuSObQlNQcPHkRqwFj6QWqqQtPRKo3vm i7KTXO6UgNpBeuSebQltTs378fqQFjMV1qakLj XllBD3tuiIEhfpDI13LBL11vmF60AMsq/toQ2p89 14IGYmI7sQtl8AM CaZA5tSc3evXuRGjAWE6XGO37GPVS4cX57 L2JviIF1SqOa/xL0FvnI06Xcx tSk3APgq2j7hQqQGz4ZpkDm1Jze7du5EaMBZTpcb7d79KTUeqNq430YfIRNBb5wPfRt9BqWmyb3 fFCakBs GaZA5tSU3YRQOpgV5jutQ4fw6avlJqb6JvKjU MhL4NvpOS03wOqWs5ag4ITVgNlyTzKEtqfnzn/ M1ICxmCQ1Ybdve/ otu8g95EH9rtEzYOJ2R8TlOp8VvOrx3ht3aXslaTbi8AM CaZA5tSc327duRGjAW06QmytODV/6U4aABtU3GsgS9dT5geu25M6EDhaNITcA fJ 1E7RfADPgmmQObUnNn/70J6QGjMU8qZGaPT2YpwwD9C9ck8yhLan5wx/ gNSAsZgmNVG6lXjJJUD/wjXJHNqSmt///vdIDRiLSVIDAMmHc90cBn73u9 p0/ntb39bi23bsm1b27Zt029 8xu99tprevXVV/WrX/1Kv/zlL7V161b94he/0CuvvKItW7boJz/5iV566SWkBtoGqQGAOOFcN4e2atwzMzOh8x89eqRHjx5peXlZDx8 1IMHD3T//n3du3dPd /e1Z07d7S0tKSbN2/qxo0bWlxc1LVr1zQ/P6 5uTnNzs52WGq4eyJNIDUAECec6 aA1EDiQGoAIE44180BqYHEgdQAQJxwrptD6qWm9vwLv2d7ZOvPzAh6CaCVzXoeZhb8TBD/fYVtT8EvHIRAkBoAiBPOdXNIvdT4L5foyD0AAAUhSURBVFN5kFlVPBpeAlh/YWD5ce7RpCZsX5G2V3uxIISB1ABAnHCumwNS43qCaQQ5KWVlVd943LDt5m8ibthX2PYCXywIYSA 1ABAnnOvmkG6pcb1Ur6Ss1UWpCdpXU6mhy6lVkBoAiBPOdXNIt9QUbGWqQlHKyopUcQnrLiq/SLA NMeuzwvdV1j3U/hL/6ARpAYA4oRz3RxSJDXubpyyKJQlJJPJKGPZsqNUaiRXN1LDwF5nF5NtO YF7avJ9oJeOAiBIDUAECec6 aQEqnpIp3uIqLLacUgNQAQJ5zr5oDUrJCCnal3Kxm4vTSC1ABAnHCumwNS0zKObqSOPDum09sDp AYA4oRz3RyQGkgcSA0AxAnnujkgNZA4kBoAiBPOdXNAaiBxIDUAECec6 aA1EDiQGoAIE44180BqYHEgdQAQJxwrpsDUgOJA6kBgDjhXDcHpAYSB1IDAHHCuW4OAzMzM p0pqenNT09rampKU1OTmpyclLnzp3TmTNnVCgUdOrUKb377rs6ceKEJiYmlM/nNT4 rrGxMR08eFB79 5FaqBtkBoAiBPOdXOgUgOJA6kBgDjhXDcHpAYSB1IDAHHCuW4OSA0kDqQGAOKEc90ckBpIHEgNA MQJ57o5IDWQOJAaAIgTznVzQGogcSA1ABAnnOvmgNRA4kBqACBOONfNISVSU5CdySjjiF1o55Ov kIJd3r VVSlwkYwyPWlcckBqACBOONfNIUVSYykbZBKxUBarUF8pZWVZtmyr123tb5AaAIgTznVzQGpio3 kbSllLVrZU xPaA6kBgDjhXDeH1EtNwXZ0S9XKKCVlLZ uqlJWVq0Ly5Zv0cW1THVdd/eXv7CUlK1WaEpZWQ1dVAFtaqmtfssGbbd/QWoAIE44180hRVLjHFPjJyQO8SnYPuNaPGJUsH3kxNPFVMrKqq3TpFLjEhmH4NR 9pOhoOkBbfX7XL6ftb9BagAgTjjXzSFFUhMgFNXBu5mMMhlHpcRbUfFUYNyVHecybmEq2M5qTbD UeLucSlmrvn2f7Taf7tPWkM VpO4upAYA4oRz3RzSLTUuKfBWRypiUa28BAlE4PYqe44kNY13Z7kqSm1JTXBbXZ8rZFq/gtQAQJxwrptDuqWmYNdvr3Z1FdWpV1DK4hFe0fDrfqrKRZNqUcAYGue4l9a6n8Lb6jcYOSkDlJE aAIgTznVzSJHUuKsg5Yu3Y5Cs81ZqV5eUo Lh7dbxK2u4lnFKTPhgZT ZcHVBeT5DfdcB0/3a6ve5gj5rH4PUAECccK6bQ0qkBtIEUgMAccK5bg5IDSQOpAYA4oRz3RyQGkgcSA0AxAnnujkMz MzMqNOZnp7W9PS0pqamNDk5qcnJSZ07d05nzpxRoVDQqVOn9O677 rEiROamJhQPp/X Pi4xsbGdPDgQe3duxepgbZBagAgTjjXzYFKDSQOpAYA4oRz3RyQGkgcSA0AxAnnujkgNZA4kBoA iBPOdXNAaiBxIDUAECec6 aA1EDiQGoAIE44180BqYHEgdQAQJxwrpsDUgOJA6kBgDjhXDcHpAYSB1IDAHHCuW4OSA0kDqQGA OKEc90ckBpIHEgNAMQJ57o5IDWQOJAaAIgTznVzQGogcSA1ABAnnOvmgNRA4kBqACBOONfNAamB xIHUAECccK6bQ qkpmBnlLELzZaSnbGULbW9my5harvMAqkBgDjhXDeHdElNKSvLsmVbzcTAVHkwtV1mgdQAQJxwr pvD/wcbyFaBJA1iSgAAAABJRU5ErkJggg==

OBP
02-18-2020, 10:55 AM
You have to be careful with Access as it has Macros and VBA and they are not the same thing.
Unfortunately I do not know how to add Access VBA to a QAT, it is normal for it to be applied to an Access object on a form or report or called from a Module.

OBP
02-19-2020, 01:58 AM
Greg, I forgot to ask you, why do you want to add the VBA code the QAT?