VBA学习笔记
这是一个学习VBA编程的学习笔记。
一.介绍
Visual Basic for Applications(VBA)是Visual Basic的一种宏语言,主要能用来扩展Windows的应用程式功能,特别是Microsoft Office软件。
Visual
Basic for Applications(简称VBA)是新一代标准宏语言,是基于Visual Basic for Windows
发展而来的。它与传统的宏语言不同,传统的宏语言不具有高级语言的特征,没有面向对象的程序设计概念和方法。而VBA
提供了面向对象的程序设计方法,提供了相当完整的程序设计语言。
区别:
- VB是设计用于创建标准的应用程序,而VBA是使已有的应用程序(EXCEL等)自动化
- VB具有自己的开发环境,而VBA必须寄生于已有的应用程序.
- 要运行VB开发的应用程序,用户不必安装VB,因为VB开发出的应用程序是可执行文件(*.EXE),而VBA开发的程序必须依赖于它的父应用程序,例如EXCEL.
- VBA是VB的一个子集。
二. 使用手册
2.1. 如何在Excel2010中开始使用VBA?
“开发工具”选项卡
所有 Office 2010 应用程序都使用功能区。功能区中有一个“开发工具”选项卡,在此可以访问 Visual Basic 编辑器和其他开发人员工具。
由于 Office 2010 在默认情况下不显示“开发工具”选项卡,因此必须使用以下过程启用该选项卡:
启用“开发工具”选项卡
在“文件”选项卡上,选择“选项”打开“Excel 选项”对话框。
单击该对话框左侧的“自定义功能区”。
在该对话框左侧的“从下列位置选择命令”下,选择“常用命令”。
在该对话框右侧的“自定义功能区”下,选择“主选项卡”,然后选中“开发工具”复选框。
单击“确定”。
aaarticlea/png;base64,iVBORw0KGgoAAAANSUhEUgAAA0IAAAKHCAIAAAAjbm+QAAAgAElEQVR4nOy9a3Qb933njZd9laNXz+mLfXzYc3afs+dB2uWe3fa4YZtlu04s22kW22Zi2YVt+NbocRMHstOI7SL2xEkctXGcsWNLtGvEsGNVLCzLsGXLkmxBkOQLZUkmKIGMrhBEShQpidKQBEDwOs+Luf1n5j+DAQkM/hh8P2eOBA7+c+GA88Nnfv9bQAQAAAAAAC1IoNknAAAAAAAAVgI0DgAAAACgJYHGAQAAAAC0JNA4AAAAAICWBBoHAAAAANCSUDTuqZ8LWJqy4LPAggULFixYsNgtbjVOAp5D/XjwWQAAAABAsvEEaBwrQOMAAAAAYAc0jmmgcQAAAACwAxrHNNA4AAAAANgBjWMaaBwAAAAA7IDGMQ00DgAAAAB2QOOYBhoHAAAAADugcUzjjca93PfRy30fvrTtw95/+3Dzv+3d/MbeF9/Y88Lru59/ffdzr+0SXt31q9+8/8v4+8/E33vmlfdGx64sLCzU9wQAAAAAsAKgcUzjmcaZ1iwvq4skLS9LS0vS0vLy0vLyM6+893LfvsLopfn5+fqeAwAAAABqpUEal4+Hu7q6YmlJysfD4XheXSW/1MrE0nphEnk98EjjXiI0bnlZWpaWlyVpeXl5aXl5SXa4peXFpeXFpeVnXnlvqDDzg6dfOZO/AJMDAAAAmksDNC4d63JEdTRS40i9S8egcSoeady2D+UXy5K0LC0vL8sOJy0tSYuqwC0sLi8sLT/zynuSJA0VZu569CcwOQAAAKC5NETjSCkzIbubIf8WjsXC4XheszlonI6nGrcsLS9LSgZueXlxeXlxaXlxUXa4pYXFpflFReMuXpc+yU18lfsuTA4AAABoIo3SOHpKLpbWUnDWbBw0zoo3Gte77cNlGaX+VKlFXVhUlvnFpfmF5fkFXeNOXCi9++mFP/nmwzA5AAAAoFk0qosDxcUIgzP+rGtcLE3ftG3xUuOWlpeXlpQk3D/87BXTMrewPLewJGvcF2eu7z9+LfXJxTf2nvp/vhKCyQEAAABNoYEa59AszvhuOAyNs8Ebjduybe+SonGSnIT7h5+9IkmStCzJ1al3fY+vzC9V5peeeeW96FO9d32PNy2iKGIUEgAAAMBjGj7giKn/AoGma0qRdEwWPWicjjcat3nrh3pvhsXlv/nWt/7hZ6/I+bn5haW5heW7vsf/zbe42bnF2bml2cribGWxPLdUrizNVhbLc4t3fY+/dOlSuVyu71kBAAAAwJmGaJxTX1XN6ZRuDurP+Xg4HIuFIXAGvNK4vUp31KXl+cWlv//77/7Dz16R83Nz80uV+aW7vsd/93uPlhV7W5SX0uxiaXaxVFm863v8yMhIsVis71kBAAAAwJlGaZymY4ZsHPFDOtaldmgIx/PyG2q1qn0Gr93wSuP2yHWp6fT+DRsec1g+/Chdml0szi6WZheKs4vF8mKxvLAijXP7GefjYRfJWXelqh3atBcyXaw+b1jHOLR7TAEAAAAajlcap379Kd9yhi/MfDwsryc0Dlk5SZK80rgX39izuLi8sLC8YcNjkiT9ShBOWfjJT39WqVQeeujR4uzCTHlhprw4U16UX6xE42ow9XTMdjxo8g+N/tqUGFb/zGjHNnWYJrYlSuMJAwAAAEM0p20cObScmpZTXhv7QrQ7Hmncb/csLC7PLyxt2PBYuVxOJF7LWti8ebMoig899OhMeWGmvDBTWphWF/ca55zLoneAqVYxr/+pkNkzc59o0/Qh1f4kbUe+sbgesQP81QIAAPAYzKnKNN5o3K9/u2d+cUnWuLGxsQ0bHuvr63vzzTd37tz5k4+kn6elTObAc889n8/nf/7zZ0tqjWppdmGmvDBVrE3j7HJZhHo5jh9tqaW3VS3KCqogat1rzE5pEDPlB2OuzppQBgAAADwEGsc0Hmnc6x/MLyzNLSxt2PDYuXPnZI3buXPn0aNHT6i88867588Xksm3Z+eWtKU8t1hrNs6FxtWENQlGpnephzVVv1LPiDKGtbXZZjqmSSAcDgAAQBOAxjGNZxon90jdsOGxf/7n5+TeDL/85bPvvPNuz8bEU0+lYrEdPRvf3BDte+T/2/rgg6/dc89v7vz2v/71/36pXFmcKc3Xt1K1aieCLmM/ArMa0geedtA4+bUpH2enlJSjOZQGAAAAGgo0jmm80bjnX99VmV+qzC9u2PDYzp07v/KVrg0/fXlpScpdKz/1VCq9T/r18xWt8HRxLvLg4b/4iyfvWpcqVxana9S4FWTjqrU6M7WutB7BeFhzQk3VOENVbSxNz9pZjdDilQAAAIBXQOOYxhuNey6xa25haXZuacOGxx544Lu33f4NWeOWl6UfxXbs2b3w9M+uyiWni3P5S2Lobw/cc++2u9alSrOLU/XOxikQWlW984AiWXYt1IzuRWvyRs3GKe+lY13G4Q31l3pNK0wOAABAE4DGMY1nGleZW6rMLc7OKeP6bvjpy8+9+s4bb+/p+eGb7747+4PHT0myw10Uj+Qu/+n/ev970Y+/zSVLs4tisSHZOFMmzLZKldjcvnZTt8dY2m5sOHo2zrJP9TdQpxwxHAImBwAAwFugcUzjjcYJiV2zmsNVFuWR4Uqzi7Pzixuifck3xcf/4XjkwcOhuw/c/L/e/4P/+e//79rtD/zdR3/9v18vzi7cmGmAxsneRQxA4pyNk4uHwxSTUlSMGHTa3LCuajbOcBL5eDgcT1OzfmR9riqOaDQHAACgkUDjmMYbjfvVq7tm5xbLc4vyDA0zswvTssbNLf79I1tfe/1K70ujv/zVmad+luv5P0e+u+HjB77z0Z33vPdX33hpprxYq8a5qFSV60bTWn7LQeMsSTinrJxeC6qhq1eVtnGqgLob/lcfXQ4eBwAAoIFA45jGI437za7ZymK5slSqLBbLizPlhenSvKxxDz74Wu9Lo8/+6mz3X0Xk5et/89DX/+ahb37rrbW3/mqmvHC93tk4WlKLYnxy9sxub9b6UDIPR+7WNFgdmb0zHt3lZFxEazlk4wAAADQYaBzTeKNxz/7m/dm5JVXjFmbKC9OlhWJ5YbayeM89v3n2V2ee+lmu+68i4Qcf2bpj12cDg2u579xyx7b/+Zc/mykvXJ+uQeMAAAAAUEegcUzjjcb9Mv5+ubJUml0szS4Wy8oUW8XZhXJl8dvf/tefPH3iG/d9+Ge3/nXPE08P5M68veuDP//L2/78lte++uf/Z7q8MAmNAwAAAJoENI5pvNK492bnlkqzi8XZBVnjpkoL06WF2crivvTogw+8f9e6FMf9eyiU+MbtL37tln/+H//jia/86Q++8qc/mC4tXJuag8YBAAAATQEaxzTeaNwz8ffKc3If1cWZ8uJ0aWGquDBVnJ8uLZQqi6XKopKom12Ykatc1YzdVHH+yo0KNA4AAABoCtA4pvFM42YruqjJ2TixOC/OzIszC2JxQSzO35iZvzEzf316/vrM/OT0/LWpuWtTc1duVMYnZ6FxAAAAQFOAxjGNd9m4ymKpslAsLxbVbJyoeNvc5NTctam5q+LclRuVKzfmJq5XxidnL1+fvTw5e/na7Ng1aBwAAADQHKBxTOORxr2y8+db+r77o+fWfffHd32PX8ECjQMAAAC8p5EaZxgiv9oIWvK4XekYxtoi8UbjZmdnJyYmRlbBxMTE7Oxsfc8KAAAAAM40UOPIcVzJ13alteH0IXIa3mjc4uLi7OxscRXMzs4uLi7W96wAAAAA4EzDNM4sbk5znTtMzNTmeKNxAAAAAGhFGqRxtOybc0YO80/SgMYBAAAAwI5GaBw5faUBec7zKnNqAgJoHAAAAADsqL/GGZNu5hSc3O3BMsF4OJ7XGscBHWgcAAAAAOxo7IAj+XjY0c1IdUM6jgI0DgAAAAB2NHjAEcXS9KFHjBgycOiiagUaBwAAAAA7Gqdx5uwardLUuE7zuGpJvPYBGgcAAAAAOxqlcaSS2Y8jQow8EksrZWNpWJwGNA4AAAAAdjRE40h1Mw0eF47nifetlaiy2MHiFKBxAAAAALADc6oyDTQOAAAAAHZA45gGGgcAAAAAO6BxTAONAwAAAIAd0DimgcYBAAAAwA5oHNNA4wAAAABgBzSOaaBx7cbs3OKh3LWt+0c3v3f+9X0jHw5cKc4uNPukAGgXcAOClgMaxzTea1yODwb5HPETlyTeTXKBKnDJHB+0rNV2adxhkgtoPyW5AHFgtbD9geTCOT6obabs23zOxrdoZ2y5CEmOPGc6Sa5qkZq5OlURUuf2fnHl5OjM5euVM2PFfdmrm948c2GiVNfjAKBjvOUdStFulRqLKCQ52hGN22v3cY4PKnepY0Cox92IGxC0ItA4pmFN44yQFkbbEfmmErgNa03BnFQy4y60F9oRyU0VAaQppsnwLKdF+Q00PUtyVMXTCsnCSithXE+cF5eUqL4qSZIkzS8sPffOuU9/d920Ppuf2vTmmZnyPP1UAFgRDk6k/H06WxN5c9FfKveA8cZU7gHrfaPe0uo9qR1dv1ucw5HxV1PvNev54gYEPgMaxzRN0TgiUq5c48yP+BSNS3JBPmeX37NNnpmDsuVcnDKIBo8yh3P5cNZtTb+jnhyQKOpp/M1N2+sXgfI98vnp6+8eHtd+vPvJt7TX6cFrHw5cMW8AwCqwvbe1RyTHNB3xIEWWI5646I9kysamQ5vDAJc0bGFItFtOy7SC+JG8xYnHMtyAwFdA45im2Rpn9+CqvWuncQYD45IUjXNfA0M7McNRLEHdrlLVdHKmjFmQz1nEUUvzadlAzTDJby5iX8RFsc/n0a7c1v2jJ0dnqL/7FXHu1+9iYhNQT6pn42rZlXkTc7WpegdSHttoR0tyHG9+4jPVsxIpQ/OjF7WlhqEgbkDgI6BxTNPsSlWnikU5SAYt2SjlHd1llNSXMRDrbmSOqGrorVKlQ6iVQ1IvYKiVNWmfupHb9jzGktYrFeRzdqkAE1op4vtoy67zlyZntSJkMqBYWdz05hk3JwmAS6pm46regIbaTnPuzZqjNjR7M1fDmg4mP/mZ72NTkwzq3Ws4NHELWhre4QYEfgEaxzTea1ySI8wsxwedHs3lIGktlOODQT6Zyyn7U1q8kBqX44PBYFB3LKMPGX6iP6tbayqVPSlmaP0SMUZ863cY8aWh6JhzvsD+mhDJONsNyQZASiFTMoD8Fhm/UXlhJ5IBoJ5Ur1R1u4HypsGezCXNGke0SrA0NLDN8luqCij3pik2UK1Twg0I/AQ0jmk81zit9UlAbYTC2wR1ydQezZDk4njNgpS1Ro1LclzSsLVdCK+SZSP2TG5MfhEZalAduqqaek8Yan/JJ3rn0zH9KraXjlINdfTMjXf66U1z9mWv7v1igr4nAFaEy0pVu95BFrQ/d+rfvV3fJvtsnHZD6sHF2CRD387YYMLumdCQTscNCPwDNI5pvNY4Q11DQGsaZhO9je+o2+rNl40NjM1dHIit9ZhqrWF1n43TD2fu9Gb9BqJm46pqnLJtztTox5g+dBxDhfobyMwvLL2wM38gN2kqevjUjV+8dRaDV4H64i4bZ/8QQ1U10yOW9T2DoEkGjTM9jWlPcOaequZ+R8bqAHM2zkbqcAMC/wCNYxqPNY7uILadEaoNOOL8UE4L5hZrq56Nkzc1Hk3/wjEkEux2pvZbJX/O8UEuSW1+k+SDao9Wyu9o+OIw1zeTfQAtdTqSJInFufjeC29/djmbn7o0OXuiMP3+kYkXdubHb8xKANQVVxpHKlOVbJxtazVlNb2tgWV4ETvZ03qqJpO0k9CercwJOHo2Djcg8BHQOKbxVOOImGca25auZI5tWGwalNlonPZmtQ5v5k2TXCCgt7KzZTXZODq2IwRTemxY3dNQYWTey7GzN7Z/fGnLrvP/fvDiZ7+bnF9YcvzdAFgJLipV5YhA9N6xuSVMTU/lP3m7Jz96v1JqNs62p6oTpmdR2qMfbkDgKxqkcelYOJ43/NxlXGFLPh6OpWv6FfyMlxqnGxOtMpDWZ9VG46jZO+1LwxisbbNtQY6r1lE1oDfcc2q0Rm0JXfULwe03BjXhWKVLRPUSADSaqtk4ex+qcnMZNjF0bLB0EtcKKPeEst6cH3c1i4PzqHCmXx03IPAPHmmcSeTy8XCXjkHboHEkmFO1FZE91u7LxnksPgDAKsENCNqKxmqcUdeo2paOheNpazGXuTu/A40DAAAAgB3117h0zEbYjIUUT7Mk35CNI4HGAQAAAMCOxmTj0rGucFjRsXRM0bl8PEwk2RSRk//Lx8PqO9A4EmgcAAAAAOxohMbl4/FYLBzPy3k5c8s3bU061hWLxZSfNJGDxpFA4wAAAABgR/01Lh8Px9JEF4e0ampkzk17S7c85V1oHAk0DgAAAAB2NKBtXDyeN/RUzcfDXbG0VeKUDhAmaYPGkXimcW++tRMLltZd6n5H+Jimf1hYsLT00uw72IwnA47IvkaRuFiaSNZpq6FxGl5qXN33CUBNRFcK/nprApcLAD9FGw80jui6qgsaMYycRfmgcRrQONA+RKPRxdphM7CyDC4XAH6KNo3UOGXUOMLK1E4P5hScRA4xB4vTgcaB9kEOrNO1wGxgZRlcLgD8FG0wpyrTQONA++CnwMoyuFwA+CnaQOOYBhoH2gc5sE7VArOBlWVwuQDwU7SBxjFN8zROnoWaSxLzSOf4IDkLtuM81ZRJt5Oc3STaxjKY77BdkQOr9Q/eAWYDK8vYXy6bOePJSe1zfFCJCpR7XMEwqb1dSEhytCgBgDf4KdpA45imORpHjcKWgGwI+Yaobg3xmp4lOariaYW4pDytdX1/O9ASyIH1Ri0wG1hZxvFy2dmVMqE8LTaY16vbO6oeNA40FT9FG2gc0zRL4xwyYlpsdqdxelaP2L312TzHBw3hHzm5NkQOrJO1wGxgZRnD5XJMqlNuXeVnmqIZ8/bV0vNWIYTVAe/wU7SBxjFNEzWOnpLjkqTGOQd/tRbVUlB7epd3pL0kxdDgdaAtkAPrtVpgNrCyjNPlojzCKfevcX01jTOUpqblkI0DzcRP0QYaxzRN7OJAibLGaFxLpaot5kpW4xcAmsq1FXJgvUpAfUQgCzAbWFmmRo3T19u2tjDl59UXxP/QOMAWfoo20Dimaa7G2cZrSZKczE3/gdhJkM8ZE3jwM2DEGlitsdX0LrOBlWVWrHHyS/X2thStpnHV2twi/Q68w0/RBhrHNCwMOGLTe81VT1XtiVsO+brfETu13w+CenshB9ZzFrQ/COtbzAZWljFeLsf7WLvzCWdTb2pXGsclJWTjAIP4KdpA45imWRrn9Nysxm5DGLbPxlXVOGWbnKnlDbJ1bYccWM/QCAQC1PXMBlaWWVU2TumxSqzSbnJVCIMcF1T6pWta59TFATYHvMdP0QYaxzRN1Diyr6mhDZzyg6WhnLtKVS6prjN2geODxDh1ULi2RA6sp2uB2cDKMivQOPm+N96aehqPSyp3urVHun3jCT3GVCkIQAPwU7SBxjENQxqnPWqbH8rVQjVl4+i4GSEY+BY5sJ6sBWYDK8vUrHFJLhAIBmsZz5HoaE4bX0hZjzQcaBp+ijbQOKZhtm2cOQbLgqY9n9uomKsurCZBBG2DHFiHa4HZwMoy5OWq3u0gyPN63ahNGVNnc0sAoI3pDY0DzcRP0QYaxzQsaBwA3iAH1lwtMBtYWQaXCwA/RRtoHNNA40D7IAfW47XAbGBlGVwuAPwUbaBxTAONA+2DHFgHa4HZwMoyuFwA+CnaNErj8vFwOJ6Oh7vMhON5U7muWLquv5KfgMaB9kEOrAO1wGxgZRlcLgD8FG0apHH5eDgcz8v/WlZLUjpm0Ttn22tXoHGgfZADa62wGVhZBpcLAD9Fm8ZonKJrthqnko7B1xyBxoH2IbpS8NdbE7hcAPgp2jRE41Rby1epVE3HumJxShlUs6p4qXFYsLTuUvc7wsc0/cPCgqWll2bfwWYaoXHpmGJrWvItHZPNzJCNs+TqlE0hcTqeaRwAAAAAWo76a1w+Hg6HTYKmapyxmEnY8vEwqlhNQOMAAAAAYEf9NS4dj6ftuqlq9apKdSu9ShVdHDSgcQAAAACwo6Ft49SfYuFwVzgc11Nv6Vg4njen6PLxMKpTTUDjAAAAAGBHwzVON7Z0zLmmFRpnBRoHAAAAADsa3lM1lpY0YzOO9QuNqw40DgAAAAB2NE7j0oSzEcamvzS8QoM4KtA4AAAAANiBOVWZBhoHAAAAADugcUwDjQMAAACAHdA4poHGAQAAAMAOaBzTQOMAAAAAYAc0jmmgcQAAAACwAxrHNNA4AAAAANgBjWMaaBwAAAAA7IDGMQ00DgAAAAB2QOOYBhoHAAAAADugcUwDjQMAAACAHdA4poHGAQAAAMAOaBzTQOMAAAAAYAc0jmmgcQAAAACwAxrHNNA4AAAAANgBjWMaaBwAAAAA7IDGMQ00DgAAAAB2NEDj8vFwOJ6XpHw83EUjlrZu0BWO5+v8m/kCzzTuqZ8LWLC07lL3O8LHNP3DwoKlpZdm38FmnmpINk41OeW1RdzSMargOblee0L9eBrxZ8TgnyYALsFfb03gcgGwYhi8fRqjcTK0dBz0rCagcaCtqFQqo6Ojly9fnpycvEEgiqL8r8bU1NT09PSVK1ck/PXWCOOXK8kFuKRxVY4PBmTUd5JcIBDkc5KlnL5pkgsQO9J3QWyorTQfUN6adgjgH3wTbequcYq7acm4dEyvLyUTc3ZVruS2wHuNS+0WU7vFVEpMpcRUn5hIiInegiAUBKEgbCrwfIHvyUZ7stFotu7nAIBvAivL4HIBIPko2jQkGyfXqdqKGjTNNU3QuJSYyUiCzRHEihRal4msS0XWpep+DgD4JrCyDC4XAJKPok0DNa5qGWTjqtI0jdskWsuIFUkUxe5QprMzEoLGgQbgm8DKMrhcAEg+ijaN1TiKq8HRasF7jUv0iZmMxPMFUwHZ4QrjYmcoxfcUQqGEyz3n+GCQTxINUywNVLRylBYqoL3wTWBlGVwuACQfRZsGalw6FoubeqmSaTr73qroBqHRBI1LiJmMFO0xaJzmcNmTYufaVDSada1xOT4Y5HPyv5bVakNiJ9DIuJ3wTWBlGVwuACQfRZtGaZycdzMPNmLUOGpiLh2Dxuk0QeN6C5mMRPZgIB0uky10dCci611rnKJrthqnkuTga8A+sM7MzJRKpZmZmVYJrCyDywWA5KNo0xCN01TMqVIV2TgXeK9xglDIZKTIekXjTA6X6S+suTkRiWRCa12dg2pruSqVqkkuwPGUMqhmbTOogXV6erpUKv3hH/4hGVsZD6ws05TLxdvj/ckAIPko2jRy3Djr0L/IxtVIEzRuUyGzW0rtliKRbCiSCa3LdIcynaFU59pUR3dCcbh1mW5XGqcN7qQl39QxoQzZOEuuTtkUEtd2WAOrHFVvuummP/7jP/7bv/1bLbYyHlhZplka53Z9jueUoMEltf8oo8kRG1gDCADV8E20aazGgVXivcbxfCGVklIpKZGQBEHkN4k8X+B7CtFoNro+KztcKJRyo3E5PhgMmuKr3dCehpU5Pogq1vbEFFjlqPoHf/AHt9122z/+4z8+88wzTz/9tBxbGQ+sLNN0jQsEAtT1Gjk+yCVzfJDjVUEzDOxrBY0yQO34JtpA45imCRrXk031KQ4XWhfVl0g0sp5XHS7V3V29KiTJ80m7bqpavapS3UqvUkUXh3bDFFhLpRLHcRs3bozH4zt27Pjggw/279+/a9euUqnEeGBlGcY1ztoCg0sau0IF+Vy1vlFI5IOq+CbaQOOYxnuNi/ZktTxcaF00EAh0dndnT4rZghjp4bvXyg6XcKNxkrm2I8dzwWAgGOT1EJvk5JBszsYhCrcn1OdjK+w/H7NMEzXOJFuSfWVrkue4oN4mQ32cU2NFknN4vkMAAW7wTbSBxjFNEzQumk30SnJdamhdtLO7O9ojFApiYVyM8kJnd6K7O9HZnei+uWaN043NHIKhcUDBN0MAsAzj2Th1DMkcH5RjRZLnOC5obVNLH64I6XvgEt9EG2gc0zRB49ZnBUHk+ULH2lRHZ3dqdya1O5PJZDP92VAo1Nmd6OxOdN6c6L456ma3ZE9V5SE6oDRbDhjmsIbGAUnyUWBlGcY1Tn3Kk8OA1t+Bk8eZtLc0ayNbAJzwTbSBxjGN9xo3OHAjsj4TWpcKhRLKslbolpduvvtmeYl21qBxScLZCGPTXxpe4Ym6nfFNYGWZpmuci/WWzqdKHt/G07Q+8QC4xjfRBhrHNN5rHABNxDeBlWUYHzfOXFWq6FmODxpfOwOpA9XwTbSBxjENNA60Fb4JrCzD+uXSm1zkjIl8ezlzGlUOADq+iTbQOKaBxoG2wjeBlWVa4XIRKTkuqQ0GbjuiJDQO1I5vog00jmmgcaDV2bZtm/vClUrlyJEj27dvf8nIyy+/LP+rkUwmv/jiC2YDK8swfrnMabckZ+i5YBzpV9M9VKKCWoHGAS+AxoFWp1aN2759+8WLF8sq8tBNk5OTV69OXrlydWLiytjY5ULhQjZ7/K233mI2sLIMLhcAEjQOeENTNC6yPuryXwCqUqvGbdmyRRO46ekZcWrqxg1xdPRSoTByLl84ffrc4PHcoY8/O3Fi6MXNLzIbWFkGlwsACRoHvAHZONDqrEDjtMHTRXHq+vUb165NnjtXOHXq7PDvTp04Mdx/+OiBA59ks8ehcSsDlwsACRoHvKGJ2TgSN2soUIb1tWmfLK+mDsqOlsstjknjHnniE4fCmsYVi8WpqWnZ4SYmrp46fXZo6OTgYO7YscHPPjuSyXw8MDAIjVsZuFwASNA44A2tno0zipzd7Ay6xqGdsv+waty3H3zerjA0zgNwuQCQoHHAG1o7GydJ+kyq9DybYRhPjuPkKR+QjPMTVI27/VuPUwtD4zwAlwsACRrnknSsK5iDFHIAACAASURBVBzP270VS6/u3NuAVs/GGSGzccRrra6VyMYhMecb7DSu++t3WwtD4zyA8VkcAPAGaByVfDzcVQVZ6/LxcCwtSVI6Rn0bKLRyT1U106bn00g3018r5YJ8DhrnR5CNY41WmFNVb45haFHrEBfkt0yDzAFgDzTOgXw8bLWxdIxYl47pmTgiLWcoAyQfZOPIxnGGhnJaPE5ywWBQdrhgMMjnjNMlIiK3PGgbxxpN17hAIEBdT2AKFgEuWW2qBiKiIGwAN0DjHLDJyWmKpkhcPh7uiqV1jUM1q5WWbxtneKgmoqv6iJ3jg1yS0sUB2TjfgJ6qrMG4xpEtaTmO0qw2yPPUxrZoVAtqAhq3crSKVM3eumJpQv7gcjq+ycaZ6zq09Tyfo/VUhcb5hpWNGweNaxxN1DiTa0l22TjjQ58kuYgIdv3gAbABGmeHpbUbLSOnNo3TNlB/otbHtjH+yMYRDqdVmZIxmdQ483M2bK7VgcaxBuPZOEmyPvZB40D9gcbZ4dS+TXlPN71wPJ+Ph8OxWLhL7fGAXBxJa2fjrJ0c6GDcOD8DjWMN9jVOrVelDlYU5HPGkYq0kggfoBagcXYoqmZuH6f4m0XxlAZy+Xi4KxazH56kXWmKxlVtdqJViDhDtjl2bL/iOIsDQnOLA41jjaZrXJX1OT4YDAYDXJLsrUCXNHIt0nGgNqBxdugap+fV1KpSXeOUhFwsrlWi5uNhSJyF1s7GAQCNYw/Gx41Tuj25qlQ1rEUXVVAT0Dg7qmfj0jFi9Diid0MsFsPAcSagcaCtgMZ5AOOXS+n2pI4x4pihN8qd5nF2szcDQACNs4PaNs7UOVVGztEZejgoRof2cSrQONBWQOM8oBUul+tsnKGFRo4PBgJcEhYH3ACNA17gscZFewvKIhQiQiGyqRDZVAhtKoR4+lL30wBtDjTOA1rhcjlrnNbDwVqJKosdLA5UBxoHvMB7jZMPIQiC/mJcFMeVF4XxgiAIhfFCYbwQ6snW/TRAmwON8wBcLgAkaBzwBu81LtSTdb/U/TRAmwON8wBcLgAkaBzwBo81LpFSzCzTr1SYZjJZqSKJFSmTyYraC1GSKlLn2kjdTwO0OdA4D8DlAkCCxgFv8FzjMvKPqYzic6ndisaldisal9qdFUWpUBBr1Tj7dsemwZ/QrqV9gcZ5AC4XABI0DniD9xqXyRZSmWwqk03tzqZ2ZxO7KS8SqUyiL1Nd42yH/TWO/mucS5VeBLQH0DgPwOUCQILGAW9oejZOWVOREqmMnI2TX2Trk40zzKmjTqhKTL8Ki2szoHEegMsFgASNA97QNI3bTWgcYW/KC1HKnnSjcZaZD6ljeKp+p06mo2bk4HDtBzTOAxifxQEAb2h3jROnS1gatFT9eBpbqdpfUCpPUxm7RejLCAkXlapG7Fq9aa5HTHnNcRw8rh2BxnkA63OqylBGjjOscHpG1Muh3S2wpd01buTiZSwNWqp+PA3UuD61ClXt0JDoy+gvREkUpURfpuAuG1etaVxAmW6H4+RQmzSrm2UF8DvQOA9ousYFAgHqehNJjmw/u7IhfdHuFtjS7hoHvMFjjRP6tCpUReME1d6EvkxBlAryi3Epk62tbZwy3bUaUnN8MKBXpGrrLeKHh+c2AxrnAexrnLtMmzNodwuq0NYad2o7f/CHQSwNWk5t550/ngZqXCKTyWQTKaUvaqIvI1CXRIavpVJVf5JWPU1/QpanwdbfNmbjoHFtBjTOA5qocSYlk+w1TgsEhqpQS01rFdDuFtjTvhp36i3+4MbgzMH7Sp8+VOr/u3L/d7DUZSn1/13p04dmDt53cGPw1Fu8w8fTSI1Lkf0YRFESEpmCKBXGJSGRKYzrL9xm43J8MBAIBoNkYxVLkg0aBxSgcR7gg2ycuwYbaHcLnGhfjTv4j1+e+fiBysCj8yd+MD+0cWG4B0tdlvmhjfMnflAZeHTm4wcO/uOXHT6eBmpcb4psAFcQzfYmv8gWpEy/u7ZxxKNwktPScGp0VWIpKlWBAjTOA1pC49xm4/RnPetTH9rdAifaWOP+6Q/LRx5ZGO5ZPP3E0jl+6dyPsdRp4RdPP7Ew3FM+8sjBf/pDh4+ncRrH96ZSGbWPqrEWVV74RIbvzfC9Kb43VVOlqmPMRDYOKEDjPKDpGld1vfu2cYTkmcMF2t0CZ9pY42L/ZfaLRxdPP7F0/qfLIz/HUsdl6fxPF08/MfvFowdj/8Xh42moxnWujbhf6n4aoM2BxnlAa40b5zxMCPHkZ9Y4tLsFzrSxxj3RWcluWDrHL4/8XLr4L1jquCyP/HzpHF/Jbjj4RKfDx9M4jQOguUDjPIDty+U4ZrgpkWaqcKWsh8YBW9pY4/j/Whl8bOncj6FxjdG4H1cGHzvI/1eHjwcaB/wKNM4DWuty2WbjzJ2ljEPEod0tqEYba9xT/829xuWFtWHhR9WK/Sh+Z1dsu2OZ/gfDXVzajQxt52hHNB6i/8Hw41F1t/L6H8Xv7LJnbbzfW4176r85fDyN07jUbmKokUSKF1J1PxAADkDjPKC1LhdV4yj93Y1pPEtNK7JxwEwba9xP/3tVjcsLa+2ESHGs/gfDDtakaVP/g+E7H8ybjfBH8TsVpUs/Tm7FpS/+i7Sdsxph+nF5h9GYXEY7urpzcp9NXHSN++l/d/h4PMjGycOO8EKi7gcCwAFonAfgcgEgtbXGPf0nbjSOnl3TUmWEn1kX1bpkuyJfy6YVjRm2NRqYReOMqtfV9XhUz8Zd1DJz8k7Iw5k90lONe/pPHD6exmpcRRIrkihKBVGK9jD39wr8DTTOA3C5AJCgcavNxrleKNWy5mpTVeO2c64qQ7dzMYHQOGVvmgv+KH4nmTL0NEXXdI2Tk3DyiHGFcSm0vkonMgDqCzTOA3C5AJCgcavMxjl4ntn2zPkwS8LMmI0z1r2ujfdbKnAfj0oXozFihdo2Tt+JmsDzupq16RpX/yFFqE1QTKP/autsR5ZzHrOd2Ew9nPMgBdoR7cvILWmsx8WAoY0FGucBuFwASG2tcZturkOlqmkhazlpe9O32s51mUuaNU49NKFxmghSNqfsREnseVidata4TTc7fDzN6qkq9KaE3hQvJPhNQiTKR6IucnWqVxmEyMae3LiXc7EqFldtBh/N0WqduRHUC2icB+ByASBB4+pSqaorl6PGSRejsS6tj4K1ntSUSLO0q7Nm4zSZ638wrJySvpO8sFYWuLyw1uOEHJsaF1BnzhF6U4VxKVuQMielVL+Y2C067pLoOEY4lWMPMVciZ1tIe4Oqa5Zt7PaT5DAWQdOAxnkALhcAUltr3C/+tE7ZOKJ61GRa1jSYWoC2W22sEC6t9UU1aZwpG6e1ojP3VI3GlFpX0kc9Gm3EoHG/+FOHj8dLjSNFiBcSmZNSKislMiLfJ0YEZ42TJEmzNps8mHUORBf1lnb6pVbLJrmA8j/N3Oxzcer0r6oKwuWaADTOA1prFgcAGkQba9wvu+qjcds5XcuqZOP07gv0XqjqtunHyWyfZXgRazbuorGn6vYoLff2o7z3GvfLLoePp1nZuCgvJDKikBKjvWJok9jdU6i+3yQX5HnOZTYuyQU4vmpCzqnGlEtSxm+vbT/6W3T3RG1rI4HGeQD7c6pShnmjpciJRhS4S0HNtLHG/erP6lGpKlePRmPyGnuNU3ZFiJpNTu5f0o93Gdu9ERpnzcbZ9lRt5qJr3K/+zOHjaVbbuEiUr7EDhBxeuaQWZ2Wn4zlarCWyaY5BmKpfOT7I8XzQFPmNcb1a0zj1hGi9LVy22wOrBBrnAU3XOO3JULLTOMcsvmVoX9PdmTMGAgDotLHGPf/V1Wfj0o/rKmYe103NmcnrqV0iTEk4wyghZC9UrQHcnQ/m1fVh4Uc2PVXtzNNWHBuocc9/1eHjaeAsDplsandGnshBSKRWN/xvjg9qmTg9sJKh1xBr9eftKspEH9Wd53M5s8Y5t8LjknqJHB8MGB7soXHNARrnAcxrXI7nqFMv6KuMXaY4Dtk4UDttrHEvdGNO1YZr3AvdDh9PK83ikNQ0zjkbpzZo036yj8NOXRzcaZxujOq3ATEZo1ybCo1rDtA4D2iixplsS6JqXJJTs/KcQzYOrVfBKmljjdv8F9C4hmvc5r9w+Hg8m8UhsvpZHJKusnHWli8O3UXdaxwZ+vWjBgLBYNCgjJSDQ+OaAzTOAxjPxik3bpDPOTzP5fig1hDWXc90AEy0scb1/iU0ruEa1/uXDh+Pd7M4RFbdicyUjaM8Vef4ILUORK/ntL6xsmycJmxywSSnBXvTeMTQuKYBjfMAxjWOuJOTXCAYtISOIJ8zBJQgz3Om1D4qVUF12ljjXr6lkt2wdI6HxjVG4/hKdsPBl29x+HhaZRYH+SFZdTWKGMkuZa9HisnV0DXBdaVqwKn5DPk1oB0cFucF0DgPaLrGOa/XFC3IccEgx8lxgkvKdzT5QGU/UiQ0DlSnjTXuX79WPvrdhdOxpfM/XR75OZY6Lkvnf7pwOlY++t2D//o1h4+nWT1VAWg00DgPaJlx45QRiGzrS7XqV2TjwApoX407dUg4GP96+Yvvzw1tnP/dP2Gp4zI3tLH8xfcPxr9+6pDg8PFA44BfgcZ5QAtcLr3vUZKnZOOSstsFg8jGgZXTvhonSdKpj587+JtbsTRoOfXxc84fDzQO+BVonAcwfrn0aViUVnCuKlW1xnRoBAFc0tYaBzwDGgfaCmicB7TG5bJ0ctckTfvZOtsKl5RQqQpcAo0DXuD18L+7DcP/Cr2puh8IAAegcR7g98sFjQOugMYBL/BY4xKpjPzjVGX50vRyJCrMVubqfiwA7IDGeQAuFwASNA54g9ca15cRK5IoLl8YXx4aneoORet+IAAcgMZ5AC4XABI0DniDxxon9KZC6/nuddHuddHVjxsnSTaDt5lG29XWOdeEWKpKTCvoQwybO66RJ4QxfZkDGucBuFwASNA44A2MdHEIBAKSJAm9KaE3wQuJ6CYh2iNEoi7meFCtyTiVNd2dqloVOfGq47jBLk7IfE4YpIAJoHEesOLL9eyvfuVmqe/ZAtAgoHHAC1jQOE1zeCFRGJcyJyVhtxjtFavl6ojsGCFcjhNaO82z5SLT5ox1/h594+q5QOAJ0DgPWI3GFWlUKpW5ublyuVwsFqFxoFWAxgEvYEHjJDUbF90kZAtSIiPyCTG0qeCqylWxNpv5tMzOluRstIwcdcDgerV2SlM3Vneonhgcjg2gcR5gulzu51eQNW7Hzj3kcvhoNr4ts/HpN8+ev1gqlcwaV8dmFQDUFWgc8AKmBhyJ9gg1z7ia5II8z7nMxilz7ziEfdtsnMt5V/XpGvmc+gPH2ckj8BxonAdYNY5azEHjjgwMycvR7PDk9ak7H4nfcvfze/Zny+WyncbVpVkFAHWkUqkcOXJk+/btLxl5+eWX5X81ksnkF198wWy0aYDG5ePhWNr2R0mS0rEu0xprIetW+XiYtlk4nlfeNCO/k45Z3iBQd0jbntiJ+Zy049r8OnWjKQOOLC8vLy8vl+eXXbV+c0IWJS6p6ZPsdDw1BaY+jdMSbDVk43RPtBpjkuM4Ij1IbmmbCAReAo3zAAeNk/Pu1vUyJo07NjhcGBl7e/fA1+5+/uGNWy9fHjdWqtazWQUAdadSqWzfvv3ixYtllVKpVCqVJicnr16dvHLl6sTElbGxy4XChWz2+FtvvcVstGmGxmkaZKdY4XjepErqVlZhoq6kbW2/1uYkJUlKx+gaJ2ny1kiHk5o34MilS9P50eLqeqrm+KCWidM1TAvipJnJbwT0d8yh3H3bOGJj8/dFjg9ySW2lJX+Hrw8GgMZ5wOo1bujUufMjl4ZOnp2eKd674bVbwy98dGj4zNmzlLZxdWpWAUDdkaONJnDT0zPi1NSNG+Lo6KVCYeRcvnD69LnB47lDH3924sQQy9Gm3hqXjoVjsXBXV1csbc1wEU7kwvWkfDwWz9vlyWJpO/dSd1ijxjlm40jhjMVphRsjcx5rHL8poQw4Eop2ro10r1v1uHH6jDrO2TiyE2qVFm/OD+zEpmaNS/J8TiI1zpiNg8YxADTOA6gaZ/IryV7jPjl87PDAud/u6J+8fn3vgaHb7t380A+3ViqVoaFhG42rQ7MKAOqOFm1KpdLMzIwoTskB59y5wqlTZ4d/d+rEieH+w0cPHPgkmz3OcrSps8bl4+FwLBaOpXXF0vJVxtSWWtydEFG21d3PtBebXJ56eivPxjU480ajxStVKRMjUrNx1tFDiDVOmTjzM72pwpWyvprG5fhgQDNP4wvQeKBxHrDKbFy+cOHRJ5O3hl8YyI18p2fbHZEtH+wfKpfLZ8/lLRpXt2YVANQd30SbOmtcOtYVixuVSFMh5YUiXepruaj5hZL90vZTTePIys4VapxjNk753RqXdrOhlStVJUmyZOMo1aE5PkitRrG1J9tsXJIzVtIYh4gza6RNpSo0rqn4JrCyzCo17tjAYP7CxNp7Xrztvs13RLbc//gblbn5YrF4YWTE0jaubs0qAKg7vok29dW4fDwcjqedNY5c6ZiNI+3M1IpO69dQR42rko3Lx2OxWDiWpgplw2jaLA6hOszikORIVzObmrzKcRRfukBRY7xZ4dTNjcooVc/Ggabim8DKMqvsqfpp/+dXrom/eOnD2+/b8o37e1N7BuVB48bGxuzbxtWzWQUAdcE30aZhXRwc2rRJlNpKSpaLUCujfqkbe5iNI/w0H49bG8c1Su0YGTcOAG/wTWBlmVWOG/f5kaOnT585PzLxzEt7hfi+6ZnytcnJq1evTUxccdS4FTerAKAh+CbaNLynKl3RNI3Lx8NdXeF4WhUjoqS8n3QsHM8bW6VRNK7RbePS8XjesUtFg4DGgbbCN4GVZeoyi0OpVJqbm6tUKvKHpVElG1ePZhUA1AXfRJsGa5zsX+mYOV2lyhmR7VLTdOQ6RcqMFmdpUOcwpImLtbaJOFpKDhoHQAPxTWBlGc/mVG1QswoA6oJvok0DNS4fD2vZNfK12tCtSkWkqlz5eNhYVJO6Og44Yux5obudYf9toXGp3RllVUUi28Zl+rPU9QDUEd8EVpbB5QJA8lG0aZTGpWOWqlSl/jTv1L3BUrNKZOL0bg66G1q1SisVjuerzeEg70vP+llJx4i3HBv9NaZ1nPcal+jLSJIkVaSCaNS4TJa6HoA64pvAyjK4XABIPoo2mFOVabzXOCGREitSQZSyBYOuJVIZ6noA6ohvAivL4HIBIPko2kDjmKYpGheJCt3rzAOOyOvl4UigcaBB+CawsgwuFwCSj6INNI5pWr6LA3U4NrXXGtnmWR3B3WYvTnM4GAaf0gbxrdoymlqG1qGOnAsCg1k1Ft8EVpbB5QJA8lG0gcYxDQsaRw7sXjOqVxlEzMawXI7d7lCsisU52yDpgyZhs4x9BRqEbwIry+ByASD5KNpA45im6RqnKU7tuyQSWy4nxnYncraFtDeoumbZxuFg5regcV7hm8DKMrhcAEg+ijbQOKZpusZJ9cnG2eTBzBqV5ALUgUAN2OkXMbG28j/N3OxzcXppyyxe0Div8E1gZRlcLgAkH0UbaBzTsKBxa35vzcr3m+S0ybH1FXb5tiQX4PiqCTmnGlMuqb9bbZZU22wcMZ+jZqHQOG/wTWBlGc+G/wWAZXwTbaBxTNNcjRN6U0Jvgt+UiPYIkSh9/mxH5LQWl6w+MbZkyKY5ypJd1wSONzdoM7V7q9Y0Tj6hHB8M8smcwQShcV7hm8DKMnWZjIukUqnMzc2Vy2XKZFwAsIpvos0KNU6cLmFp0FL14/FQ4xLZgpTJSomMGIrUqnE5Pqhl4qpMjC2/EdDfccqjUd9O8nyO3i/BdidcUi+hT/qjZASNFa3QOK/wTWBlGdPl4u0xbShr3I6de8jl8NFsfFtm49Nvnj1/sVQqkRrn2IhBub/cPVwR2D/mOR0ONy6w4Jtos0KNG7l4GUuDlqofj5calzkpJTIi3yd2h6Ir2a9pYmzbbJzaoE37yT7sOnVxcKdxujGq3yFaySSn16eSa6Fx3uCbwMoyVo2jFnPQuCMDQ/JyNDs8eX3qzkfit9z9/J792XK5bJ+Nc9GByUURh9jgppkEABq+iTaoVGWa5mpcdJOQ6hf5PjEiFLpDKxry1yJA1GycdXpshwmz3Wuc6blfKRMIBINBgzJSe7FSjg+Nazi+Caws46BxAaI/U1WNOzY4XBgZe3v3wNfufv7hjVsvXx6nVKraZ9uIB6YquTiXGTtk40BN+CbaQOOYprkaF4nyQp8YEQohvrDCmRtM2Ti72EsJsnSTklaRjdOETS6Y5DS7M4xHLJuezZHxbdBYfBNYWWb1Gjd06tz5kUtDJ89OzxTv3fDareEXPjo0fObsWbrG0W4a4l4iRnskzI5LUjZ2eLqTXA88CYCMb6INNI5pmqtxoUg0IoghvtAdXYnGyc/QqhqZY7nmUvaRVzE5t61naqlUtX0+p84moVkoviUajG8CK8tQNc50S0n2GvfJ4WOHB879dkf/5PXrew8M3Xbv5od+uLVSqQwNDVfROOKWpGuc+Z42apz+E/2ByuV4QgDI+CbaQOOYprkat7y8XPcDAeCAbwIry6wyG5cvXHj0yeSt4RcGciPf6dl2R2TLB/uHyuXy2XP51WqcQzbOwdGIIqubIAa0F76JNtA4pmFh3DgAPMM3gZVlVqlxxwYG8xcm1t7z4m33bb4jsuX+x9+ozM0Xi8ULIyPOGkfm0GrUuCQXCASDmotRiuprTdn7IJ9DcwhAwzfRBhrHNNA40Fb4JrCyzCp7qn7a//mVa+IvXvrw9vu2fOP+3tSeQXnQuLGxMUeNM7RXqKlSVf6PSKnRNc44WLdaEBoHbPBNtIHGMQ00DrQVZGAtFkvFYmlmZmZqavry5YmLF8dGRi6ePz9y4sQw+4GVZVY5btznR46ePn3m/MjEMy/tFeL7pmfK1yYnr169NjFxxWH4X1ni5EyZsYLTbReHahpHbIRsHHABNA54ASMad/369ePHj9f9oACYIANruTzb9ZWvPPjAAz0bN8rLc4KQevvtM2fy7AdWlqnLLA6lUmlubq5SqajOrUDROG0yFxVjH6PqA45ouzFonGnQx5UMKAfaGmicM/l4OJaurVg6Fo7n8/FwF23DdKzLipsjtDgsaNw777yzMbrxS//X//3VW75a9+MCQGLSuL97+OHXEol3VPbt2/f5559D41aJZ3OqKqJlOz6Qmj2zdSw7NaNk1yh7IWppkYsDVqBxzlTTOIuWxdLpWDieV96LpY1F1H25tEP/0HSN279/fyQSyefzf/THXd/81l11Py4AJKhU9QBcLgAkaFw1TL5lsDbiDbIYTdHy8bDsdvl4uA1zcQxo3Ob45pv+000r3y/1Sdsw2i6xzuGR2W64AWIAA46YLkLvs4bH8JYClaoegMsFgASNc8BsXHJmTcm0ybJGkTIzmr2ZXugHgcbV+UCmNb95I5lKpXieX/N7awK/t2aF+1U1ztD+pQ6DO1ma2yjqluODHK/uBw2bWw5UqnoALhcAEjSuGkrFqKpbJo0zl7K+o68zahzxPzSuzgeyrnzrrbc6fr/jiSeeWNEuiQQaYWcODWFsRS7HB4M8zwXIMaTkkQUCHK+l3yxNo6mTqgKmQaWqB+ByASBB46pRReOodaRKITLxBo1rqsbFfhILBALXr1+XJOna5LXhk8OSJI2Pjw+eGHS7X20oJ+cqUa00tTWyZndJTtEzLqlWwhoybkme44L6xKku+rABtkClqgfgcgEgQeOqoXqbfTZO8zlT4zhzhs6icaQe+p7matzGjRu/9KUvSZL0z8LmzZs3/1vy3zZv3nzTTTd99auuu6wmuSDPcy6zcUp2jdbjTG8Dl8uZB5PSZlSV7Y5LJrkgn+Q5jguqE7oiFdcimDTuqR//OPX222mVzz77bHBwEBq3SnC5AJCgcVUwyRpF48xdVZVSYeN4I2rWLhyLyRpn0kPf00SNu379eigUko2tcL4gvCh0dHTIVucarQWbWucpOx3P0UYBUPNr1tyZ6mHKcFMcF+A4deQprTMD2RxO6+/AmUd1B2yDSlUPwOUCQILGOZOOdWmDhxjsy+JfWo+HWJqsTk3HwvF4zNIfVXE/Q2cHf9NEjdu1a1cgENAaxj0QfiAQCHzzm98sFArudqm0aAsSHUglwqnM/Q+SXEB/x+hdpp6tmufl+GBQTblRN0xyah2su1MGzcY3gZVlcLkAkHwUbRqgceQQvprGUUYK0RrIaUVicVnkDBWrxF6VtelYu4w30kyNe5p/Ws69ffnLX/6jP/6jZ5999qabbvrSl75003/6cg37TWoa55yNS3LkjybzMrSNM21Inw6bMEJ0bmglfBNYWcaz4X8BYBnfRJu6a5yaUjNkzqhdHMLxPPGjLn6WJJxW2rSuDUyuKRon9ApHPz/6pS99SU7F5fOrSH4mXWXj9EycRFvj1LhN3Y0+7hw5Al2SM44tFzR1fyD6QQAW8E1gZZm6TMZFUqlU5ubmyuWyw5yqALCGb6IN5lRlmqZo3Pcf+f5Xv/rVRx99tA77NWXjzGOCSMpblFpPwrDsxv4ldyMfjFyndnvVdwSNYx7fBFaWMV0u3h7ThrLG7di5h1wOH83Gt2U2Pv3m2fMXS6USXeP0ZysXbRzkoGFM0ANQd3wTbaBxTNP0WRxWAzEBNmUgXnmVNQ9nLFJVsshKVUOHWHOdLWytFfBNYGUZq8ZRizlo3JGBIXk5mh2evD515yPxW+5+fs/+bLlcpmocef9Vvxe1jD2atYJG4ptoA41jmpbWOABqxTeBlWUcNC4QCFDXy5g07tjgcGFk7O3dA1+7+/mHN269fHmcXqlqFjfSzmxGlKRm2wGoK76JNtA4poHGgbbCN4GVZVavcUOnzp0fuTR08uz0TPHeDa/dyp1I0QAAIABJREFUGn7ho0PDZ86epWkcLfvmnJHDJHrAE3wTbaBxTAONA22FbwIry1A1zpQCk+w17pPDxw4PnPvtjv7J69f3Hhi67d7ND/1wa6VSGRoatmicNnGeGacGE9A44Am+iTbQOKaBxoFWZ9u2be4L+yawsswqs3H5woVHn0zeGn5hIDfynZ5td0S2fLB/qFwunz2XN2mcMelmTsFp865YxgrCgN3AC3wTbaBxTMOCxuVGK8lDM29mpnYNzPSfLhfLi3U/OvAx0DjWWKXGHRsYzF+YWHvPi7fdt/mOyJb7H3+jMjdfLBYvjIw4DDhSbUo8Ut2QjgNe4JtoA41jmqZr3G8+muF7CxvjFzZuvsC/Mvr01gubt1+YLsHkgFugcayxyp6qn/Z/fuWa+IuXPrz9vi3fuL83tWdQHjRubGzMVuN0iSOHdSRJGmdeRscG0HB8E22gcUzTFI2LbMrkx6YlSXr6jTORTdm7nj7evT7TvT7Vtf6925+88PTWC8++MVT3EwB+BRrHGqscN+7zI0dPnz5zfmTimZf2CvF90zPla5OTV69em5i4YqNx1on3rIk54zrDhHuoYAUNwTfRBhrHNN5r3OzcYoTP8G8MvfHhaFTIhvhsdzTTvT7zwNOHvs3v6Y4kQnzh2TfdahwZm5McMcoAOYqUHLD1dXrQR+WKDzBp3CNPfOJQ2DeBlWXqMotDqVSam5urVCryh6Vh1ThSyezHETGO3a2OCg6LA43DN9EGGsc0TcrGZSNCIdor3vWs2B1JdUdSv919RpKk8evFrvu33v7k8X/+7SWXu01yQT5nasTMJa0P54EgnyPn1VL/Rwhvfawa9+0Hn7cr7JvAyjJezqlK3vymweOM87tYn9dksUMIAI3CN9EGGsc0TdG4EJ8N8YWIIEYT4vf5dz4fvqK91b0+c/vG4/+cdKNxhgCd4/mklOM5wwz3ltgtCxz5L2h5qBp3+7cepxb2TWBlGVwuACQfRRtoHNM0R+N6sp3RQogXo71iRCjkx+a1t7rXZ25/8sLzqcsud0vNxnGcnnujjQMKgfMVdhrX/fW7rYV9E1hZBpcLAMlH0QYaxzRN0bjuaLY7mu1en+mMpDrXpTpDylsXrxS712dCfGHHwTGXu6W1ZVbqSrW3lK5rlvGjMBOPP0A2jjVwuQCQfBRtoHFM0/QBR+bml7TXn2ZHunsKkU0F97uVZ6znuCChZckkx1nbx1FbwiEv5wPQNo41cLkAkHwUbaBxTNN0jSN54CdHQpvEf9ubd7dLOb2m1J/KhqZoWY4PKjWrSjmlELJxfgQ9VVkDlwsAyUfRpmEal451xdL663Cc8uWfj4eN69OxLhltU7KsdaX9IX0CIxp3RVzc1X8txIt3bTxe026TnNnQ1D6oAXLIEcXtkI3zIxg3jjVwuQCQfBRtGqVx6Vg4Fgt3UVHVTbY4Td2o9qbhQuMkKR2j6mLrwojGHT9bDm0Su6PZfZ/XUKMqERpnyMYZJsxWR5VCNs6nQONYA5cLAMlH0aYxGmdJs9kUMoiZRdRIwbNClTpXB24hGNG4g7nKb/aOTRXnat0tLRunzYitjhulKR6ycX4EGscauFwASD6KNo3QuHw8LGfc8nFKPk7VL0tNK0XjiALGd01lCXtT3rGrx20xGNG4FSHLm6G+1NgoLskF+aQ2wyKpcbr3YfDPlgcaxxpeDv8LALP4JtrUX+Nkd6vmUPl42FxoZRqXjnXF0pQknD/ycq2scTo5PhjkeYzJ3p5A41ijLpNxkVQqlbm5uXK5bDOnKgAs4ptoU3+NS8diaUXAbLNx+Xg4HI/HwvE8tYiigW40Tn5BdTY/9Hjwh8YB4BLfBFaWMV0u3h7ThrLG7di5h1wOH83Gt2U2Pv3m2fMXS6WSQeOUeVuIHupJYo5VopjeZhatY4FX+CbaNKZtXLWuBulYLG0ptJK2cYq/0VNvPqhYhcaBtsI3gZVlrBpHLeagcUcGhuTlaHZ48vrUnY/Eb7n7+T37s+Vy2TqnqjxIJG/u52QuJNFGC7cqHwD1wjfRprEaRxMxYhiSVVeqqvpm1Ti7utYWAxoH2grfBFaWcdC4QCBAXS9j0rhjg8OFkbG3dw987e7nH9649fLlcVOlqrX3OZc0ZtzUxhbymxyyccBDfBNtGq1xNLsyFVJxHlKE9q6maTSNa3GBk2FH4/IXx3ghwW9K8L2p9Kdf1P0EAJB8FFhZZvUaN3Tq3PmRS0Mnz07PFO/d8Nqt4Rc+OjR85uxZatu4JM9xQaVZLDFiJJFos8/GAdA4fBNtWM7GGXB+17wvP7SLkySWNC7SI3z0SU6SpFK5wguJwVOFSA9zf82g1fFNYGUZqsaZcmCSvcZ9cvjY4YFzv93RP3n9+t4DQ7fdu/mhH26tVCpDQ8MWjdNGF+KScsd0juOC6jiRZM90k8bRhh8CoL74Jto0PRtn0wCOlnlzljxrFwkf4LHGXRo9k+oTyGXw2H5r4cFcIbReCK1n7q8ZtDq+Cawss8psXL5w4dEnk7eGXxjIjXynZ9sdkS0f7B8ql8tnz+VNGqdqmaxpWn8Hjs8ZM2/qvH08rVIVvdtBg/BNtMGcqkzjscal+oRCNiGKKVFMSWJCGk+kEsLwcbM+yw7nTuOqPVZTO6ehZUy74pvAyjKr1LhjA4P5CxNr73nxtvs23xHZcv/jb1Tm5ovF4oWREVqlqiUCJDm5iZxh8hbTfHzIxoHG45toA41jGq81LiGIYkJzOGk8IZ2MJhJCopdP9PIJgRcEXtgUrWXHWjym+RrhaMZmMWgk06b4JrCyzCp7qn7a//mVa+IvXvrw9vu2fOP+3tSeQXnQuLGxMUs2jppXy/FBY46NGImEN/eKQCAAjcI30QYaxzRN0LjxBOFwvHQyYlrca5whiFOitqkwNA74J7CyzCrHjfv8yNHTp8+cH5l45qW9Qnzf9Ez52uTk1avXJiaumLNxOXKSFu2pLclRA0KODwb5pDE2IBCAxuGbaAONYxqPNS4ha9x4QhpPZFJCJqU2kkvwqQSv5eQSAi9scpmWcztVKjQOSD4KrCxTl1kcSqXS3NxcpVKRPywNS6Uq8TTHJeWfZGcLGLs4JLlAkM9ZxihBIACNwjfRBhrHNF5rXC8vFgRpPFHo51N9glTgKcvJqHQymu0LvfHyStvG6RpnHVjKAsJ4O+GbwMoyns2pak67JTlTQ4qAPkkfz6kjkiAbB7zBN9EGGsc0zdG4gpDqEzK7BelkVK9OzUakbEjqD4m7uwuJzo3rbx8tnHOxY03UiHCMbBywwTeBlWVwuQCQfBRtoHFM47XGCbx4ktdTcdmoKnARqT8kZrrF3d1iqpNf3/HGlo1V96nWpripVDUl7aBxbYpvAivL4HIBIPko2kDjmKYJGpflU31CNiNIJ6OawEmZkCxwYl9ndtOayNqOi6MFdzt22TbONHciNK5N8U1gZRlcLgAkH0UbaBzTeKxxwiY+m9FScRGpP6Qk4VKdYl9nIdGRFdbw6zu+/8hDrnfsSuPIbmySJEHj2hbfBFaWweUCQPJRtIHGMY3nGhdNJYRsKpoVAvKSEQKZTWtS/JoUvybR0yFEOyJrO/bt2+16x9U1ztBnTQEa16b4JrCyDC4XAJKPog00jmm81ziBj/A9ET4aikZCkXXdobXd3Td3dnZ2dHZ0dPz+mjVr1nSsWeNyn+QA7YYVAcNQA7S+qNC4NsU3gZVlcLkAkHwUbaBxTOOxxgHQXHwTWFkGlwsAyUfRBhrHNNA40Fb4JrCyDC4XAJKPog00jmmgcaCt8E1gZRnPhv8FgGV8E22gcUwDjQNthW8CK8vUZTIukkqlMjc3Vy6XaZNxAcAovok20DimgcaBtsI3gZVlTJeLt8e0oaxxO3buIZfDR7PxbZmNT7959vzFUqlkr3GWYYWIN9SJuCiz8VE3AWD1+CbaQOOYxmONK02NpvoEcrkyPlL3YwFgh28CK8tYNY5azEHjjgwMycvR7PDk9ak7H4nfcvfze/Zny+WyQePUiVzsIDuxU/umm4YFB6CO+CbaQOOYxmONS/UJ4nhKElOSmBLFlFgQUglh+Hi67ocDgIpvAivLOGhcIBCgrpcxadyxweHCyNjbuwe+dvfzD2/cevnyuLlS1XHgIGX4SG0UST1bl+QC+itoHGgQvok20Dim8VrjEoJpSSSERK+Q6OVNS26w392O7R6zVdw+r9uVU3dOmeBLWW2a19V4QvTpXaucjt2Xk/k7x/S7O18K2yonyXpE/365+SawsszqNW7o1LnzI5eGTp6dnineu+G1W8MvfHRo+MzZs85t4+g3gG5zlHvNv3/poPn4JtpA45jGe42TxAyxpCQxJfCCNC5IBUE6yUvZqNgfFTMRPhpxt2MtdNM8jIjQRlGxihJdnci1hJERx7JsZdwRXeOoOyV/oH+7mNaa9m0jmsbt7fxQWa+88O+Xm28CK8tQNc50a0r2GvfJ4WOHB879dkf/5PXrew8M3Xbv5od+uLVSqQwNDVM0zv45TfkTNifltM2gcaCx+CbaQOOYxmONSygap1Sq8j2CNC6E1vJSgY+EeDEbETMhcXco29vhRuMMAbyKO7nQOOdsnGG/9nU5OT4Y5JN2+Ta1oXVVjVMOYXdSXNL6yxuzDUE+55j1I385/YTU38u/X26+Cawss8psXL5w4dEnk7eGXxjIjXynZ9sdkS0f7B8ql8tnz+WpGkdO2UK+tmic9S7y8V86aD6+iTbQOKbxWuN6eU3jpPGENC5EInxoLd/dzYvZiNgfEXeHCn2dGWFNNBJyt+Pqc6rKrD4bV3015WxWVKlqB/mdo5+CfEzDKdkkEemnb2wyRDc93+CbwMoyq9S4YwOD+QsTa+958bb7Nt8R2XL/429U5uaLxeKFkZHVZuOSnPx8Q9xG0DjQKHwTbaBxTNMUjRPFlCQm+KgQCvHdN/NSRers4Ds6+M6OqJjqLvR1ZjatiYTqonFuMlIc5yJrxXOk09j5TpJTylC/W5Stq2bjkvqxjA5mr3EcZ6oxcmqeZzZa5RuPOC//frn5JrCyzCp7qn7a//mVa+IvXvrw9vu2fOP+3tSeQXnQuLGxsVVk4+SyAS6prUhyQZ737V86aD6+iTbQOKbxWuMEXk/FFQSpwHd3852dfMfv82ImJKa6xb7OQqIjxa8JdXe727Emas79Cqpk4wyh3i4Bpb1DfF2Qh8rxwWAwqGicXlTrJmde5fSDfhaEUhk1ziSIlhpZ8pczXhzTT7IDtkeOwjeBlWVWOW7c50eOnj595vzIxDMv7RXi+6ZnytcmJ69evTYxcWUV2Tgpxwe1ZyOthH//0kHz8U20gcYxjfcaJ44r1alSgQ+t5cVstKODFzOhNb/Hi32dhURnobcjxa/pvrmz6j7VAO6mUtWUtKNonH1+zqxW9Id+SUryWt1mlWyc3ReP9ViGYzhVqhrep/x6ehFjn1TeWMmkXVmffrn5JrCyTF1mcSiVSnNzc5VKRf6wNFaWjdOHGJHstgagzvgm2kDjmMZjjRM2yRonSAVeOhkVs1GxP7JmDS/u7hb7Ogt9nYXejqywJtHT0fmfO9zt2GXbOJOYVMvGkUk0sznZV4qSO87l7LJxhlOpno2z+SVoGkdUy1I60NKVV9vITR+P1sc3gZVlmjWnquOAI5aVpgcnAOqNb6INNI5pPNe4qFhIiNloYXeokOos9HVmEx2Z3o6M0JHi5WVNoqdDiHZ0dKxxt2NXGmcZM42ucYTJcDwfNLecUQXPqVOs1teTl6tXkxwlL0iscqdx2onpZekaZ39N1F1QvrWqZuMM1VHGF62GbwIry+ByASD5KNpA45jGe43je6LRaCQSCYVC3d03d3b+546OjjUdayiLux1X1ziacpj7ABCKQ1SdkrkopVA1dyF3TK30NdVqUjXOzbFsR1uRTBamFDQOeWfYABrXgoGVZXC5AJB8FG2gcUzjscbVF1W/yD4GZq+x8Q2HJjFJTm4bR8qcMlKB4RD0Vm1JTh82Tj0vpybVskIZ+2m4OhYlG0cmE/WBsqiVRgZRRNu4FgysLIPLBYDko2gDjWOaltY4AGrFN4GVZXC5AJB8FG2gcUwDjQNthW8CK8vgcgEg+SjaQOOYBhoH2grfBFaWweUCQPJRtIHGMQ00DrQVvgmsLIPLBYDko2gDjWMa7zUulSkYl2xqdzaRyvYPjtb9oACYaFxg3Xfg47ff++Ctd9/38fL2ex/sO/Bx1UuBYA6ABI0D3tAUjbO+m+jLdK6NwORAo2lQYN21d1/m0KdT09OLvmZqejpz6NNde/c5X41mDf8LAFNA44AXNEPjstZ3hb5Mpj8LkwONpkGBdcfOXdPTMwsLC0Vfs7CwMD09s2PnLuerUZfJuEgqlcrc3Fy5XC5aJ+MCgFWgccALmqBxu2kal0h1ro3IS407pk/AY4Uy7K3xLXXEOdOEqtpwbtr8DJSZVV0fqm7nDFZGgwLrW+++v7i46KVRNYvFxcW33n3f+WqYLhdvj2lDWeN27NxDLoePZuPbMhuffvPs+YulUsmkcYaZTyi3bZU5jHF7gcYBjQNe4L3GJUwaVxEz/RkhkeAFQRCE7tCKNY42J6g8v6ghWpuCumkmLepsV8aflf8th+OSxtkgrMci19ftnEFNQONWyco0jlrMQeOODAzJy9Hs8OT1qTsfid9y9/N79mfL5bIlG6fdqKY7lnjeUu4Yy5x8rh+oAFgB0DjgBU3QuBShcRUxtTuTyWQK42JhXEykUpFotFgqu9yn7XxUhmkJTMGdfE97neQCwWDQ9undMEmXPrMqT53rgDiA6TwC5gnoV3XOYCVA41bJKjUuEAhQ18uYNO7Y4HBhZOzt3QNfu/v5hzduvXx5vGioVCXuVCJfTkmbKzew6ba2zpAMQD1plQ5VVbsuQeOYphkal9FWZvozmYzyo1iRCqIkJFI7duyoZcdV51R1qUT6XKemPerfAtq3A8cFg3wul8vJ3wyWB3wHjavrOYOagcatEm80bujUufMjl4ZOnp2eKd674bVbwy98dGj4zNmzRVrbODXJ5qBxvCJ85gnsoHGggbRKh6qqXZegcUzTBI3r0zVOSCQK46IkSWJFEkWpMC6lMoXHHnuslh27UCLDA3jSokTmKkte2aPyNVDVm9RvEXMWz3isGjWuyjmDFdIEjTvx7rPCu8eLxWLxREp47lnzIr9VLBZHD7ymvWaXFWucKRUm2WvcJ4ePHR4499sd/ZPXr+89MHTbvZsf+uHWSqUyNDRctGpckiPnM3bIxkkScY/q1azQONAoWqVDVdWuS9A4pvFe4wRS43oThXFRc7jsSTGRyj709w/VsmPjrPLaupozW/JrZWZ7usbZtpUmvUr/VnHMxtXlnEHNNCcbN3roVYFQtBPvPvvOCWshNxo3evB1YtvRA689R+7q+DvPvXpw1HX0XgkeZOPyhQuPPpm8NfzCQG7kOz3b7ohs+WD/ULlcPnsuXzRpnEHLasjGqb2H5Ly6828DwAppody/830NjWOaJmhcIqWtTKVSqd2ZgigVxqXMSTGVFaM9/BuJNz49WGVEAxk1Z1WXCsocH+SSSU7uqWCrcRSDMveLkHu6WhN5xrZxqFRtDiwE1uPvPJeyWpxZ4wypO6X86KFXXzuka9rooVdfe90giMXRA6+9fqCRIueBxh0bGMxfmFh7z4u33bf5jsiW+x9/ozI3XywWL4yMFI0apzx1Kc9fPCe3kDM2lbN5DpNXIRsHGggL0aYu9zU0jmmaq3GFQkEQhERfKpXJJlLZaA8fWhdKCZFUb9SlydWvnZkh2CtfB1zS/IZhbAOte4S+Vm41Lesal0TbOObwPrBqGbLj71hrVJ97Vnj9wGhx9ODrhpXvnCgWT6RUYxs9+LqscSb/Gz34+qsHR81SSE/11Q0Peqp+2v/5lWviL1768Pb7tnzj/t7UnkF50LixsbGitVJVvyGSXJDPyb2V6BpHbpWjtYMFoJ5A44AXNFPjKpIoitmTWaFXiKyPRtZHIutCQrS7kOiW+iMJIXrm1KCLHdegREnOoZ2ZKdgrD+6G+E9+YQSMGqf0XFWayNWxi4PjOYOaaUpgJes6ldcU2TqRkvNqo4depWucKdOm/nji3WfNKbpDlHzc6KFXBZtEncNbNYZ7mVWOG/f5kaOnT585PzLxzEt7hfi+6ZnytcnJq1evTUxcKTppnKQ2aTA+BSkF1Dy4+ZaGxoFGAY0DXtAsjRMSKevCbxKioc4s31no7RZToej6kIsdV1MioiJFT65RGqcZ7Ut9J8mZ6z/VNw11qSZHcz1u3CrPGdRMUwPriZSg+9zowdcN+lVd49QCSnHN3k6kDBJmLGZg9MBrpn4Vbt6qIdzL1GUWh1KpNDc3V6lU5A9Lw1bj9NvWOJKc6cFH6z6kPHPhdgKNAhoHvKApGqdN2GBduteGIqHOTE93ZG3n0c+qTN2oig1Ff/TYrA8kopUxZ7PIwXaJ2lLibS6pBX+bIXkDtHQZJRtXr3MGK6NZ2bjUQT3jpVWSFkcPvaq1e9O8zU7jjGk2SoZPwUXzOMNxXb/lItzLeDOn6uR/+I8rWCz9k6BxoFE0XeOeFZ5zU6zqfQ2NYxrvNa4qg5/t6+7s+Cyzu+7nAEAzAqvuVXJrttGDr6cOHnr1tUMHyGZtir25zMZZxy4h32rVbBwVOyFzu73xIcil7dXx/EHb0lyN04JD1ZJV72toHNMwqHEANI5mBFZNyBTBGj34eurE6IHXXj9wQh+IRM+onXj31YOjNhqnptn0sejUQ5C9Wakq1ry2cSujuVIFqwOrp4kaZ+pKtcr7GhrHNNA40FY0IbCqaTY5FVdUtUzLzL16cNTgXprGWQYc0TqlHn/nOVMPCX0Nez1VVwZT8gSfAyugWRpH6xFfxeSgcS1M0zVuulhOpDLkMnH1Rt2PDoCM94FVs7diUc6iKYOMkEX0Pqf6u5QBR2x7oVp31TC8r1RlClS/Avc0vW1cve5raBzTNFfjpovl1O6sKIryj2JFEkVRSKTO5C/V/QQAkFoqsFKRZ3GgPm0/KzzH5iwOtdJChtQq5wmaQgtFG2hcC9NEjavMzRdGr1UqleXlZamiOFxhXMyehMmBRtFCgZVNVq9x/uth0NInDxpHC0UbaFwL0xSN6x88Hd2UiG5KRHnh6OBwZWFZFKXCuFgYF7MFMXtSzJ4UhV6YHKg/LRRY2WSVGtcOouP7XxC4hIw2xWKpWCzNzMxMTU1fvjxx8eLYyMjF8+dHTpwYZiHaQONamKZoXHRTYse+o9duVHZ/NhzlhWs3KtmThUy2kOkvpDKFxO5CIpUV+rJCb8phhxZsB1ezndHefpYGW0yzZBnHAAbsA41bJavRuHZwOBkk54BkjDbl8mzXV77y4AMP9GzcKC/PCULq7bfPnMmzEG2gcS1MczSOF04XxpaXl5eXlyNRfnl5WS+n1K5KhXGxc22kyk61MXmrGpoZYqIGw0p9I+s02pJ5eHhoXOvRII3bsXPX9PTMwsJCfWMraywsLExPz+zYWWW+YweNc96wpuF/WwWYXNti0ri/e/jh1xKJd1T27dv3+eefr0Dj6h5tqt7X0Dim8VjjonxCkqRoj3C6MBaJCsvLy6H1hMbJDhfpzq7tyPQXXGmcwbtsfjBCMThLvk6ebkGfCEsrZrQ4aFzL0SCN2/VhOnPo05mZ4qKvmZkpZg59uuvDtPPVWI3GUb9mKpXK3NxcuVwuWifjagWQlmtPGlSpWvdoU/W+hsYxjecaJ0iSFOkRThfGZIELRVSNU/Nw2bUdie6OVKYxGmeqFdVKB/mcupH8nzahtmHaLPkHWhYQc/q0BFpgnZmZEcWpa9cmr1y5Oj4+8bvfnT5xYnhg4PiRI1988unh9P6DNQVWSZLe37tvx85db737vo+XHTt3vb+3yhR51svF8zzP85P/4T/yFkwbyhq3Y+cecjl8NBvfltn49Jtnz18slUoGjXPMx2t5dP35S4sLSc6Yr3fekd0kybXd/ZC5dqNBlapSvaNN1fsaGsc0HmtcpEeQJCkS5U8XxkIR/nRhrHtd9PS5MaEvIyRSQiJVGBcLBTF7Ukztdqdx1UOveZNaNI4src22SkynjWxcqyEH1mKxKDvcxMSVy5cnLl26fOLE0MDA4JGjX3z22ecHD326L32g1sAKNKwaJ9FScQ4ad2RgSF6OZocnr0/d+Uj8lruf37M/Wy6Xqdk4421tvsn1nw3vmKcu1iDucMsbtPudGlTsgMm1Dw2qVPUeaBzTeK1xUV6SpNB6/nRhLLQuerow1h2K5s6NCYmU0Ks7XCYrJlLZemTjnLo36A/SDpWqakTP8cEgxxFpOusJgBagUqn09fVdvHhxamrq+vUb165du3r12pUrV8+dy58+ffbU6TMnT54aHj6Zyw0fPnxk69atzAZWlqmXxh0bHC6MjL29e+Brdz//8Matly+P21WqOmqc/qOLTkxKMVuNW0U2TgMm1yY0qFLVe6BxTOOxxoXW85IkhSJROQ+3vLzcHYroA46oDpfJFoS+umgcZZPaKlXVTZI8n7PuFBrXalQqlc8++6yvr+/FzS86L1u3bv3www+ZDawss3qNGzp17vzIpaGTZ6dnivdueO3W8AsfHRo+c/bsSjSu6qOcJSI0NBsnQePahsZVqnoMNI5pvNa4CC9JklyR2h2KXrtR6VwbuXZjWhttJKWNNuJS4xpbqWrcRF5ld1A0jmsFKpXK6Ojo5cuXJycnbxCIoij/qzE1NTU9Pc1sYGUZO40jbxfJXuM+OXzs8MC53+7on7x+fe+Bodvu3fzQD7dWKpWhoWGjxrnLteu7d6tbjc7GSTC59sCkcU/9+Mept99Oq3z22WeDg4PQOLBaPNa47nVRSZK6Q9GX39jdvTaS2nOwU/2XulTZqX02jrpC3qQGjePlqG1fJYNsXKsBjfOAVWbj8oULjz6ZvDX8wkBcVceYAAAgAElEQVRu5Ds92+6IbPlg/1C5XD57Lr+iSlUFqoNRb99GZ+NkYHK+B5WqwAu817jT50cPfjbYHYqcPlc4fW60uqu5xRxi6bHYTuMswZ0SsaFxrU/jNG7fgY/ffu+Dpncmbejy9nsf7DvwcdVLsUqNOzYwmL8wsfaeF2+7b/MdkS33P/5GZW6+WCxeGBmx0TjTvW53k3M8zxmKraCLQ11T8TA5f9Og4Y0kSfr1r3+9cePGaJ3YuHHjr///9t43KI7rzvful8/L+/J58VTKW4GSqmY3xZutSq11vdy7uxFot8zc3TteO7sbj7PZXK6tP3137wC+tRX13apoieKIRnJkZROksWMSPHbkRlYI/ieNJWFhWxKDNMIEhNxCSBpggIaZwQiU9POiZ3pO/50eGE73TH8/dUr0dJ8+3X0QzYff+XfsmM3loHGehrLGXfh0tDHIXktOyLJ8fzbdGGQvXB6t1CUM71jzDjIm3qV9besbVWXtARJoXLWxTRo38N6H8YsfL6+sVGomJ2+yvLISv/jxQKk5R7aocR8PfzqXln74k/f3PPvKXz13Qnh3VJk07v79+xYap/s5NNG4wo84OWjVUr7oRONkaFyts00a94PDh7u7u1OpVKV+rlOpVHd39w8OH7a6IjTO09BfxeFackJpMG0MhgfOD1f8QgDYsE0ah1UcSLY4b9ynn12ZmJj8Ynr2pZ+8x/d8uJJZTS8szM+nZ2fnsmYaV5zQMY9Bq8gchT/obMzLTOPK7YfnFJhcDbNNGheJRObm5tbX11cqxPr6+tzcXCQSsboiNM7TuLIYFwBusU0a9yusqUpgWl1OfIVcxSGXyz18+HBtba3QtSiPTuOSXMDgT8aVj9XPygClQCBgp12W0TjV5oqDnqx72DkDGlfDbJPGsSz76NGjSjmcwqNHj1iWtboiNM7TQOOAr4DGbZHt1riy1lQ1czjZOMlvKKbG0kjhKkpYqcUgGLUIc72LhTbfPw4mV7tsn8ZtbGwsV5SNjQ1oXLVCWeOifXFd4pUUFfTphMCfECp+G8DnQOO2yLZqnG9B5dQk26pxxl/cWwEaV8XQ1zhZluMJSZbl+LDY0BSOD4vSmqz8G+2Lq9vK0YrfBvA50LgtAo3bDlA5Ncm2atxSRYHGVTH0NS4+LMqyrPzb0BQmvU05qu6BxoGKU50ad/ejV7uP8N1H+DPX7148xXcf4btPXbirHLve3y3cyGZvnDnCF/IQZwk3Knwr0LhtAvVTe2yfxq2vry9UlPX1dWhctUJf46xm+t3M9L8AlEnVatyZ69kbgqJx/TeyN86cunD37oXXTl24W9S4/hvZ7A3h1YuK39298NqpCxeFotUVyrrw2pH+G4Qadh/hu48UzrreXxREU6Bx2wTqp/bYVo1LW2PavdMmfzqdhsZVMZQ1ju+L51tUE/l4W3RQVFOwIy6tyWoqqXH6AWUWHZ6N07vZrpBtWYq267TNaDbgJs9/b8jmaI1r3I0zioTdvfBa3szyeqeWdPFU3tg0sbrr/d2FbHc/evW1j6xFDhq3TaB+ao9t1bh5W3QOZ595fn4eGlfF0Nc4Wdb0frPUOMlJo6riUpbjzBTPMgqXXuNKDVQrZCY0Tn8KZgH2Cs9/b+ipfzxqdbSmNe6iYmB3L7xGNK0SSqe2wObLJJpcSdvTmZ8WaNz2gSqqMbZP41ZXVydLof5yKplzcnJydXUVGlet0Na4qEAOU21oCgc74mTSHS1dLrmCvblLqfstJvAMcMmCnulnCQ3FClfQnBvguBChbobZR4GbKBq357//i+lR9zXu7sVTvEWXNfND2tZPIp16VadxZwT+zPUbZ47wr53SniL0nzny6sW7mkgbqXF3P3qVaEstRuwqqXEyNKUUqJ8aY1s1bsIBDMM4yTYxMQGNq2Loa5xuLCoZfov2xSVJVlNZfePUkJsu0lb4qAnJGRtViVk9i1aW36lmLZRROL0QkYPDeQlV4xq/8U3jUfc0rmBjJoZkc0jNUF6jav60C69ppfCGoB0AUfA8XSvqDWOPOmgcBVA/Ncb2aVwulxuvKLlcDhpXrdDWuBOCbiyqInBKUjVOlGSxPI0rTtSuVTS17bMgaGYNpk4m/5SJaB5RVigUgsd5Cy9G48qOwG1W47I3hFfPCGbRO+GGLsxWjMYRHePUQ5bd46Bx2wfqp8bYVo0bqyjQuCqGvsbpmk2NEwKX16iq9Fezbi+VZTnJcSU1q9DyauhHRzbahkKh/PLaOnUz7ADu4dW+ccSkIWUcUlDCY+WNVM06iMYVjt4QNCq5XdE4GaZiCyqnxtg+jctms8mKks1moXHVCmWN44zROCL8Fu2Li4Vtp9G4JBeyG75A+p2uh5umQVTROMPxUIxolA3F1CEOhvgdBq16Bq+PVN1EZC4fRbuhdH07deEu2Xiqmzfu1IW7qofdvfCacEOna6Z94zTDILJ3L57aNo2Tt01WOGu243LbATSuxthWjbteUaBxVQx9jdP3jduaxhUtTuNb+sWx1dzaPnGa8RGBQEBZXVE5M7+h9oPjuKRMapw2GgeNqxLc17jyUaJuipwJ/a99dDdrrnFKw+iNM2pUT43Gqc2mliNVlYigWsI2jFRVWfj/6rbDV6x0zVLjipH3/A+5bj4h8s+5UIjGn23QuBpj+zQuk8mMVpRMJgONq1Zoaxwfrej0v6rFGV7JZOuougQ2Z6dx6hEl1GbW1Q4aV/VUo8Zd7y8s3vDqa6devXj9wmtK1O3uhdeKAxR07pUPzhm6uNmOQlVybNO8cToqriykrjEMY7qfhHhDEH8CagXNYoLJWGh7elBA42qMbdK4SCQyPT2dTqdHKkQ6nZ6eno5EIlZXhMZ5Gsoad/TkADnBb2Nwa+s0EBOFkM6mjjMNxWIh8k9n+0ZVrmB76jBVpdeducahUbUqqUaNqyzKKg6mM5gc4bu3bxUHI5UNy5WpceRfYsQPuebnneixQb5itsvioHG1xjZp3OHDh7u6umZmZjIVYmZmpqur6/Dhw1ZXhMZ5Gsoa9+XaQzLYxnZGt1Jm3qqIeUC0SmUIktk2qlqCaFwNAY3bIhXUOIVKuYuia7qfXdlK44pD25VPgVCo+Cee+lNuOkfRNv20w+Fqj23SOFmWOzs7I5EIWyEikUhnZ6fN5aBxnoayxgHgLtC4LVJxjZMLYTk1lXWuSjnRuHyQPkZG5/URtmLoPkB2i7VfyW+zbFN/QeAu26dxlIHGeRpoHPAV0Lgtsh0ap2NzPudc45JcIBAKkTMLmSyQHAvlo3KKwG1nNwoIXK0CjQM0gMYBX7FNGnf6nYGVlczGxobblrW9bGxsrKxkTr8zYF8blfph10XpbJJczkjVGMcldeJmCLGRs0Qaja2CETk4XA0DjQM0gMYBX7FNGjfw/rn4xY8zmeyjmiaTycYvfjzw/jn72qD/w+5Q9Yro428mKzLHihrHhbSBOM5i/eZN3O3mSwGeBxoHaEBZ44S4KMRFIZ4Q4glhMBEVEpO371X8WgBYsU0aJ8vyr9/78PQ7A7868+saTqffGfj1ex+WrApvvsztJU+znB8ZhjOLxplIXzn3sOVHAdUBNA7QgL7GkTujQjzMRT+/JVqcBECF2T6NAypVUF2G3nDOG3C3klx7XuAG0DhAA+oalyB38n3x+HAizPIwOUAHaBwFqqC6TAY1yOq8Q0qkzSQapw50wARDwAHQOEAD2ho3mJBlOT4uCwk5IUp8VBCGJSEuCXEpOijxgsQL0tj0alklJ7mAoxYOk8YR83c5qGGgcRRAdQEgQ+MAHShrXFSI5z+vyZIkiylJGJbIbFyf1NAa/3R80Wm5Jgsz6GfuzcuaRuOUD9A43wGNowCqCwAZGgfoQFvj+uKyLEeHZX5Q4gSRjYrRuEbj2BOSMCw1PC18mpxzUGosFAiYm1hR2owLNIRi0Di/Ao2jAKoLABkaB+hAWeP4vrgsy9KaLEmSmJISohQdFGVZ5gWZF+TEuBTmxYanhYanhceCpdfpioUCXNJyGS11uVV1vS1E4wA0jgKoLgBkaBygA22NiwrSmqzE4dioyJ5I8H3FwQ3SmiympHhCigoJJxony7LlCofF9VZNDY+DxvkTaBwFUF0AyNA4QAcXNE6SE6KUGBfjCTE+LHJRUZZlrk9iT4hhXgxyiSCXiAqJx5oca5xtNI7MiGgcgMZRANUFgAyNA3Sgr3ENTWEysXx+ChJF7+IJSYhLUSH+WJPzeyjO3GmGMSCHvnH+BRpHAVeqi7OG/s0AIEPjAB1cX4wr3JmQZVmNw+WjcX3ONa5kNK7QO67YzAqN8y/QOAq4pXHl7He4LCqZLRYKcEmr+Y1M30OVWngVVCfQOEAD1zUu2BGX1uSokCikeLQvzvfFH2t0cA+xUOFVGQsRb8xYiHyBmmqcegga5y+gcRRwXeMYhjHdT1BK4wxaFoqp3TLya3GRWQplObRD4AugcYAGrmtcIxtXh6Y+Fow+1sQ/1sQ/1sg/1li6KSTGEQ5GvFO171FC40KhgKbTHDTOd0DjKFCFGqexNuKA7q8+g6KprxCTwVTwOb8DjQM0cF3jtgT56tRF44wvUs0Qh8KZsDifAY2jgIsapzMp2Uzj9MalRNY0nTDsZxUnXh2kxmleJgjLAWgcoEJ1axwAZQKNo0A1ROPyDaMF3dJpnD6X8Uhxn1bjiK/QOL8DjQM0gMYBXwGNo0ANaJxpG2mxe60aeIPGAWugcYAG0DjgK6BxFHBd4xzsL3ibdTRO9Tld5zh9hM6gcaQeAj8DjQM0gMYBXwGNo0AVzBunkzUTjdMPVc3nCmjnG1E72YZCisbp9BD4GWgcoIEHNW56ZvH48Yt8Z3wsKZbODUA5QOMo4P3qKs4Yntcui75xxIiHUIxsTo2FAhwXMoxHzbsfRk4BWYbGATp4TeOSyfs8H+d5kW0V2FZMvw4qDDSOAl6vLnIKX1XjTGYKUTvIqVlCnCJymoZVotT83uKElsDPQOMADVzXOFEUhQJXRyf5ToHnE+FwovHr/J49rRW/DeBzoHEU8HZ1FUJqmsiZ6RCH/Eov+Y9F8TME4dTcun0wOX8DjQM0cFfj5u7fFgRBFMXEcEIUxWg0yp+Iqw534cJlBwWT08E5m85XOUOz1IPJuDS1IM18c6DKgcZRANUFgAyNA3RwS+PWH65+du54XODEcUEQBCklxYcT4rjIcVw4zDl2OFljWWadku3OKLaMmMzdqSyfqC6/CmoDaBwFUF0AyNA4QAfKGpfLpidvDty8/LP4ICdJgizHZTkuikI0GhVFkevkhT4hGAz+B/8fDorUhNB0HY4LLRqmC1YbZc88GgeNqz2gcRRAdQEgQ+MAHShrnDgcFcej8lpcEbh8WhMSwzzXwUVPRNkOjmXZxmDQabn66ZoK3mbTK8VkKgBE4/wCNI4CqC4AZGgcoANljZufHBQTvJQSVIGTJUESeWmciw9y4XCY47hwONzYFFzJZJwUqxlLlv8QCtmPE7PXOMLaoHG1BzSOAqguAGRoHKAD/b5x0v2riTgvpQR5LS6loorDiQk2MRiOnggHnw43NgUvDDnuGBcKERMGkHaW32FoLg1wSaOYJblAoVUWjao1DTSOAqguAGRoHKCDK0Mcbk+ciw9y4jgviZzqcPG+RoFvCDY2jI6MOiwzyQXUdQ5NusFp7Es3oFUXjiNKIv6FxtUe0DgKVMEqDgBsP9A4QAO3Rqpe+fD1KM+KCY3DNX79sf7Yz52XGeNU7ZJl/YycOvvSfDRM3gmN8wvQOApUwZqqxrUaTH/KDW8RTAUHnAONAzRwcd644fO/4tjwph2uwGY0rphXHcugtrWS/5oVBKoaaBwFXNc4hmFM9xcxROSLy3NpduqX7ILGAedA4wAN3J3+98Lg62xrkO9o3KzDyVqNs21UNc4wEoqRFlcUuFAoQPSzg8bVEtA4Cnhb48jusspwKLM5iGT9CqrKWg/QOOAcaByggeuLcX18cbD1uWe+zx3YbMH20Tj1lW18+ypip5gbcVSzKk/JyUtAlQGNo4CLGqcTMrlUNM4oZmqcrrialtnsk/jbDpQEGgdo4LrGAUATaBwFvB2Nk2VZ16iab1Al1raXibHvmtmI8DcdcA40DtAAGgd8BTSOAtWhcQzDMLoOFLJcWGs5yQUCoVBA2SLVDhoHHAONAzSAxgFfAY2jgOsaZ7u/0FnCssE0FFNGwRsnJoLGgXKAxgEaUNa4qJCIDhaSkIgK8WLqi0f74rySonE+KvBRoeK3AXwONI4CVTBvnNlIVZO1XUIxy2WZ0TkOlAIaB2hAX+NkWZbWZGlNFiVZTMlCXOROCOpOcn9DU7jitwF8DjSOAlVQXc41rkQmACyBxgEa0Na4wYS0JscTYjwhCsOiEBeFuMh2Cvmdw2J8uLgfGgcqDjSOAlVQXdA4sP1A4wAN6EfjOF5QEtspsJ0CywlhTgh3RMMd0SAbDbYqiW8M89A4UHGgcRTweHWRUw2ZN5iqM45A48AWgMYBGlDXuHiJfErTqiRLklSuxmnnC9BimKO95Au5OEmoYR45y/e+oQS8870GNI4CqC4AZGgcoANtjevTaJwkSTzPh8Ph4NPBaF9UkiRJksWUJIpSfLi8RtUkF2ACXNJ0SR2F/EwC+U1dLhNFMyiYpZZZHIDGeRBoHAVQXQDI0DhAB/oaJ4oi38lLkiTLsiiKUkqSJOmx//ex4NNhURQVh+M4ThhMONa4JBfQxcw0qzJYhtBs208sLmMfjbO/GKTOfaBxFEB1ASBD4wAdKGsc3xfnOrhgMNjQ0NCws0Fak+KDcb6T/0//z38KPh1MiCLXwbEsqxx1pHGKOGkFSfEtQ7cWIgBnsDY7RSuUpTvJbK1Vm4sgNucJoHEUQHUBIEPjAB1oa1xUEFNiw84GURRlWY5Go8FgUEpJisaJopQQpcS41LCzIeogGpfvqhwwMbD8TtO1UmVzjdtSNC4fDYTGeR1oHAVQXQDI0DhAB/oaR+6Mnog2NjZyHVzD1xsaGxv5E9HEuBRPSPGEGBWcN6o6oiIah2hctQONowCqCwAZGgfo4IrGiSlRTImSJImiKAiCIMTj8bgwGBfiiXhCFPILPDjUuJJzBtg1lqphNEWyzHMX7CsWCnBJ8yzE0tk2QOPcBxpHgSpYxQGA7QcaB2hAX+MqPW+cWVDMJPSV5AJ20TilFG2m/IGCfSkHTYJqxFmIxnkdaBwFvL2mKgCUgMYBGrgSjdMtusV2bmUxLmcapxM0/fG8rNlqnGp6NhpnfxPAfaBxFHBd4xiGMd2fJxbSLokaC+Vj5Uqs3ayzRHF3kgsgrg4cAY0DNKCvccbFuMLcVhbjsm9UlWVZnVOOOMkQKFPHolqVVMhj36iqARrnQaBxFPC6xmlFjng9JLkAEwjo/yrL/8xD40CZQOMADehrXENT2HlyUHCpaJzR4WSdYRU/2ETjCpdBNK66gcZRwEWN0/19JVs2qhZmA9e8H5JcgAlxOk9LcoEAx4WgcaBcoHGABpQ1DgB3gcZRwPvROFnOR+QCmj/y8oqmWeVF+RCDxoGygcYBGkDjgK+AxlGgOjTO2EdOVbTiwn3EHmgcKBNoHKABNA74CmgcBVzXOCf75ViICYRCZtG4YlOram/QOFA+0DhAA2gc8BXQOApUw7xxBS8z9o2LFY8Xe8RB40D5QOMADaBxwFdA4yjg+epKcoHiWHbdSNXibN/aub+hcaBcoHGABtA44CugcRTweHWp08QVUK1Oo2iaD1qNKzHVEACyLEPjAB3c1bhrqWsVvxAANkDjKIDqAkCGxgE6uKtxTCdzbb5iJqeZJgAAM6BxFEB1ASBD4wAdXNc45gRzbbZCJodeK6AU0DgKoLoAkKFxgA4uaxzHcCLH8MwmW1etFuJCxxVgATSOAqguAGRoHKCDyxrXwTSMN3Iix3Qy1+6Vb3LFdevlZNJgbKbLdAF/A42jAKoLABkaB+jgusY9lnjsseHHWJFlOhhjBsegPRU4AhpHAVQXADI0DtDBdY1rGGxoEBoYdjPROO3QfzNgdkALNI4CqC4AZGgcoIPLGscyDUID08pcu7uVUQ7EnE7GplUACKBxFKiGVRwA2HagcYAGrmscwzLXprficLo52ANcUo5x6BMHzIHGUaAa1lRNcoFi11mik6016GsLygQaB2jgssZtNQ5HLoiovmWTyRgXQHMqMAMaRwHXNY5hGNP9RZJcIMBxoQCXNPTNUF4j5Cj4UEyGxYHygcYBGri8isOW4nCagaom3eRgcsAANI4C3tc4JRYXCwVCoQDxsoiFjK+NpPI3oWFyI7xeQCmgcYAGNbGmKhmT0+zFmxbogMZRwEWN07mWbK5xsRDDKBpXeG0olmYWb0tygVCMbIJ11AILADQO0KEmNA4Ap0DjKODxaFySCwQCumhcgEsS8bZQTBPfD3FcgCF64KJ1FTgCGgdoAI0DvgIaRwGPa1yM42KFRtXi4ChF09Sx7qqt5Y+p/W3RRw44BRoHaACNA74CGkcB1zWu5P5kUePyDawyKXOySdBN2YFYHHAONA7QABoHqp1f/vKXzjND4yjg/XnjktpoHBmOy3uaia9Z958DwAxoHKCBKxqXXX00OrE6MJJ5M76cFNdW135X8csB/wCN8xrery5C0ogYXCxUHIGq5ihOLh4LweJAOUDjAA3oa1x29dHxs3cO9d7hXr/LvX73yJvL7b3StYm1il8R+ARonNfwfnXpY21KoI0cgKoOcSjE5vLHi22wAJQAGgdoQF/jfvbu3UNv3dlz8M7jrWcbW4U97Rdbj0vtPdLo7YeyLKdXNhrZRMWvDmoYaJzX8H51FTXOKHAKahBO02NOPRvzxoHSQOMADVzRuGCn1PB09Cnu3W8fuvh469mGsBDmpdbj0oXkCvf6zcbW+Nq642ZWcnY46zFkSS6A126totO45783ZJMZGkcBVBcAMjQO0IG+xh0dyOw5eOdP/uFnqcWsLMs/H5x8/LnehmD0mSNSmBfDnWJ50TgnGme2xANmY68ZjBr31D8etcoMjaMAqgsAGRoH6OCWxj31v4vy9OnY3AGunz0hhnkpyEmNrfEyyrVaKqfYryUWUub6NJ6LGaBqAlON2/Pf/8U0MzSOAqguAGRoHKCDCxonPHjm0J2mf/iZemh2aYPvkxSHa2DFMjSuOAt7XuXMurho52c3ah6ocqw0rvEb3zRmhsZRANUFgAyNA3Sgr3GvD9wNcmLD04K0sqrsaWQTja3xxtZ4QzjeEBYawoLDMpNcIMQp0bhkMpm0nmbdIuyGaFxNgGic19h0dR3p6nKSKnu3AGwT0DhAA/oal1t7FOxINLbGY+8WFeqh8zENBLGQdo2cUCjEJcn5OwvROUTjahn0jfMaW9G4rBlra2sPHz5cXV3NZrPQOFAtQOMADVyZ/vforyYa2UTTC+9WoNx8DC7vbrFQgONCygqIWkUrTuIJagyMVPUauupyvr6ConGn33mXTJ9cSfT8Mt5+6M1bX8zkcjmDxpGjnGwwDIayGr5u+kcfBkKB8oHGARq4tRjXHvZsY2v8+OnbU/dyWyo3yQVCMXIyzyQXCAR073VE42oZzBvnNYwaZ5rNRuM+G7mppCuJsYXF5b99vufPv3n03fOJ1dXVsjXO8NMfiqndKfL9ackshbIc2iEAlkDjAA3c0rjlzNpT/3y5sTU+MHR/S+Uqk4mQEqe8ltU9xQV2YiHitRwL4S/sGgEa5zVsNI5hGNP9CjqNuzo6Jk7ff3tw5C++efSf2nsfPEiZNarqfEtjbcQBMpuZoql/C5rMT4Q3BdgM0DhAA7c0TiF2frb/orSlcrVNJcUXbqERNcYRATfiDY8Xc80AjfMaW9e4m7+d+mL63s3xWyuZ7Lf+16u7//7lDy6OTd66pdM4vXFp/4QrROotQvG6mDypcZooPcJyYJNA4wAN3NW4CkCMTzVZMScU07zpddE4CF1NAI3zGqYap3Mn2Vrjhj65+snI1M9PDy8sLr730c3mbx3/Tlvv2trazZtjZtG4wkRDhki8xr800xGVisYVxkgVvuIdATYDNA7QoOo1DvgeaJzX2GI07rZ4Z//B2O6/f3kkOf0/On75l+FXfnP+5urq6q2p25vQONM20nwmfadaaByoJNA4QANoHPAV0DgKbFHjro6M3r4z2/QPP25+9vhfhl957l9eX3u4ns1m70xPm2ucql8W0TjV53Sd4/QROoPGkXoIQLlA4wANoHHAV0DjKLDFkaofD386l5Z++JP39zz7yl89d0J4d1SZNO7+/fsmGqeTNRON0w9VzecKaOcbKUTtAqGQonE6PQSgXKBxgAbQOOAroHEU2OK8cZ9+dmViYvKL6dmXfvIe3/PhSmY1vbAwP5+enZ0zalyxT2xeuyz6xhEjHoiJJvOncSFDL9m8+2FKIrB5oHGABtA44CugcRSoyCoOuVzu4cOHa2trym9BFY3GkVP4qhpnMlOI2kFOzRLiCjOGGwc5JblA4dTifEUAlAs0DtDAOxrXeuhiuDMe7hCCrNDwdLTiNwCADI2jAq01VQshNU3kzHSIQ0BZpS//kZiVSC9pam7dPpgcKB9oHKCBdzROluUgKzQE+ccazXvSALB1oHEUQHUBIEPjAB08pXGyLFfC4ZJcIMSZ/FEty7KTtVX1s39qT7aZPxRUAdA4CqC6AJAJjctkMpK0nE4vzM3Np1Kzn38+cePG2MjI9c8+uzb08Sfnzl+AxoHN4zWNKwsL4bIdWVZa42zyEGt8lbwL4EmgcRRAdQEgFzQum80qDjc7O/fgwey9ew9u3Lg5MjL62ZVrly9/euHixx+e+wgaBzaPuxp37dq1rZWaVyjLBXeMfmWqaFZRNn1HaUTjqh5oHAVQXQDIsry2ttbX1zczM7O8vLy4uJROp+fn03Nz81NTtycmbv12YnJ8/LdjY+PJ5Ngnn3zW29vr2bcNNM7TuKhxi4uLDDsPhuMAACAASURBVMOcO3duS+UWZhGwWAO7uEudXqDQ3ZnotWwaZTMpDtG4qgcaRwFUFwCyLK+trV2+fLmvr+/Hx39sn3p7e99//33Pvm2gcZ7GRY07cuQIwzDf+ta3tl642huuMH2ndmYoclIBNRpnGH5mGmqDoNUY0DgKoLoAkGvobQON8zQuatwTTzyhmNzt27c3Xaziarr4Wyyk2acJlxGNqrGQzYxQxNRR6scSYE6CKqBmXqxeBtUFgFxDbxtonKdxS+OuXbu2f//+27dvMwxz5MiRTRerNHPGQkwoVoimhWKxEBMKFQJwujZPTd84C5GLhSzDcLbNr8D71MyL1cugugCQa+htA43zNG5p3P79+/fv33/kyJGvfe1rX/nKVzZbqtJaqphaMQZHRtL03qUd4pDkAkwgFCoZacufYhmTQyCuWqiZF6uXoTX9LwCepmbeNtA4T+OWxj3xxBPKxsmTJzc/0CHf500NyRWjccR+wylOJhwpx8vKzA7cpGZerF6mIotxkaytrT18+HB1ddW4pioAnqVm3jbQOE/jisZ961vf+trXvqaom9I9Tv1YFmQsTpW2JBfIr5cYM5s/rvIa56RE4BVq5sXqZXTVxVmjO1HRuNPvvEumT64ken4Zbz/05q0vZnK5XMU0LskFKP/k4lXhM2rmbQON8zRVPf2vLMu6kFtx+KluiAIxDtXmRapmKvGy1Q5qxZu5iqiZF6uXMWqcaTYbjfts5KaSriTGFhaX//b5nj//5tF3zydWV1e1Gqft51DWj2JpjdtC4aZsXuM0d1J4ren6eJB/elb6zsGmqJm3DTTO01S/xgFQBjXzYvUyNhrHMIzpfgWdxl0dHROn7789OPIX3zz6T+29Dx6kDI2qFVm23qoQzX7bge3O2JLGFc4s2qd+8kud4aGnh+vUzNsGGudpoHHAV9TMi9XLbF3jbv526ovpezfHb61kst/6X6/u/vuXP7g4NnnrlosaV4E+sBXRuGIxhtvWNkZA41ynZt420DhPA40DvqJmXqxexlTjdIO7ZWuNG/rk6icjUz8/PbywuPjeRzebv3X8O229a2trN2+OOdM4stNDcfJIYvQ6k+9Uy4RiZGa9Y5GF65pgzTppEC2Zpt05tLmNJSiXi4XM78SBxhX3QOM8Qc28baBxngYaB3xFzbxYvcwWo3G3xTv7D8Z2//3LI8np/9Hxy78Mv/Kb8zdXV1dvTd021TitI2lnfSSaQvP2Y7KOi100zkzxyKgaYU6hwr7iRTUtscSdWZQQYCwabh00qpoUha5xLlMzbxtonKdxUeNGRyfePPOusv373//+zp07v3irv+LXBYCkZl6sXmaLGnd1ZPT2ndmmf/hx87PH/zL8ynP/8vraw/VsNntnerp0NE7fcElmUAJg2uCXaSGGcw06pkFjZGQ8Tncz6kfzEmxCaKZCaapxVoYHXKBm3jbQOE/josbNppf4E9HFpRVZllfXfy8I8QvD1yp+XQBIaubF6mW2OFL14+FP59LSD3/y/p5nX/mr504I744qk8bdv39/UxoXIKNkm9M4s7CeMS85TXgpjTMJkdlrnPklLZ4dGucJauZtA43zNO42qvInhMELV37/+9/fSUlhlhNFseLXBYCkZl6sXmaL88Z9+tmViYnJL6ZnX/rJe3zPhyuZ1fTCwvx8enZ2zkHfOEOjKrGGsrLOS1mNqup+onOcLjanNzaiHx6ZkxQ9sxK2qHGa54bGeYKaedtA4zyNuxp39uxFno/ev38/PpwIhtnNapzhbat7gWGZBVCgZl6sXqYiqzjkcrmHDx+ura3lcjlyRYfNDXEgJKdgWcSp+TZLuyEOskbPTEYzFHcFQiF9Q65SOheybn+1ehb1kEUA0LwHHDTOE9TM2wYa52nc1bgPLtzgT0RjwgDL8c8801pumYYeJgbUP4mN/X7NXn6g5qmZF6uXwZqqAMg19LaBxnkadzVuevo+y/FhlguG2f/DfX8TxZJrOFgG3bQHtIO+oHH+omZerF4G1QWAXENvG2icp3F9wpHW9kPBMBts5T64sJnxDbqAXHGJ1eJKq/rYGzTOz9TMi9XLoLoAkGvobQON8zQuapyY2uDfygY58fuv3g52JJ45eJ1/486FkbmyijVG43QaVzxQIMkFiM4o0Dh/UTMvVi+D6gJANrxtVlZWcmZkMhmPv22gcZ7GLY0TUxutx6VnDt3Z81xv03d+tqf9YrAj0dgaP/r6cFnFGqNxeaw1jvhEGB3wB9A4CqC6AJANb5tcLtfQ0FBfX19fX79z585du3Z997vffemll3K5nMffNtA4T+OWxn3/rdlgp9jYKjQE+QPf7w92JFILawNDYkOwvEsT0TjDQAZyuk6NxpGjxaBx/gIaRwFUFwCyRTQuFAo9++yzL774Ym9v7/nz5xGNA1vFLY0LdopT99cmppcagvxy5stgR2LqXi7266sNjezmyi/MvWR+jAnFCgE60ukwE4nvgMZRANUFgGz2tlFMLhKJvPHGG1euXFEczvtvG2icp3FN4zhx6l5u4ILYEORkWT7Af9YYFhoaw3/4h4+XU6rZFCLGJtZCy6t2rigZGudDoHEUQHUBIBfeNqlUanFxUX2xZDKZXC731ltvqQ7n/bcNNM7TuKVxB/jxxrDQEOT/pOU7siwPDImP/1nrH/5Z68/7P95U8UYhK+7RrhdtPvUI8AnQOAqgugCQC2+b+fn5paWlZYJsNru6uprNZtU9KysrmUzGs28baJyncUvjBobEphd+9viftf789Oa8TUEd4aCdjd10Yt/i+jfkxOqwOH8BjaMApv8FQC68bRYXF5WXiQ2ZTAYaBzaJ6/PGAUATaBwFKrIYF8na2trDhw+VAIaFxhVGLqGjBPAMyttGkiSjtKnqRuLZtw00ztNA44CvgMZRQFddnDW6ExWNO/3Ou2T65Eqi55fx9kNv3vpiJpfLkRqn6Rurapyxe6z1sn1EhvwK98Tc4MUYfyhGFmK3gDMAKsrbxmhs2WxW+VeHZ9820DhPA40DvgIaRwGjxplms9G4z0ZuKulKYmxhcflvn+/5828effd8YnV1dTPROHKWcALthEOxUGGVl0JP2sJXTcka0QtwHKJ/wArlbWMaYDbFs28baJynoa9x/T/8aYw7Ovjj12Pc0Z//zwNJQdDlZBim4lcHQAEaRwEbjSN/uktq3NXRMXH6/tuDI3/xzaP/1N774EHKpFFVjcjl7cosHFcyGqcvURnUrv4r5wsJxVSLS3IBBs24wBblbTNXDrIn3zbQOE/jgsZx35dleS2bPf7Xzxxp+hNjTmgc2D6gcRRAdQGwaTz44wON8zT0Ne7LzIosyxf4/+AaHhv7cNCYExoHtg9oHAX+7d95JCSkTSe3f4L1/Bs0zsuYfnu243tBlnk/OcE3BX9x4DumOaFxYPuAxgEAQFlA4zyNKxr3sxe443/2+OrKsizLsxMTupxlaJza5SXfLcbBwLF8P2aT/cXd+U7NtiuuWpUDvA00DgAAygIa52noa9xw9Fd8Y6MysuHLzMrgv/6rLmd5Gkf0Qtb3Yy5olnX/Zs08BSU1zlE5wNtA4wAAoCygcZ6GssbN3po6/vjj7Y//4el//edfHPjOocf/8PS//rMuZ7kap9hWLMQwgUCAGK2mKlipkWTE5FOhUKjoZOT+mINyQBUAjQMAgLKAxnkaVxpVFSbEtGnOMjWO08TM8uqlj6LlPc8mhOYsGle6HOBtoHHUOHbsWHt7OwsMtLe3Hzt2zJ/V6Odnt6esmqEMNM7TuKVx9+eze1p7lzNfGnOWr3EBLlmInOnmjtJH0ZLJvG0luYDWvWKhQCiU1zZbjStRDvA20Dg6/ODw4e7u7lQq9QgYSKVS3d3dPzh82IfV6Odnt8d5zdAHGudp3NK4/8N/0Ph09OenPzbmLLdRVT9Fu6Htk5h2PRYKmEbPVBuLmTaqFuYQLVkO8DrQODpEIpG5ubn19XX7FcH9yfr6+tzcXCQS8WE1+vnZ7XFeM/SBxnkatzTuqX9+86kXfvb4X7eTO7/3ve+dPn2aYZhz587t37+/dKHk8jhmjZ3q6IVQKGA8WnA0TllTx0Gjqn056DdXBUDj6MCy7KNHj9z+zehdHj16xLKsP6vRz89uj8OaoQ80ztO4onHXxu7vea7386n7DY3sh0Njxf3XrqlSdO7cudKFalY5tFpU0TBvCJGhuFm6b5yzcoC3gcbRgWXZjY2NZWDBxsaGQ5WpvWr087Pb47Bm6AON8zSuaNy32/qfeuFnP3hl4PG/bv/2/z5JZnvyyScZhnniiSccFUo2gVpG4wzLYqvOpS56LedzFZtRdSNVSU20Lwd4G2gcHZTfwcZ3C1AoS2XcvtkK4+dntwcaBzaDKxq357ne+7Mrsix/eHmsoZH9fOq+ekgJyDkKxckWQTDtThPFsjjLPhrntBzgbaBxdKj87+Dhjp07O4YrWaKbuKYyHqhGaJwV0DiwGehr3H5uoKGJE969tpxZfXxPe0MjG/r2D8ic3/ve95wWWlrj9CpmNjDBMEmJicY5KQdUAdA4Oii/g5dsOBVkdnZcNtnLBE8tnQoWAuE7O0517NRF2fPnXe7YqRZxuWNn8JT6xfKKRvTZTwUNu7aDslTGrqCtV+PS0tLS5Y6dJqVsE5V49suGpzF/MJVTQYsDxeP0asAKaBzYDC7OGwcAfaBxdGBZdn19fcGMoXbdb+CWkydbitvanDvbh/QfTrYUdy6cbGF2tg8tFAsgfpnr9heKHmrfqbmKlpMtjOXRofad+Zslsgy172SIG1I+treQ+0xYX193qDI0qrG4bShV92gtJwt5tM+X/z6oX+3Y+rPr0fyXMDvMqHdn+t01+++jfUK7Z1dLcFwDVjisGfpA4zwNNA74CmgcHZTfwWlzhtp2tPQUtna0DaV7Wpj8DoKeFiZ/zIwdbUNkzmJ5hoLy10inh9p26EsxvapFHrWc/I2pezV3Uzio5janLJXZ7mrsaWnpyVdjm7YCe1rUhyg+0FDbDqalpUX/LSgetXvwijy7xcMY/3so3x1NpfS0aPaY5DA+hPbZd+zQP2H+f5bjGthizdAHGudpoHHAV0Dj6GDrH4XfdKqHmPiHYRdhUQVP0utcaY3T5DbLbK5C2gNDbTuKl+1pYVpaWoyuZ1NSOl0ZjatINaoSN9TW0jakr5OixvVonpFp6dHUgkZtbR+8Ys9OGKbpdk+L8r/DIO+q1BLPQBag1XSzZ29r26F5wqG2HTva2sqogS3WDH2gcZ4GGgd8BTSODsrv4HkTLhljYsr4dPIX7aWeJ9XtHsMJO9ou5QvreZLMayi3J39B5YTCBvFVyUHS8yRj3EmWkn+EfKaeJ5kne4qfiSOaMwyUpTLbWo2FLGodmda12eNfatvBEPVAHrd+8Eo8e+GKFthe3K64J3sKX/RVrX928nHzH8qpASugcWAzQOOAr4DG0YFl2dXV1Sk7ju2pPzBY2GT2HNPuMuQZPFCvO2g4bl6GemJhg/i659jU1LE9Vj5QIJ9rzzGiyMINM3uOEZfQ5NJ80LG6uupQZWhU49TgoK4W9SeSz6I+/dTggXpGrYhisXYPXrFnJx/SYpv4ztYfGFTultyhrYID9flvtfFKxmc/toch6iC/x3ENbLFm6AON8zT0Na7UK7NIxe8BAGgcHZTfwZNmDOyv1/6gNx892sw0H52cnDzaXL9/IJ+n+Wj+y9Fmw6shn4s4YXLSUAZxPWVPYSNfuPpVQ6EY402TxeY/6os+2swQuXTnaChLZba5GoslNR/V1UmhJM2jDOyvV+toYH89wzQf1T653YNX5NmVW7P6xWH4L5F/jOKzaW/QqqRi9Zg8+8D+ekbzLS+nBrZYM/SBxnkaROOAr4DG0UH5HTxhysC+Oqa5e6K7ua65ua65e2JiYF9d3b6BiYmJ7mbla35X97665m7irMLBIuoJ3c2MulUoi1FOHthXxzAMw9Q1NyslFHIMkMUXS1S1qFu3n9zR3cw0dxO3pP9scoqGslRme6uxu5lh1F2FylIp1q9aRv7CxCemubm5WIbtg1fm2XUUH1i3O38fyvHi97tQCco3u67O5H8WUabFs3c3M3X79hH/75zXgBXQOLAZ3NI4qz+kFJwXS6y0YMBsbl7DilrAX0Dj6GD9O1gnG93Ndfv2NesULP+bkFE0xeyHWzW0un0DA/vqiN+gRRFRT9b8Rs2XZ/p7X/MLWJtR81s6n69Ze7uaz3rb2dwvbDrVqN6uTvlMNdn4YPkatzxe8WefMNFNs8cinlnVuMI+7ZOX0jjTZ9P+5zLNpf7XNG5soWboA43zNNUejbPUMosD0DifA42jA8uyuVxu3A6+qW7v2fHx8bN765SN4i5lW/n9W9hBZCNy1NXVMU287XUIzu6tY/LZ+SaGMTuTb7IoT39AX4ChQMuSxsfHx3O5nEOV2fZqzOdRS9E+Q7FM9WnO7tXX+dm9dcQlbB+8os9uvE39cxW+2XV7z+qfTXv3Jpg9kObZNR/4JpMTzu6tU/YaN7ZQM/SBxnmaau8b5yAaZ7bYqiET8AnQODoov4PHzDnzgvJ7c3fX2NhY127l69jY2FjX7roXzigbjLJVyGpgd1chs2WWYrmFXPnSyX1knjHd7RjuWne+HSVyl6Uy1peoQDUWb9Qqk1qEo8cvnW/Lz279Hdfds+E002+t+R2rlVjGs28mNwk0DmyGGovGGZav1+/T5kdszndA4+jAsmw2m03WFv3Pf5XZ/aNSBsEwDPOj3cxXn++3KSqbzTpUGe9Uo5PHL/ngydp9duc1YIXDmqEPNM7T1HLfuPyap9A4UAQaRwdP/Q72INWoMpXCz89uDzQObAZE46BxvgIaRwfld/B1YEFZKuP2zVYYPz+7PdA4sBmqvW9cLBTgkuYhuYK8oW8cKAKNowPLsplMZhRYkMlkHKpM7VWjn5/dHoc1Qx9onKep8mhckgsoGqe3MeWALMuIxgESaBwdIpHI9PR0Op0eAQbS6fT09HQkEvFhNfr52e1xXjP0gcZ5mirvG6comr3G6fdD3PwMNI4Ohw8f7urqmpmZyQADMzMzXV1dhw8f9mE1+vnZ7XFeM/SBxnmaqo7GJbkAE4pZjXOAxgEj0DhqdHZ2RiIRFhiIRCKdnZ3+rEY/P7s9ZdUMZaBxnqaqNa7QXIpoHHAKNA4AAMoCGudpqlrjACgXaBwAAJQFNM7TQOOAr4DGAQBAWUDjPA00DvgKaBwAAJQFNM7TuKJx09OzF65cifYJ0T6Bjwr8CSVFOT7KdUavjIyK4r2K3wAAMjQOAADKBBrnaVzRuNHRif7fnIsOSiyfCHcmglyikU00tCYawvEwl+A6o+c/vlrxGwBAhsb5nmPHjrW3t7s9KrFitLe3Hzt2zO1KBTUONM7TuKJxvWfPyrLc2CEmxqXEuCQMS1FB5KJikBMbno7y0UT7oeMVvwEAZGicv/nB4cPd3d2pVOpRrZBKpbq7u3/gycnGQM0AjfM07mjcW2dlWQ6fkMNRfQq2Cnxf3KsaFwsx2hVczSenA94FGudnIpHI3Nzc+vr6Sq2wvr4+Nzfnzan/Qc0AjfM0rmncmpwQZSEhCwmZj8v8oMRFE1w0ERUS8eFE+0FnGme/XKq6YKpmOS7ZZFK5JBcy6JhO2YyTDAcCus8wuioAGudnWJZ99OiR2+pVYR49esR6ciFOUDNA4zyNOxrXe1Zak8V4PMHxoigqG4lEfiMeT7S2lxeN03paKWvTH1f26aTNKvKm7i6UgpBcVQGN8zMsy25sbCzXFhsbG9A4sK1A4zyNKxp3vPestCYnOD7a0JgYF5WN+HB+Q4gnWtsPlVV4SY0jhEw9qrM7/VlGsbNY9IsI+wHPA43zM4rGGd94VY1R4758+OhiMt17/u7xs1+89uH0+yNz2S833KpzUANA4zyNOxrX0ytJsiiKiXExkRATCTE+LMaHE0I8IcQTwmDiGbZSGqdpdg1wSU1OqxW7CmeaaJyZr2GBryoCGudn/KBx88trvDD13rW58buZB4trk/ezHybmO9+cvDObc7HmQVUDjfM0rmjcoeO9kiQLwzLbGY8nRGFYYjvjQjyhbEQFhxpnHRzT9FfLW1aSC+h7s+UDaYVyAlzSqrOdunYronFVDjSOPrZ/LpG5Sv0cOchij6JxS5Zc7thp/TLZ2XHZaR6qkBq3vvG77v6pjz9f1D144vZy55uTmdX1LVQe8C/QOE/jjsYd6RVTMsvHg6wQHxY5Ph5kBWEwoeyJCvFnWivXqFqIlZn1iCN6thl+1SAaV5NA46hh82dWsV+DtREVBw0RP5vazbJ/7FiWXV9fX3DIyZad7UOGvUPtO1tOajZOtjCFDeKEofadTMtJ5StBy8mFhZMtjFnJm2R9fV3VuE8nFs98klKf95sHf6VunxtNvz8yt9lvJvA10DhP45LGHRdTUjwhxocT8UJDqjCYiArxqBCP9sWfaW0vp2zbXm6xUCgmF176xt8bhd8EDjXO4hcONK5agMZRw9KzrLqnWuTS5lNLNf+7zB5F49IW9LTYSSXDMMyOtqH0UNsO+wzpdDqdHmrbkd8eatvBtPToLlU8vHVIjes9f3f8bsb02eekh8fO3C6zwgCQZWicx3FF49oPHRdFSWlUJdpS48KwxHJxvi++57myNM4wqFQ3MLWoWrrfG8QvGkTj/AE0jhqlo3HlFKU/ZTMWV0LjFJUr6pXVtlbHDIqmZFfVzVTjNDl0mNaYzS2TGvfKwBf3Fr5Un5eMxmXXHnW+OVlujQEgQ+M8jjsad/B4QpTYzkJbame+LVXZ4KPlaZyhw4zxBR8LMWo/OXuNK+4xTjhSAkw7Ug1A46hRMhpXsnNr8UdK73Haz0ku4OzHT9G4eRt6nrQOtF2an5+/ZBeLYxiGYZ7smZ+/1LZDyZ4/48kew4XILAZ0Rdrd8Py8TTSO1LjU0trL7yAaBzYDNM7TuKJxrQePJ0Qp35YqJJSG1GhfnI8qSXCucWYvcJNoXL49NcTZNapqPptF4wr5iP2IxFUZ0DhqlG5UdXpC/qBmADqZsxyNW11dnbLh2J76A4MltrUfiFOZPccMm1ODB+qJ9426W5PHBPUMu7udmpqamlpdXVU17srkUv+wed+4DxPz712bLV1HABiAxnkadzSu/ZDicFEzh+NPONU4i7c3+VvCGH6ziMYZrM10QmBDzA0aV2VA46jhsFG1+CNU4odJHY60+Rm3FY2btOFos9U91+8fKJmp+ejk5OTk5MD++mLugf31hf0aNJlMYRjG7nABUuPWN3738ju3P0ou6B78k98u/fBXtzB7HNgc0DhP44rGnb94NdzKBcNc49Ns49NsY1BJ4YZguCEYbgyy/YPnK34DAMjQOIo4i8Zpx55auZ6sybDpv5wUjZtwSHdz3b4B5we6m5nmbsPmxMC+uuIH8+xbg9Q4WZal7MOe9+68fflB4vbyvYUvb4grv/5s9uV3bqeWvrSpGQBsgMZ5Glc0DgC3gMZRw5HGxUJFLSsZ2iZHK+muVE6jqrURDeyrswrGMUzRuroto3FFjVNFz0LjrOxuyxqncPXW0luX7r0y8MUbF2Yuf76wvvG70rUDgAXQOE8DjQO+AhpHDQeNqkrzaCykmajbuiiiB4RG5srRuFwuN+4Qvqlu71nnB/gmpok3bp/dq1HDwplk7q2Ry+WwpirYVqBxnsZdjeN4QZcqfl0ASKBx1CgZjSO7n5qPBA/FlP2mjpY/pZwWVkXjxsw584JdKE5xsN27S+d54YxSmLJheS27w2UBjQPbDTTO07iuceq2JEmN4eCe/U/s2f8E/wE/nBqu+D0AAI3zMyzLZrPZJBX6n/8qs/tHpqb3o93MV5/vr9SFstksNA5sK9A4T+MdjYsK0UaugRUag32Nsizzv/l+xe8BAGicn6GpcdSAxoHtBhrnadzSuF/84hfBp4NFjVuTg1xQlmV2MCivyfww/9T+Jyp+DwBA4/yMonHXawtoHNhuoHGexi2N43mebWU1GtfRKCSisiwlxDgrNO5xqHG6DjjG/jhOF9WyXd9RW55VZx3gfaBxfoZl2UwmM1pbZDIZaBzYVqBxnoayxk1OTgqCIAgCr6OTD7PBxo4GTgizQrCxoyHMBs9dOFe63JIapwqa1XJa+mW6zfKFYup+i0muMAlwdQCN8zORSGR6ejqdTo/UCul0enp6OhKJuF21oJaBxnkayhoXPRFVPvI8L46LZEok4nyUC7Y2NgQfiwpRMSWGW0v9iRkLBUKhAMMwoZhxdgPtFKN2rqcRN4tVHgxLCJHHsJZD1QCN8zOHDx/u6uqamZnJ1AozMzNdXV2HDx92u2pBLQON8zSUNY7neWlNkiQpGo0mLOBP8JIkSSmppMYluUAgFAqEYiYL2pus22g6jxWpYmZnQONqC2icz+ns7IxEImytEIlEOjs73a5UUONA4zwNfY1LJBKJ4QTXyQl9gprCfbKSBEHgOrj4cDwej5fUuFiICXFag1JdK7+RV7fCtpLVuCE70jhNzC4GjatGoHEAAFAW0DhPQ1vjOvn4YNyocSSKxgmCUErjklxAa1OyUePInSWjcfaNsYjG1QLQOAAAKAtonKehr3FKsm8p4Dt5juNL942TCwZlte6PWQMruYojsYcxGX4Kjas5oHEAAFAW0DhPQ79RNRqN8if4xq83Nn69ke3kxZQoiJIwLgnjUpjllP3RaDQajZahcQWMiqbsLY5GzbeHGoeXom+cL4DGAQBAWUDjPA19jeNP8NFoVNE1jo/KspxIycEOkdQ4ZRKSsjVOGd+gLLdN5omFiPW3yXOIfeVoXCyEvnHVCjQOAADKAhrnaShr3PClYb6TD4fZYFMwGAwqGqeE4hSNCwaDwaZgOMyGW9mf/vSnpcstGFSSC6jRNXJbP92bXUG2Gke02xYuSExzgumAqwRonM85duxYe3s7lVGknqa9BHAr1gAAE1tJREFUvf3YsWNufzdAdQCN8zRur6man0ZOXpPlNTnMcmWXm+QCoVgsZGhKzbefJu2GNxSkrHDQRNnIcRKMZaMqqBqgcX7mB4cPd3d3p1KpR74nlUp1d3f/ABPOAQdA4zyNuxrHdkbDHXyY5dRU8esCQAKN8zORSGRubm59fX3F96yvr8/NzWH5B+AEaJyncVfjAKAMNM7PsCz76NEjtw3KKzx69IjFYqzAAdA4TwONA74CGudnWJbd2NhYBsvLy8vLGxsb0DjgBGicp6GscRcuj0X74tG+OK+kaJyPCibphMCfEAYvXKn4bQCfA43zM4rGGd94/sSocV8+fHQxme49f/f42S9e+3D6/ZG57Jcbbn2zgHeAxnkayhoX7Ytb5liT5TVZIlJDU7jitwF8DjTOz0DjSHQaN7+8xgtT712bG7+bebC4Nnk/+2FivvPNyTuzORe/ZcALQOM8jVsaJ8RFIS4K8YQwmBAGEwlRJAVOkmRJgsaBygON8zOKxpHf98sdOy1GsAdPLS3pc+r3WeK8WDW/47IrBqlx6xu/6+6f+vjzRV2NJW4vd745mVldp/69Ah4CGudpaE//S2icGn4TBhPhDj4xLpIOB40D2wE0zs+wLLu+vr5AMNS+c2f70IKeofadLSfN9ppl1uZgWk46K5b8oNsmzyWKLMqgkvlkC1PifmxZX19XNe7TicUzn6TUivrmwV+p2+dG0++PzNH+VgEvAY3zNLQ1LlrQuMGEvCYLg4lEQowPJzg+Go0KpMOJTjROP2WvxVxuht3GhR6AT4DG+RlF49IEQ207LMJmLT1pI0NtO3a0DZkc0B12UuxQ2w71g267eI3iB2L3UNsORr2O3f3YQ2pc7/m743czppU2Jz08duY2xe8S8BzQOE9DXeME5WNUKHSSW5MlSUoMC0KUj3aGo53hxLDgVON0Ime2EEN+fygmqws6aIHP+QponJ8x1TgzDxpq29HS09NicLmeFivByx81OpdlsU40jrgFTZHFK5ncZB5TiyQzkBr3ysAX9xa+VCuKjMZl1x51vjlJ+1sFvAQ0ztO4pnF9cVmWhcGEEE8kxkWeC0vjUXmcl4ZZvqNRdKxxiqNxFms05JdSJYRNt7wWHM5vQOP8jKJx8wSX2nbsaLs0b4bJoZ4nmSfbLM/oeZIpHHFS7CXLiJ1pMZoii5eyudL8vK5Y3VGbaBypcamltZffQTTO10DjPI07GreW7yQnrcnKFXkuHBc4gQ8LJ8JlapxKLKRfkKuAplGVCM1hMS3/AY3zMyzLrq6uTpEMHqi3kilmzzFD1j3HpqaO7dEfmZqa0u0uo9h8dnXv4IH6+gODhiKJ3YMH6pnCttXdFFCvajy0urqqatyVyaX+YfO+cR8m5t+7Nkv7WwW8BDTO09DWuBOCMqyBjwrymhwV4ko0LsoFZVGQhjlxkOXCDQ41Tom0KRE11cpM+scpu6yWVUVEzk/oNG5lZSVnRiaTgcbVHorGTZbiaDPTfNRsb/3+gcnJycmB/fX5rSID++vNTrIudmB/ffGT5sPk0WaleM11BvYXxZC8utnNaGEYxnQ/qXHrG797+Z3bHyUXdDX2yW+XfvirW5g9zudA4zwNZY3jtBonipIoSmJKinYGpQQvxdmEwHKtTjVOlmU5FgpwSYtub4VwmyJwBblLcgHE4XyLTuNyuVxDQ0N9fX19ff3OnTt37dr13e9+96WXXsrlctC42kPRuIk8A/vqLCNmeer2DeQzdzczTHP3RPFT8UOhrPweh8UO7KsrFqH5MNHdnL8ueZmBfXXFuyEw3IpjSI2TZVnKPux5787blx8kbi/fW/jyhrjy689mX37ndmrpS5sqBX4AGudpXIzGNTSFG5rCwTDL8dHoCTYeDYuDYeFEMNoZLl/jimijcYUQXChmYXoMlM5XmEbjQqHQs88+++KLL/b29p4/fx7RuFpFq3FFh2rW+pHRjLqbmTpDHmIPYXFOi3WocepFLDTO7MoO0WmcwtVbS29duvfKwBdvXJi5/PnC+sbvXPlOAU8BjfM0bkXjDJP9SkIfz3NBoY8XRbFcjbNqLzW0s2pGNRgMENQ+xr5xislFIpE33njjypUrisNJ6BtXi7Asm8vlxrWc5fm9TQxTt/dsYQ/fxDTxxeN76xjyM7k/f9LZvXXE6WUUaxmuy59FnGJ2DUOhZZHL5bCmKnACNM7T0NY4PmrmcPmJ4jQpVZFonHZXMhYKMExhBCskzocoGpdKpRYXF9X/8JlMJpfLvfXWW6rDQeNqEkXjxqw480LBrHZ3FfZ17WbqXjhjc0LdC2ds85gXa0vXbrW4My/UlSja7rA90DjgEGicp6GscR9/moz2xVWH4zqjStOqafrXH/5HiULzUbhSUwDrdhVbV9Ge6jsUjZufn19aWlomyGazq6ur2WxW3bOyspLJZKBxtQTLstlsNllhfrSb+erz/ZUutUD/819ldv/INGa3xQtns1loHHACNM7TUNY4WZb5E4KqcY3BcHxYTIiSJEnBVi6REMWUJK3JHB91UmYhEmfZpsqEYupo1mKmorzFQhio6jMUjVtcXFREzYZMJgONqzG2R+OqFWgccAg0ztPQ17iro5NqvI3tjAZbuWCYC4Y5jo+ynfk0NX2/4jcAgFzQOEmSjNKmqhsJNK6WUDTuOrh+/fr169A44BBonKehr3EAuIiicUZjy2azyr86oHG1BMuymUxmFIyOjo6OZjIZaBxwAjTO00DjgK9QNM6oa1ZA42qJSCQyPT2dTqdHfE86nZ6eno5EIm5/T0AVAI3zNNA44CsUjZsrBxn/e2uFw4cPd3V1zczMGFvP/cbMzExXV9fhw4fd/p6AKgAa52mgcQCUBP97a4bOzs5IJML6nkgk0tnZ6fZ3A1QH0DhPQ1PjkJCqN1X8JwIAAKqCf4PGeRnTbw++FwAAAACQoXEeBxoHAAAAACugcZ4GGgcAAAAAK6BxngYaBwAAAAAroHGeBhoHAAAAACugcZ4GGgcAAAAAK6BxngYaBwAAAAAroHGeBhoHAAAAACugcZ4GGgcAAAAAK6BxngYaBwAAAAAroHGeBhoHAAAAACugcZ4GGgcAAAAAK6BxngYaBwAAAAAroHGexkbj1gAAAADgY6w8ARrnFWw07rZjpgrcuXPn4sWLvb29L7/88ssvv/xjAuMeAAAAAGyFl7X09vZevHjxjjOmHWDlCdA4r2CjcU6+wTru3bvX29s7MzOTzWYzAAAAAKDI9PR0b2/vPWfc15JKpebm5hYWFiRJWllZyWazc3NzVp4AjfMKNhr3wDHqf4K5ubnjx4/ncrlMJpvJZFZWiml5eWV5eYXcg4SEhISEhLSVpPxuXV5ekaTlxcXFxcWln/zkJ3MWzJuRLrCwsLC4uKg4XCaTgcZVBzYaN6tlbm5O2VhcXFxeXl5cXJw1sLCw8Morr2SzuUwms7y8bCwZAOA1VlYy2Wwum82Zbrh9dwAARywuLs3NpdPphZ/+9KcLzlhcXFSibisrK4uLi0tLS5IkLSsRF2hctVCuxikOFwqFlpeXrTQuk8lK0vLi4lI6vYCEhOTxtLKSefxP/uS7//RPuo1/+7//d2Ul4/rtISEhOUlzc+kHqdm5ubmyNC6bzTY0NCgmB42rSsrSOMXh/uAP/qC9vd1W4zKLS1I6vTA3N4+EhOTxtLy88o/f/var0ahuQ3j77eXlFddvDwkJyUlKzc7du/9gExpXX18fCoUUk4PGVR/ONU5xuK985SvNzc09PT02GreykllYWJybm0+lZpGQkDyeJEnqaG/v7+/XbZw7d06SJNdvDwkJyUm6f//BzMy92dnZTWjcs88+G4lEcrl8hyhoXDXhXONWVlb+6I/+6I//+I9ffPHF06dP22jc7OycKN6ZmLg1NjaOhITk8TQzc0+xN93GuXPnZmbuuX57SEhITlIyOTaSuP7biYlyNW7nzp0vvvjiG2+88dZbb+VyOWhclVFuNO7v/u7vXnrppd/85jc2GpdKzU5NffH557+9fv0mEhKSx9OdO3cVe9NtnDt37s6du67fHhISkpOUSNy4cuXa55//tlyN27VrV29v75UrVxCNq0o20Tfu0KFD58+ft9G4Bw9SExO3btwYu3ZtFAkJyePp9m2xm+c//PBD3cbly5dv3xZdvz0kJCQn6bMrI8PDn42NfV6uxn33u989f/48+sZVK5sbqTowMGCjcffvP/j884mRkeuffnoVCQnJ4+nWrdvC229/+umnuo3R0dFbt267fntISEhO0vDwZ5cuXU4mx8rVuJdeegkjVauY7Zg3bvruzLVro0NDn1y6dBkJCcnjaWTk+vj45Pj4pOmG67eHhITkJF248PH58xev30hi3jh/sQmNs0HRuFu3bsfjl86d++iDD+NISEhISEhI25s+iL///vn33js3Onq9LI0jgcZVJTYal3aMuqbH0tLSm2+++emnnyUSN65eTVy5cg0JCQkJCQmJTvr44+HXXnttaVOQDgeNqxpsNM7o6YulkCRpZGTk9OnTJwEAAABAl9dff/3dd981/lpXWC4F6XDQuOrARuOs1tYFAAAAgJcx7fi0iXKsPAEa5xVsNA4AAAAAPqcMjUNyJeF7gYSEhISEhGSVHGkcAAAAAADwPtA4AAAAAICqBBoHAAAAAFCVQOMAAAAAAKoSaBwAAABQa0TPJZ/qem/Xwf7aSE91vRc9l3T47DzPt7e3s7VCe3s7z/NWDwuNAwAAAGqKkx/c+NOXL3zjs+Wm8Y3aSN/4bPlPX75w8oMbJZ/93zs7u7u7U6nUo1ohlUp1d3f/e2en6fNC4wAAAICa4m+OvPuNK8vPTz1cqRWen3r4jSvLf3PEcl0ElUgkMjc3t76+7vYtV4z19fW5ublIJGL6vNA4AAAAoKbYdbC/6fMNt/WjwjR9vrHrYH/JZ2dZ9tGjR27fbIV59OgRy7KmzwuNAwAAAGoKReNKLtxZXTjXuI2NWnv2jY0NaBwAAADgCxSNc/suKkxZGkfhfmgCjQMAAAD8AjSOwv3QBBoHAAAA+IVdB/t3j60vbQOngkzwlM3xyx077TNsnt1j6841buuXOxVktOzsuGyaKXhqaWnpVLBw+HLHznwFFLe2DDQOAAAA8AuKxi1smaH2narFtJxcWDjZQnpNy0lDJhN2tg9t/UYWFhYWnGvc+noFnn1hYah9Z/7mh9p3tpzUPnzxuU62MDvbh5Q8hbyasyvA+vo6NA4AAADwBbsO9n9j7GG6Mgy17WjpIb6m0+l0Twujbg+17djRNmRxck+L9bEy+cbYQ+caV4kLFh9MeXSiAkyfmcxFVlYFgMYBAAAAfqGSGjfU1tI2lE73tOxoadmhD7VVzNEc4IbGEaHHHtJJ81s9LcYaqLDAKUDjAAAAAL+w62D/N24+nK8EPU/mPebJnkttO3a0XZqfv9S248me+fl55fOlNoPc6VXvUkXu5Bs3y9C4Slyw8LzqExcevLgxP3+pbQfzZM+8RS0Ucm0VaBwAAADgF3Yd7P+vo7mprXNsD8Mwe45NHdvD7Dk2eKBeryn1Bwb1pwweqN9zrAKXNvBfR3MONW51dbUSF9Q8755jU+qzmTzi4IF6Q11UsCZWV1ehcQAAAIAv2HWw/78kspNbZWB/fXNzM9N8dPJoM9N8dGB/ff3+AWX3UeVw/f6BYtajuq0K818SWecaV4kLFp9PfaaB/fXNRzVPmM80sN+guAzDMJWqCWgcAAAA4BcUjZuoBN3NTHO38u/Avjq9ptTtG5iYmJiYGNhXR2ya5dg6ZWlcJS6oPFR3c1HKuicmupu1z6TUD1kB5PnN3ZW4kYkJaBwAAADgF7ZF4/YVTKWgJ0V16W7OS85EReVFC12NU200L2n5Z1KkrviAeYvTyyspfpUAGgcAAAD4hV0H+xsTmfFKwDcVwmp1dXV7z46Pj4+f3VvXxCtf6/aeHR/nm5i6vWf5Joap23tWPVpxGhMZhxqXy+Uqe2nlmc7urWPq9p4dHz+7t45RnrFQBcUNw1kVIZfLQeMAAAAAX7DrYH/jSGasEnTtZnZ3jY2NnXmhbneXsuvMC3W7X3ihjmEYZneXmiGf2QT18NZoHClD4ypyRZUz6tOSe3Z3Kf/mP9e9cEaTm2EYdddWgcYBAAAAfmHXwf4/vbaSrC3+9NqKQ43LZrNu32yFyWaz0DgAAADAF0Dj3L7ZCgONAwAAAPyConHXa4uyNM7tm60w0DgAAADAL+w62P/E1eXR2uKJq8sONS6Tybh9sxUmk8lA4wAAAABf8DdH3n3i4uzfXZ0bqRX+7urcExdn/+bIuyWfPRKJTE9Pp9Npt2+5YqTT6enp6Ugkoj6jLMsjIyPKNjQOAAAAqClOfnBjV3f8P1+a/c9XpRpJl2Z3dcdPfnCj5LN3dnZ2dXXNzMxkaoWZmZmurq7Ozk71GR88ePD2228r29A4AAAAoNb46fvX/9tLg7sO9tdG+m8vDf70/esOn/3QoUORSIStFSKRyKFDh6weFhoHAAAAAOB11LZUNKoCAAAAAFQTalsqGlUBAAAAAKoeaBwAAAAAgEcxtqWiURUAAAAAoApQm1Cnp6djsZiERlUAAAAAgBoAGgcAAAAAUJX8/0eqvBegu8IAAAAAAElFTkSuQmCC" alt="" />
在 Excel 显示“开发工具”选项卡之后,注意选项卡上“Visual Basic”、“宏”和“宏安全性”按钮的位置。
2.2. 如何使用VBA编辑器进行编程?
VBA 是一种功能齐全的编程语言,并具有一个相应的功能齐全的编程环境。本文只介绍那些您刚开始编程所使用的工具,而不介绍 Visual Basic 编辑器中的大部分工具。出于这个原因,请关闭 Visual Basic 编辑器左侧的“属性”窗口,并忽略在代码上方显示的两个下拉列表。
1. 单击“开发工具”选项卡上的“宏”按钮。
aaarticlea/png;base64,iVBORw0KGgoAAAANSUhEUgAAAhkAAABkCAIAAACkW7XqAAAgAElEQVR4nOy9eXTb2J3ni+pOp1+fznmn3+lZXmf6Teqc92o6M9097UkmnU7YSTvpLNVZlapUUiWoKqzdVeWFVXbZEknb9C7JG+VNXGVasmR5p3eJomRatmXJlmXasiyKEiVqpzYSXAGCF7rvD5AgCIAiRVFSVTV/53tsCrwALi4ufx/87u8CQKhFM9zd6X3wpn+ygyCISCTCL0DOkILLF8O8D35P4UPU9Blq+vQS6gyFD3kf/H5pjvELYz5/kKIomLOltQW2/KRrqFq3rVq37aROcVK77aRGUaXZWqXZWq3bNjzYF4lEslvbnH12jO45CJidBRSVddEgwQcqvG35M8OtIRwnI5GEAv24pxTzPvLhBMH5ajHke/A7Ch+gJquoycolVBWFD/ge/G6xj+4LpdlZzBfIsWTpbXZ21usLzM7OZrDu6HCv+WIx9HdA/0Poa4e+B9D3APraoLcNYnfM53f39jwJh8O50/qFNLrnLApLoiBxGvChU0H7QW9bAQcneD/u2YdF6iOeUmy6c5pPmqzL1/4KFeqnXDpqQrt0cumoUL+v/ZXld9CfI+VYskyWMUtGh3otV0qg/yEYqzpTIV3/wWubVhdsWl3w6Yf51ys3zI4chiPlN4277N3WrOPkwTMfAGDubaYTEoXD4WaL5VR5udvtzvW9+dpisQSfeeJtK6BBQouDE8JJePZhkSuArIiQqiXCie/hK1Soj3Ido8aPLp1cx6hQn+9hjiXzk8frX6Tf8+kdyOkdiFaK4DgOAFiMXfBtn/7qHNrP+0B/TqmsHwKVUcsPD9otV0qg7yF0VRpPbDpyuKy3t9fpdA4NDdnt9qNHy81nt8LhQxP3Prpp3Jl1nBSph1qezBAEsZBtEgRx/uzZ82vXdb3/3nGZbGJiYsn6xhfD6J6DAIoCILnm6QX4IGHjZLinKYTjITVOXiJpkNDylGIznTOLihN/x2+poJ0aP0SNKZdO44eooN3f8Vt2TZRGp8VosRYrLIUSY61FWeuUqDCJyilWOsXFzjyFc2VhTBLnsrv1ZZEb82XR3Yzba8o3IY72XX73wLndCBzYWCFHBh2Peq2V5mPISF8jnbTL1u74tk9/lZqdXYgANQuo2QigSECRESocoT6Ul01MTOA4nsV6UhSFpdHyUxPDJ7UKOjVSrd1muVICfe1w/MTjhs3yjWvsdvvY2JjX6w0Gg4FAwPr4yeEjR3pvbYHOAxPNq24ad1QcLqo4XKg/tEl/qHB4sHeBeZRC9dCmcmdD62jGOCEI4vz583duNvWUljx4veDiD35gKCkJhUIL6RKjw733mi8Za5VGg9JgUBpUCoNSoSxWtDQ3GeoMBosx4y1/No3uOQgAFACzWRE+0ykIkihOurdVFP6f09PurtXPBHBSgo08GA2FCJIE2aoPW/5HL1PBHmp0PzWyN1H7sqrEjY/up4I9/kcvs/FsMVqcSgVWq8SKJVbxSkutUWmEilqoqIUSAyYxYBIVJlZhYhW2YpU14SjMcpGwyc2c4zXLUZ0jsQUcOrRA18dtFrNMxCu53KKoGY83i869fBMCRze3ab90thgBvR/AgY3hnveajv2x6ciXSefHxn0IhmGLmhleCEvA7CygZiMUxQYJQYJfvFk4NDQUCASyWE+KotypWn5qYth8sQT6H0L/Q+iLpUbGDXCsYuzu2pH23ZWqLZWqLZWqrVXqqDqvrx5p2TBxZ1XEtm3yzpuu5gJXU4Hr5quupt83nN060NdNkmTGdd5U7jzdTG482m+6lwlOCIKoqqk6d/n0w/v3n3V1XvjDG+d/8pOju3a53e7MavX44U1jrdKgeN5Yq8SciqhsEswqthrFymKFwWI0WJXsVfr1BUl+1yKRSCRvihUq0PcnrhX96jNgdM/JGkvwqYfetvyQQ5UMJNdL/2LbW18ZGhp58m5n1+pnU8ppBiS0Tv/4zPS0myDIxfBQAevLVMBGjZRSw8UxlVDDJdRw6RyCCCKo5KvQ24ztYqSUCtgC1gSWWIsVWK0SWgyYSuJ8dYVBnCdWOvOYiEQS1wqxNY1Da5SxWNKnK0B1jkSWNMpQfV8SloA+PcpH0XKzZNqdTZb03d/epv0SHN0M+9bAwaLZwU1w8NNQz7uk8+O6I1++11DicrkIgsjW7vjGsGTTHn1x+cVthy5lBpJwDCR4GPzizY2LwZKULV+t3w79D6H3DnRVQZeBpggc1cFRPRzReaxbx+6uG2uRjLesH7+/ydVWNNFW5GorgkPlcPAwHNgH+4th7w7Ytw3at+CP1kw0vrRpdcFCWL7xmFN5dup0M/nJob76lpF54YQgiJqqivd2vve1N75eeuJAd1fXA9O1HYWFg4ODHo8nsyqxQSJ5dSUDEqw1D7OsxOpWKGolCouYvQoPE3FrkguwhF74WWPJtDvKkixoxvQPod4yYvisIEjuHv2/9n34lW1vfeX1Ynvn+0+fvNvZK+mb3DvFgKTq+yervn/yxxuf/vDTzpXrO7//8ZN/ljz5ruTxN97vCASC4TC5wOoJsmS92vlxuXPdsYE1R/s/OtL/QZnj/TIHmxmvF9vzd/f8fqftlR22lxW2vK3dv9r87OfyLnaZ70oef2et9RvvdwR7d5HOPalZohBjxRJMpcAK85x5zxvyVgqeHgyDK1+VJBxFnw5NGpfQZcwyga/MMlTXBxw6FNX1UcmDm6ihOke2ukSGoqjJGU8WWeKdsp0rRqBzDTEgNZf9ec1O5NqBPw3Y12JP3r5U9sdPHt2cnp5eyKVxSmNYsvPwGWp2dsexm/Sfhovthovt+vMPNGfajtW0llW17K+4Xay5taP85tbDTXKluehAA194GIQWhyWzs7NTM565c+8nddugrx1OnITjx6MUGTsOXQboqoRjx+GwDg6r4JAajhmgqxaOn4Ouc9B1Fo6dgiMGOHQMDuyDvbtg7zZo2wxthZONv960umB0dDQUCmVW5w1H+5Vnp5Rnp07fItYdtNfdHUoTJwRBVOqPdF59e7DfLD60+i9f/2+qk0eK9+wZGBiYmprCcXxePdBQZ43KaIyCRJwXxUkMJE7j81bD8xKVWFKXx1433bgk+keUL58pltA9J2ssGbvwH9xN3+HjhAFJ8ftf2Sr+8x1niR1niM73n9rX9jI4oUFi+OcTmyoDG08EPjX4Nxz3r6/wr9f7vvF+x9jYeCAQXCSWHLgaOXAlsv9yZO8lkmZDycXwngvh3efDu84RdG23ncEVtfjW2tDmUyF5dUh+MlhUFSysDNC1pdf6xvsd44+2BHt3pmSJpdZgFa90vrrCmfe8YcVfGIuVVifmdGIWqzNBrc6VeZI0Ds0si7GkT4fKzBQAVCwuiRXgsERmpr/q6+NhI2HFLwJLrpV95dgmhHJ+CEdkTeVfsdvtAwMDQ0NDp/f+SbBv7eST109sf072BhIMBhcv3cqwZOvB2r0684bS+nQTJOyIhIxGJCECBInI8rFEAX334VgFHNXDUS0c08ExA5w4BSeNcPICHD8Fx47D0Yor545WnL5SXn3tSuPDs3Vt5dX1py9ceHzvFBzWw34l7NsOu+XwWeFkw883rS4YGhoKBoOZ1fmTw44DZyYOnJk4cmHy1M3Qh6XdjW2poxOCIE7oDj279gYM1ED3mRFH4ys7Cz5c/1FmIIEQGuqsEEKnzcqAxGlVSMR5mFUsEa90GldYVc8bi5+X5D0vLs4TG7ksSYhLmuTcMKVJXiCXFxTom/RyuVwAPMnCmiWzLLNk8Mx/gHf/xt30nWD3NkGQbHvrKzvVjTvOEtvPEEfV7ifvdtrW9PRK+miQaP9Jt+/v92+q9G80+KMsOe77RO/7xvsdAwNOn8+/GCxZe3TgwNXI/isRmgell8iSi+HiCzRLCJol288QitP41tP4llP45pqQvDoorQ4WVQWKKgPs2tJb8Nt3pGSJ0WhxWixGcZ4hb6VRqcQwjD4fGBETBp0uaGm1rnhRzKzFjzh4AYVchgrGGboElsRr4tChoih7PmOamM4aSw5tQKCzEDoL4UhRrQIZGBiYmZkJBALF6xB/31pahySIy+XKbh6bbfPNlzCZ9ggrQcIGSQBfFJZQVOqWP6lVQG8bHNXCMS0c18IxHRyvVla3HTe2H6y4duly7cCT03C8Bo5WPWo5f954Xn+6obtv3OMLD45jV289PWVs7GqtggNHoH07fLZpquFnC2TJx2V9Ry9OGurdJ82e6kb3SXPorZ2drU/GwuFwslUIgjBolV1X8qG/Ck5UwemT1lNv7Nq60el0ZgYSCKHBaIUQGmuVNEIsdUaJOM9pEUvEeVjdihVf/4uVK/5ixdf/okSxaWXhSnGtEEuahAYMCvT9dAii1xcU6Pv79QWsQOWzE5fQPQcBgIpkQ45Tfwnv/g0bJ1yQaJt2ngvvPItvP4NvOx06ciyKEwYkm3faN50IbDQEPjX41x/3fVIRZUn/gNPr8y+weoIseU/ZT4Nk3+XI3ktkqZEsuUgWXyD3nA/vOh9m13brKXzLqZC8JiSvDsqYuIRV22+83+Fsk0IEEWQJuyYGowVCaHVitCCERovVWGc11lkxDBrqrIZaq7LWYrRYV7woTnpEZjmqc6T3rVmG6nqBQ4ui2j6qN9k4GWMyc1b6Q8YCgHJNzmSLJfvWIgclSKR/FeXcWH/4Txn/W7XjSx7bupEHr6u3PCd7A8m6X06ow3xYwp+yxQeJP7RYLEnZ8lWardB7D47q4LgBjp+A4yep8ZonD+sO1HQQ4dlH3cMHKq4ZjSfhSBUc0sHRqgsXa/epau886Mb8YSwQ6eybPnGp7crlGth/GNoUUw15hWteXwhL1h3sPXXTU2vBam9hp5uxM7ewSlPgDwpr22NhnBAEYdAceHbt9xA7Dl0V0FXRXoXulK9dCEgghPSPGnM5FYVip9OJQWhttUjEedbaFSv/6XmDwbjixWiO5MztM3mKhGFthiXR8IL5EP2iX19QoG/6rOfeXZMzSARQETCbXOm6gBlnAx2aMDixVf0lA5I/SGte3mb7zVbbrzZ3/1Le/XPps38r6vpw/dMn73ZWfr9q39/vf0ls+Z7ksWit9btrrP/0kfXbHz361gePvrnq0aKyJJYU6Sso7s3fY39tt/3VXfbf7ej57fYefm1/Wtj1442d/7rh6Q/WP/mXT54wtaUrSbPEb98RS86nYEncmFgEg04XtDqh1YlZbZixjmZJ/Fz06gpEInkD/adZLkL1vcxnWWMEzEaAQ8slhbwhkSVxwIiif/b2JWfSMrFkzDW9QJYw95FgGObs66je9Zz7yduB3nWn9/4f+yTIyR1/7Hr00Wj7G4btzz1+dHtgYGBp4pLm+/a2x0OVp6//6w//lYMQPBzBgsQUFnTN+EcmvUOT3qEJ7/Ckb2TKNz4TmPQEZ7y4x094g6Q/FPEFyUViydhEipav0myB3rtwTA9dNXsrGi7W3aQzIo1N9UfPPQNg1jXlPVBxre1mBXQeg/0H4aD2WWulUlNjd7pcbrx/nIAQtj4eOnf2BPFs31RDnuzjNxfCkjX7e842Y+fveFnCDHW+fHn7PesoBycEQVSo9nZdeRl6NHDkGBhR39G9skO2ZoEggRAajBYMwgQR0NJqkYhXWp2YxYoxLIEQ+kI+9rpRKiSPS6KFCvT9SUotO1TonoNEAEVfCgkqfReAE2FX33UGJ6WrvsKApK/7VgTMkpFZMjJLkvTIL0WEKTwMRh9Oqf9R03d3KBCKBEIRXzDiC0a8QdIbIDE/ifnDr61RLBJLIIKoa810W8zSYn7b1CwAsxEwSwIqDGbDdJ3DFB6mQgQIESCARwI48IcivlAE85MeP/naGgXNEjouieJEiCVKlRFCSGdEjBYrRkCDMRqLWJ1QqbIoVBaFymKo48YlgJoFVKNMJJfJRTK5XCQSoTqHWS4Sofq+6Ply6FC5mYrNCaYcWlSQJQ4tKooGLn06VIRq+6gGna53uSnCsGRkfHKBLKndgYBBedUWZGx0uKWhpHLnHwfsH3o73wnaJQHHOl/vmtH2N9xda48WIa3Np6ampkKh0BLkS3710quVlSf/5m/+h62nh869687dP1Jzd99xyy6VWXHUtLmsXnrgxsZ919eXXPtkz9V1u69Idl/9eM+1T4qvfVJ8fX3J9Q0lN6aw0IyPWCSWjKZq+UrVFojdgaMG6Dq9t6Jh//EGa+sFOF4Lx2uv1tdbHvSC2dmegfGKE3roPAZ7d0JHMRyuOFVjaLP2OF3hLifu9oUhhLcfOqqqtFMNeTulHy2EJR/ts1286zW2+C62eN/a+eRss+e0xV3TNKO/hr1S1NbyKI4TgiCOq0q6r/waTh2FQ2XU0NFm9ctZAQnks4SgLw0xGiTG1gSWcCw+WSv2t0D+4zM/J3h0fBLJlgsIk5FgCGdwwoDE0X0rQs0mY0mIoCYG3EEcLDFL6MEoVa0ZRikS/ZeanaUoGAGzEWo2NsgwS5AUQVJ4GNAsCdIsCUV8oYgvSLp9pNsX5rAkugshliiUhugZ4EckNsxiwyxWzGLF+CyJuX4RqnNEzHJUp5OJRDIzuwAND2aMK/Zn9CuaJSyQRDFDRYCj16xDl3t0i2HJ0OjEfH/YPZ1Xyzch1tsHp6cn26r/4eYxBI5uMx9Czu57/tAmJDL4Sc2uL5/c/kdTj98IONaN3UePb39Op3jO3bX2kzeRmZmZRZ3HtT/GktpLd74j+oG+tomanQ2FI1Pe4NAENjDuGRj3DLqwwQlsaAIbnvSOTPlGp/1j0/7xGf+4OzDhDk64g5OeUFwYvkgsGRpLwZIT5ZuhuxmO6iMj54/Utj58Nliqu97/6DQcrYbj5w9W3Z12Bydn/NsO6KFTBe07oH0PHNIfUNeGw+SgK/zYEXKO+uEsnJ2F+vN3pyxvFG+RLIQlq0qenb/rPXcHO3vLI95mzZe3V5qmKuomddcnNFc8L3/aYu0eJ0kSx3H9sT3PLv8CTpTBgVLSqTQd+vV26eqsgARCaKi1YBAaao0GgxEjoNJgVKriMlicyVlCQ0Ew3mBFJp95lgyNZY8lHJzsee8r2976SuXJE+fqn5ype1J743H1VWv1VStBUieMHRUX2nXnHmjPPFCfvl9e2xYMgbLKlrLKloMnWvYfv7u34k6p/rbHR3p85GKwJDYGVaI6ZYYQzs5CU6uTUV3LwPW7jgigLlnsF5psZxue1dZ1Vl97fOJyR5AAmrNtx2pbDlXfOXDiVmlF0x5Ng9sXdnsFWBLdURKWGKMzCK1ODCprLUqDRamyWGyYQmmhxWMJPX4VY0OcFiJRlAeJLJHJURHnK1TbRzXIGPzwB8SWP1mSMUvKNyGRsV1PT/zpuZLnyLbvwcF1cHQbdH7gbPrRpdLnyrf+Mdn2vcMbkKrdfxRwrFNtea7jQeOV05+ufxN5cO/SxMTE0txfQhugKE8AH57yDox7nC7PoAsbmvAOTWIjk97Rad/otH98JjDuDrjcgQlPcMITnPQEpzyhKQyfwuh/8anlY0lluQy6LXBYGx65sOdE6/iU/07bg23HbjxrPwcnLp003sLDoNs5LVdehUM66CiFA4fum1XXm59S1OwzZ6Dd5ns24J3xkQDMXrtp3b1fqTq4YyEseXfP01qLp+amu8o88/rWDoOx85WitvJLY4fPj5adHT5hwraUP73V1q85vOPZpRfh2H7o2BXu239138+2S7MTkdBGs0QwIjFYnIa65CyJRiWsYIT+2CSnc+3/TlnC4KTieBkdkQAQm9cYmY3daUXhYYATACdAiABBHNBBiT8WkWDRiIT0+MLuRWBJPJkxXFJ+qiEalMxGgxLAjG7RFSapMAmI2NBWiADBeEQS8QZILEC6feGZJCyhdyfAEgI6nU6rzWmNTf81WpxGi9NQx1YCSxgGNMgYtx/bJn3fCRsDCbn3GDPiXKESo5O4enVoYqCzLCyZdQ6Pz/fnfd+8+2HFn8DJvaBvHZzcC4YUYHgzGN0MRzeDvtfBmOTIp8jdhoPrxMi6N5B1byADAwOTk5NTU1Mul2sp73snyMgkFoxSZAIbmvAOT3pHprxj076xaf+4OzDuDkx4ApOe4KQnNIkFp7DQNIYz6Z9pLzGN4VPYYo1xDY6kaPnKoxvhzE0wcASO1SgN1+50DEzMBG+2O7aVm0/feDjmGg/hYGwa36JpgyPVcFA70HJAXfKGUnPeMYY/7vO1dXk6HVj/mP/6zUe6Uw3amiv795UshCVv7+o8YZo+XjelvTaZv7nd4XCcb7DnfdKy3TCwp6q/4urIox7vtu2yJ8Z/hSPFsGcLYS++uPsnO+TrsggSGI9LLAaD0enCOHGJ0piUJTGGxNCRLBdCsyRZ9LLck4LpnpNlltA4KT/VMD3hBNTsmbonp288rr32uOaatepSR9WlDoIEFefbteceqM/cV9W2HatpPVLd6g9FDhjuHjDc3Vdxp1R/u1h7e7fmltsXpseOssgSFkiKqeESVU3DLITU7Cw7Irl6u++SxU5GKHZEor/YrjnbFsQBOyLZUV6/9cj1GW94BkvKEnqn7BS6QmlY8aI4TS2vW18WAUD1D43N9xc+MzV2oRgBQ+vg5N7J2z+4ffjPjq5HbpR+2XHjW3ByI9GZX7vzuafW5tHR0ZGRkaGhIZfLFQwGw+Ew/XKdRfqN0caMcdXd6rrRbFNqz/3z91YOT3qHJ72jU76xad/YjN/lDrg8wQlPgObHjJeY9oZmvPiMD3f7CCb9M+MjpjHC7Q3fbX+yGCwZSNXyVUfWw2kzdOyDQ9pHd6o3H6lzDE1PzQQwPxEIksFQJBAkp9wBtfGpvvaa7bZSswc11a5/eEdzqLKxowe7/WjkUKVp4+6KLfurBoanbrXZdihryk9caHnwOLMHar254/G+UyMl1cM7jjtfld53Op1ut/vGbecrm1qOXRiyPHBt2y7rurQSDu6ANinevfPMth9vl651Op3T09PZAgmEUFlrSRaRKI1OZe0cY1xfBKN7TvZZEgGUqqYBxFwnGaGYa3yCBAQB8DAI4SAYvcYHfiZNEiC9ftLjJz2+sMdHMj46WyyJJjBYLCmvaYhGJBSkonMNZklAkYCpcCzfzsRPIeAPRrx0bQMk5ifdvvC0N/yHT3YOPtjit+8GQ6VgiDsnGCIp23mOqXQL0fKzIQOWOJwj8/qRRyKRJvXzZMeLNEiulPzn2yZ9j91+8sylE9v/41PjN+GQpPf6ihO7/uf09HQgEAgEAkv8nGBqdjYcAT/95Stlx7T/7//39dttj0anfIdO3j5cfafs5B1lZfP+480lulu7VU3FmltHqlsHnV3lm5D79y65pnyd119h0j+1ZaI++/2Qp71m15dtj69nnSWOwRQtX3N0LZwywd7tcOAAHFTpKivlB8+eudHa9tjZNzQz7PLOYCE8DO4+9W040nrs4KfXq9Zbb+0c6zUckX3jY/mBD2SH9u9VPKwr3b1n+wHNuYumB2ESuCaw2su3Kk7fyGCk8Q3Foy3a/i3a/s1qxyuFbTRfCYK4fLP/xJWBbdtl1jMvw8Ed8OmGQOfWStnKHdJ1WQcJhFBpsKS8LszWvj6DRvecrM0JZqu8poFet/aateaa9eSVR1WXOo5fbD9+sR0ngObMfVXt/aM1rYdP3jtUdU95osUXiJTqb5fqbxdrm3drmnepbu0ot8x4w9NzsWR+njQJS0zRC0ZWRELnSMIRwI5IjtW2HK654w9FDlbeOmC4ud9wc19FY6neXKI1uX3kjI/8aPOB4Y49Acd+MHwQDO8TYglgabk89ecAPwBQvQPD6f/Or5V95einyC01AkclkbEdd8r/7K65wul0Tk5OYhj2wKI5tfNLwLnK9/SV88VI8Wpk16olfeA8jMUlM77QYUP9N7/9/b3qK+Mz/nG3f8IdmPAEp7Ag54PHjzPpnwt7v8RJ/1ze9yUm/ZN1lqRs+cpDn8CpOtizFfZuh3174MChW3WawyrNpzvL35OXf7BFd8H0KBQGOAktj/wb1W22dqWrc//5PV99ayUiee9XN89vh/a9sKcY9h8t3LZreGwKzMIACVse9cv2qNxu93zrXLDloVztkKsdMlXfyxvv/eC9mz/64OZvP71besJ27srtCyVvwT4TDRJD0cq1a1bdsHRNTEws8DHAOeMY3XOQSITKusprTBFARSKzrIiEIsJUNEdCRAJ4JIBHAsFYmiQQoa/xPb7otKgZb3iaYUm/0+v1L7BKdBqcy5JqE8VMgI6lSeg6E2F2hUG0wqGIP0T6Y9EJPdPfGyA9AXLLAd3Y06NBpwqMloORMu79JREAESQSAQtT9s/UZ1AAUDbHYPo/9UMbEDC0FY7thGM7I6Pb1B8jPXb75OQkjuORSMTvndmYjwDH+3BwNRxcTfS8rXgXyfrT2ue2fforfjw8Mu0bn/aNu/0TnmhGZMobnPKGZnw4/4O982rK9M+goyPrLOlJ1fL6Q4Vw4gYcKIPdUtizZdZeSjrKA73HPT3V0KmCw9W/eL/4UM2dzgGciMCWLrDu8N3ze7763g+Ry8deh31K2L0Vdm6Aneth9/ZLNSWnjDen/dDY2PX+xn39/f3T09PzrfNrsgcyVa9M1Ss9Zi882lN0uEda3nf03ODtDldJ4Qf4g+NwvC3ivFEp/fHaNauuNrQXHmiuv21b4PtOcsYxuucsDkuqTfSH6qvWqsuPTlzqMFx8qDvXrjvXHiTAsVNtR6rvHTp5T1nZcuDE3X0Vd7AAuUfTvEfTvEt1a2e5Zfsxy7YjN6exRWfJ0RhL2BEJnSMhwhQTkRyqvnOw8taBExZ/KHL4ZLP69N3jF1urr9yvvdZ++sZD+i6T8qqLk701oZEa4KoEY6ocS5aMJfvWInvXIg2HETj0PhiSNSq/3HhDy6TTH987WbHlj8K9qzwPXz25A9n8B2Sx73Ln23791WlvaNztd7kDk57gJBac9ganfSE6F+Lx4/wPHl9w7vTPmYvQM7gAACAASURBVN1fGh4eXHqWPLXetZq2zdwWT5p+MWn6xWTjLycbXp5oQmmNN4pvnN1bsHrzoZo71v5QOALbemGhruuy6u2Rxg9c9S+56l+auvHiTP1P3Y0vuVskmzbv2ae99PHWMofDMT4+nkEG/vfS+0XH7EXH7JuO2Dce7tl01Lb7RJ/R4jpRdfqh4VM4dGu297K5fMPaNavOXG7RXrAZbkz9y1s3LPedczxkJWfztShLyAhFRkByURnoaLWJfvwDE5EQYRAKRyduBaKJh4gvEM86RIMSLznjJWew8AwWnsLCU57wa2sUjv4BzOubs5IpRE+mEmJJfTwiAQlRFOu2xOjdJIFghI5IXGOOKyfX3zwvu3/1k3vGda2XP7l7fvWd82tvnfno+L7fWpt2A9cJDkuYaizkKD4zyqRLpC8AqO5eZ/oswXF8YmJCK/0zX+tKOLZ54Nq3a/b8pxZLjdfru1J/88im//zowjcijtWPjf9Dpfg6/cq/JY9LrtKBiLHhcUOLXV156V9W/sDtJzA/gQUILMD94A+FW059n0n/mMv/58hQdwAnu+zOswf/jkn/XDuen3WW2HpTsCRM+B63nqNfwbtpdUHhmtcL17wu//itPZvXHS7dfEpfemL/GzcvFL30YXFZzZ0nfSE8DDqH4bpD7dUVh/XHSvdsXif/+K2itW/IPn5zl2zNYeXB4zXn6TMSCAQyGHj87abWTUfsm47YPz3cs6HMJlPZj553mlscKrkY2i4MNRwsKfygovJ09cWWQyfbt2q6Pj7QqTzn+uZrV289GMzhJFtG95xF8W5Hq+vpGcCVlx6dMD6suPhQd75dffq++vT9YChyuLq1rOpe9FYS/e0S3W3MT+5U3dqpurXjmGXb0ZtbD9/ccqhpykNMeYhFZcmRk1GWcO4j0V9sxwmKfR9Jic5cqm/0h4DmzF2LUT7Sc8Y71eqfue131flGL2KDZwatx06X/bJJ88P17/4zmKz9QrNkcQUA9cw+kD5LAAA4jrtco1dLnwM9b8KJjfYb3z1X/CdFbyCGLX/06MI3In2r3e2vlG98rvPRndHRUQzDlj5fMoWFZnyhf/vV7zQ6wwv/7b8/fPwUCxDas226c/c1Z9rKa+8drb5XXtvW0TXKT/8M9D/1+okZT8gXIGzPHvDTP9mqJ0WlbnkAQDAYnJiYGB4eHkq0Jx23T+x/w3T64857pfv2vvPi2zvKau486vOHwtDa75coW3p7e+mHNDM2PDw8MjKykDPym0/v/Xh1848+sPxw1c0frWrK23B7p/Zp8T7NUMPBh4ZPVXJxRW1TsermRzuafruh6Yfvmv6x4Oo3X4sqh5NsGd1zFsW7HTlZz3pKNoUTVMKtJKyJW1h04hbp9oZnfGF67tY0RtAgmXRngSW0BxdmSVU9ABR/shlzf3sQjwTwaFLHFyL9IRDAI5dObqytkJtq1p3XvFWx73dHt/3skPT7uyT/eMfwve6LKwvf+RaYOifIEjKHkzQEANVl65/vcLbt6c3jWxAwKgk/Q+Hkx8DxIehfFel7D/R+6G5/hbC9X7oauX/nfMbvOFqI7ddf9fhxjx/X19789ndWHjHUe4OELxj2BcO+IOkLhukHPXiDYTJC8dM/MxgxhRFTHmLSQ0y6cX76J1v1pKi0Wj4SiRAEEUy0of7OE/vfMNVKOu+VPrtb1HDw//7458iLb+0oq7nTYQ/gYfh4wLvhUNvExITP52PWCoVCdFor4+wFHZVyqPa973//43Vrzpw5MzAwMDg4OCRkw8PD9LNzcomThRvdcxaHJVX19EgRP18SCEX4+RKPL8zPl0x6whNufJFZUkfn2zn3kRyrbQkSgH0fybajN3aU13mDEVXt7XP1HWcuXjm8591b+p89rP75o9pfd51/qefyr3uM/zp4+UdbPvgOmLqQY0nGAoDqtPXN9xeueBsBo5KjG5GzO59zNvxj8MmrcGgN9uB3Ty//vboQOfgJQtjeX48u+uNSBG2//ioWIKL8CNEICftDpD9I+oKkL0h6g6Q3ECUKP/3T7+ia9BCTHmLCjfc7nvDTP9mqJ0VRnd3zbnkI4cSonQFJ153Cy6VfXftvSJW6WGM49VPxjrLq2w/s3kAYPu33bTjW5vP5shgU0lFps/qFZvULzeqv3z3+vzrO/7rHsqnvzvZnpo8env1Fa+W37+r+vln3t83qr8eKpdYSR66fd6N7ziKxpI4gKSIce1A2nSOJByVkNE0SID0+0uMLu73xiGTaE6YjkkkPMbHguITx3YIsOVxVF524Rc6GWRWO3k2CR+998QYjWIC+coz4QpEgAVrvmk6pN+CYicAu46N63LYncH/thEWsU/yg6vA7YOp8MpaQOZykUmYsedBap3gXaTKf7Xzaebn8v58vQeDQmqptyJXyb3U/aWm+cWw9irTfu7bYj0sRtP36q75Q2B8K+0Nk7F/SH4r4g6QvRNI/ByxA+oP0c0LD3gB5Ytt/ZNI/Fw/9Xbftyfh0sM3ao9/+t0z6p/bor7OeL8mAJRyQXCr9q49+ilSpi+ksSK2x4cfiHWXVt9vtPj8Buwb8nx6+l12cQAib1S/AqSb637vH/xd0322t/j6cuXNX9/fMcta/5mb1C3Cyvln9AnRda1a/AMeNzeoX4Mi5ZvULcLj2/J6vLXFG7fNui8iSw1V1OAlwAvDzJb4gyc+XuL1hfr5k0k1MzCwySyrr6KEtdkRC50gCeIS5s11edlWmvLzl0FVvIFJ+qvl8/cNypWxqoAr3XcfHjuOOA6EHa7G77ziu/Fbx0T/hEyYwmXSMi8yxJJUAoB532efr0UiS9Hg84+Pj09PTbrd7QwFCPHtbko/09vaOjo7OzMxMTk4uweNSBG2//uqH8rJfvLkxHf3yrU1HDOd7HX1X9/7RHOmfYxuf63zyMOsseTLPlo+DpKW0s/nTy6Vf/einyElNidPpnJmZwXEcx/FzV2/+5M3tZdW373d7/QTsHw0XHb3j9/uziJNm9Qtw4AitCyVfS/65DPYfhI79F0q+Bu27Yc9O2L3lQsnX4NNC+HgDfCS5UPI12PGhtuirC3msy79Do3vO4rCksg5nX+PT4Qj90K0A6fVH4mkS+lYSOiKJzt0iaIpMzOALjEvYXluQJYcqb4Rjzy3GSXYURU/ZigclngCJBUhvIOILRfr7+yoOf4L76nFXJe44EGz7CGsWj9S/dnD9t9tPvUa5zWDyzBwsIXM4mVMAUNanPfNlCUVR9ONgSZKMRCKSfGTnh8i6VxGn04lhGEmSS/O4FEETHNOf2+7dvpgy/fPgXl12r50pirLOkyWny99pvLDpaUvpsxbp5dKvrmaBhL6Hg6IogiDOXb35kz9sL6u587AHu//M+7a8ctueI8FgMFu5CjZLkugQTRHYWwrtu6FtJ+zeArtksLMQPtkAH0mgdTXs+BA+/AC2v6fe9Fc5lszL6J6zKE7tUOUNOt8eomfThkA0fR3Lt9MscSeObk3Ro1seYsKN0yxxzSwoX5KSJWUnbjCzlkOxCQIBHPhD8dEtb5D0BEiPn/T4SSxA+oIR4xn1YKcKnziJOw+HHn7saRYPXnvJov/FMaloqKOcmLwOJk4lY4nSYFQajBBBYs99MyiUBoXSoCg2SIoNEoVSolBKCpXiQqVYohRLlMvu2ZdeAMzbo/GNcd+fhcEKekw/MB9LM/2T3ZGiDFjS/dhUvvtXtnsyY+lXP/wJFyTMZv1+/7mrN3/0h+1ltW3qsw/+92/Wn754PYvzIJrVL5wrfv7snudP7/pa7a6vndrxX2u2/9eTiv+nUvHXJ7b89XH5f6mQ/xe99Ku6oq9qi76qLfwrzaavqjf91RzKjCUGo9VgtBqMlgTVRqWkZbAoDcasHPVnx+IsCSdXZu5Aefz6a2sU2VJfRizhXPsLsiT9ehZItr+7qWTDziPFx06W7VrlGz/pdRz2PpC4La/3X/p1i+Fnsjf/5u7J3+7+RLT1o38CE9VzsATDMAzDIILQHzAXplQZnU4n/eRghdJotVqtrVb6fe/L7tnn7h7Z7TZxljxdKEsY9/05TaJ2PGhQvIu032+cmpq6qv4HJv1zXff9ibGBB7dq1qPIYH9ndnc6OztrfWqfnZ1NfxWSJDtar4l/+OdrfyYMEtoAAHR08i/5mwvW7tFWnR8ZGcli1iSDyG9uy+wShPvKVLbFXlaEYXO9F+tzanTPScGSzOT1B4ZHx/r6BzKWwxHXyMiYzxcgSZBC82dJsHfn+KMtzjZpSg3e3zzUvmPEut/1TLtz9bee3t3ece7lx6d+8sjw3Vb1t5pV371Y8s0jG/935+U/HN32K+CqTMoS1YJYYteiqLYv9mefFpWZeAWSvFNHJBIxhZkV+/jFZaa5GtmuRaUNIBwBYebZ9zFDtX3RDtAgYz73pKoPv/MAQD2a/xjXF9uY9M+i7oWi5t3y9BCW2+0eHR0dHR11u93JHk/ClBwfH5+YmMAwLBwOZ+ss05cOwexZZpcgl5oeQPrJ80mEYZjTOSdLBF+qmPxNWezH0kPIfs0J8+bf+PYSH2kvl3M2uoAH19M9Z1FYEiLCXn/A4/VlLAyLy+cL4Hh4MVhCOvcEe3f57TvT0G5/b2mg/1BwUDdkVVWU5B0s/N62VX9X+NY/fPLGP6xF//bj/Bde/7e/3rL6e8/uFINx/RwskSgMYoUBIoi40BCVxJAnUeatikmsXClWrBQr+CwxyVBtL5ibJXHY9OpQmVmoMJslMlMiKmQmDpC4BaIs4YjFDw5L4st7dajMHFulT4PmWJKuMemfRd1LBiyBsUxVKBQKhUIkSc6xOpPTohNXX7xT3Nz+TGBp/PWpmNOFWW2JLJkbE0IeXhg3EMKEN2bF3pXVry9I3EaSl2g1yRfwaq0oS7IOEgGRi6A59wgR7nH5rS9TARsYKQXDxTGVgOESMFw6L1EpVEINl8R3MVJKBWz+BJYYMBeGuTAaJ/SZMFqskIC0DEYLRmDM9UvCUfTqUFRnSnalj+p60vDdJhkbEzqOQ+/RolITu53NUsE9oroezukwyVBtH/9ztD7kPFnSafviOZrPvlFUruUzN4/Hs2nrbqVSKVEoJIUKi8ViabXSb8cy1FroRKnTiVla53wvll5eoNfz3LrQS7JYEUYTs4H4ZxYyEujRr5fHyMJ+V+OCUBLtOciiOPrlFkS4xyXIEmq4hAOD+cNDgCWcd2EFrC8zjlKhNDhdmNOFiQsFWIIRkA6EGZawH1QV98skCJOAJLlRReoxJYYQ0c99Gl5xqYkFA7sOlZnZzciCDXfdZCxJoz4JAoDqyHm05TCKyrV8hubxeI7pj1ksFvrXbTAaFQqF04VFIxIXRr8jy2rDBN/XSwcn8TGp+N8c69cXCC1mtsKKQJrkBXJ5HEHRbzhjXrFtzRHrpGN0z/l3zRJ+XMLHwzwDF3qb3LiEqYZCaVCojAqVkWaJ0WI1WqwIghjrrAjL6PkeiXGJWSYSoVoHGTHLBPwyqrFHfXfcpyeQoE+DRn13zL/LTKyFHFSYZKjGHqOCXYfGAhEWSxggcfkhHJckrw+fJQ+fdOc82tIbReVaPkPTaDQWSzTxTr9gUWkwildJjBarwWBkXtlrtWHKWiubJamGuEQieVPqMgx/CvRN7BAmeXzDvFI+tnxBL4+ne86/a5akE5dkwJK54pJiA51mz5MoIYLQ4QjND3poi45LEAShx1XZo08oSo9fmaWoricCyIhDi8pNEYqMOLQoqu2lEn19Mt/dp5HJpKjMRJqlKP1BgCU0KqQyEf0ng4R4ARZguEpkSar6CLHkcc6jLYNRVK7lMzTFgQNOFwZhLDXigkaLU7xKzI5IrDbMYsUUKisvLhGMCvj+vV+v5zp8plC/vqBALi9gbYc9gsXsJxqfsKMfDpIyMrrnIEQ4shDh89cC95iOIMI9Lr/1JSrQDYaLwdAeMLQHDO0Gw3ti0cnCEcKApBgMF4Oh3dG9DBdTgW6/9SWmGhKGJau4LEEQBMMwZW00TLbanCteFDMr1mu0NpMM1fQS4QapYFzSEyHCERt/0CpusvpwxKZBUU2DBpXVhyNEuFdojCvWaCYZvQoRLYlqeiI2DRotkJB4oddsYFbM1/TS53ru+tQJ9QoAqPbHzyiKms3Z0hpF5Vo+Q1PsOcAa0YJWG2YwWvNeFRstTmOdk77vRFlrVRqsNEsS125MEnjIG1mFHElyJnShRr3e4dAXFOgd7BUSNjDbKJfL5QV6x+xso5xdMEnxeRjdc76ALOGD5DPEEoVSoTQqlMa8VUqjxcoMcxnrrPRtTUpDVAqVkc0S2kejml4iHCF6em1R/84gIcqSeikLBj1alPHvscL1Gq0tYUWGFlEUMavTGIhvjVdAuG6JLKmTiqSm2Knv0eZLG2LdoFeN5ljy2bIcSzI2pVJprLM4Meh0QYsNM1oxSaFixco8qUJ6rPIC/93viWsLuXaOb3fo5QUFIp6zTyjEYclso5y3QmOcJfoEgBXo9fzSaRvDEhJPUz3afBGq7km7vLBMUpGsPkwSWVSPFhWhmp7onxBB+GUyZol5vQg9uHl+LBmmN74HjBRTgW7/45fCkQgtiUJptVmtNmueWGlE8iCCGJE8Y501mm93YUqDxYjk0UrGknoNiqJaW7hBGkcFLbsGZbVtjxaVmmItwP6K+ZxYPkzaNKjUxDSprJ53suIFEmXToKjGHv3TJMvX2PEwiYftalRWx+4/UlOsGyR+xRIA1ANrV3KPlub1E7tYo7xA73DoBX6Ls0kuCjP+VWXHlucYKWrulhfYrLAP5G0+Wb3SN5Zf5FygxxfLeZUR8KYJDjd2AFwvzN1Kgd4x2yifo1tYrVa5XG6oNRotVoPRKilU5L2aZ1SKjSpJTWVFGgc3Z1xCVy9JqeQsmW2Ui6ILYl81Jo9LBNoqbaN7jgBL6qQiUfw3T+Jh0qZBRajWlj2W8J1IHXvgBtXa5rXNxIpBBKE/hMkII//jTOOSe2+jolfM2YpLCpVWq9Vqta4UK7gscQmyhOWyE6/9o03FLKEXolob82ePFpU1xFqgVxP33Ywft6tRbteUmuhzFGvPOBiiPUFqEjgFdVJRfDmzSrQ+82fJowWwhPeTkzcyP53o74VdhPV7TfOnxFqb6y8Z44w1cJawtiPswpbnGClq7pYXqAa9z4TqJHHKc7vrNIzZAHtLCQ6Q7w2TsyTJiJFgFblNK2wDAwO7d+9+55133nn9HfGreUrJSqdhJWwVG5QSs+lGpkdN71bemGTvc8Yl9Dqx3hDbRpIDXRDu6Z4jFJeYZKIEd29XoyJBD5JdljA+iw8zvviXxsxXDEsyjEvOviLUy+KWPExJzRJxoZJ+ANdKsSI+xpUwwBWd9aFQGoVYYoomIKQm9kiUSCQSSRsSBriiY1wmgpmWG3frcZYIxiUJYIjTmrbEOCPeKCxmxFjC3Q7NEmatJFcMAFD3Hz1NmyUJfixhUCBeTMiHsl0T9wwn/001yhO+ZnsZ9s/ToS9I8OCiggLuzzy627RYskTHSFFzt7xA9TmHIBio8GqzMItfbM/y/Ct3//OPS5KFCGn1DsZuXLssyVthVaxwqlZixjzJqrw5jibd3c0/LmGvFk2r8OOS5HhJ3+iegyRx9ywv0KPNF/L+8xDBVmqW2DRoSpbMIYYlbM2PJesl9Oe+ezxsnH0lI5ZEnbVYorS2Wq2t1pWvKpgnqRiMFqcLczqdTptTaTBarU6r1Wqos654URwORxilHOvLEuyzIYKntNcFgGrrEPZoXJdIX3HFfgMOfYG8MVmGkmUc98H9Bc5x8Z5smENoeXyZQ18gkus5l30OfUGBXi/n/4CX9xjbOp4KH3qS9oh6pjnqkNgimV36xt0ht6VjTZHEDyayJKHdeI8QSV65jLLSN65dFuetsBSuFL+44sa1y/Nd/XNnbR00S3i//GhkQJA4EfPsBInbtPkiWR2zMGqyusSveJ+jJq1nsURoj/kaO06QOGFXo0xhwS0k2XsMhBBB6O/YgzMZ5Us2634vkp3NZu5dLFFaWq0WFkucTsxQa7HanBar09LqVCiNRovVUGc1GK2cuITNlXA4wvfCmdCF7/SXWwBQbR2dEMIknTbmH6K/cI6f5ZbifxNfluhnWf8n8RyNAq4/+XJmaXT0gHs9TY+ACzvB5TlGiqLaOjrnOcalZ4cCc8UljXKRXJ95aJLCobOgkuxSP3bkotjAXGJVku8g0xlON65dXrni+cuXv/ggoXuOMEtYPGB5dmYhmxbC/IitK9Xa6IX1sqjfT86SuKGxtQS3kGzvYZKOqBYYl/QdfFG4LzIWi1oyYomCPZ0DIgh/jgdbOZbwLIWfFRzOiRZiX54vOkuYAejYB06k0ph8g8t0jPNkCV0LVnUKok8AidVIqDUyzvBGqyxw6PEmFEo+8zMo0coJIEdwBwV6x5xDdzmLs4QI4zhfPep8kbQujNs0+SJpHb0w9jmEm4pEIpEIVdvCITwcwsOh+FeJq+BhWzy9Sy80SVnfMqqTivLVPdE/66QikbSOCONEGCfCrCiE2YJIJEI19ghBRggyQti1KM0Sk0yEahc6xhWVRCZ6UXcvyUhXpixJPn153rPXsjIYFW1AlgQ6A5Eogd4yb4WSCwCq9eETCOEsRQnJLEd1DoqadegK5Ob4nxTl0KFyc/wD8yezpFEuYpbMOnQFzHZQnSO+ukOPyhsFd22Wi2L7SmO5Q4+iegf9QRTbsqhA54iXT7bBZTpGiqJaHz6hhJtd6Oh08gKdg721Rjl9yAkVS2wiplnmqWhTsD5Q7LZNPN6YElojWgAtQHWNOlQupyvPPiJ2m8TbfK4ukRNFzcZ6DpLsh92tRkVSE/0vHxghPBzCe9T5MaKwv2I+2zT5IlG+uidxXVNRwkaiolkS+9MkFaFqG40l/hbCITxMB0wiEaq2sSKV+hhLeFe782TJZt3vYzn2e2+johd190rNB9/uy5wlwjxgpi9nJ8jIRtjB7wnpYyArAoBqbU/OEq5P4ftZM+eCU26mZs3yAhQVxX0QNevQRS+m5XLaAcX84ByOwywXCfpBs1yU6LMoatYsF4no7bD8nVkuQnV6uSjqxZKxZJmOkaKo1vY0WRI9nBhLRCKRSITq9HJUr5PHqyTYPmZ5QiXTFN0UZjlNULoBG5mWZMrMyZJGuUiui5XhNqEodr5idWZtisuknBJF9xwkhIeDgrJp8kVofj6qsrGXSG/g4aBNo6qjF/ao8kVFddHCdMlnalREF6uTivI1z/DEhbipKPohQTekonx1T/TPOilnC7EJS7L6cITo0WpMEZw9/hYf9YqNcREkTpjU0QTMfFnCAsmwRPZ7GiGb+86+jSYd3ZpvXDLXrTDpBiKLM8TED56Eu8eiCQDqXvtj+sEMfIu5Xyr2Y4/+R8X8LGMOHSo3O3SoSG6mKIcOZa1Guzt24Zhzjm0riTl0aEKZ2M65yx06NL79WB3iu2H9JbTDZTzGe+2Pk37Ht2i94pViKsquJ/8okxz3nObQoaLENuUfSbQF2PVJaAGzTueIt1LiQXAtcTGzId7qOaPtXvtjJPmvukeVL2JgkMASPHyDSW9ITcE4LUQikShfKo0V61HF8uashUlZwjJpXfzuaGYLMhoYIXZyRWoKEWQoxhL6cyz3npBTSZ8l5vVMvn2z7ve8a5e5cJJ+XJJ6jCt1kDF/uoQyEuexBUvAkpYHVmGWJLrlqJ9NvDxnysX9plkuEsl1tBPgeJd4aXqpWc51wDxj75Dj1+NfsP0Nu9KJfwj61GU9xpYH1rmOnWNxlvB+JtE9JECVU535+WTGtzNE5NMyVhF2A3N37mDaSMjidWIViIJaJJKbcyhJZi0PrEgQDwdDRDIFUmmOdVkbCbMVxAmueKtwvKSQjwvzFP0KIgi//PzzJezoJCEzn3xmV7osYY5L8FaYdFmSzoBVaiVtRhZLEiRwinknlHPGA6G5+hinpwFAtdwXZEnsh5xwfc29ZmdChPifwkFBbB3e5W2Cu19qW+ZjbLmfLktYO+IES/F6zhl/zB8nnNiEVw8+OpKzJF4A1Zl1cmYJw0V+69B7yqFE2Fru51iyRM/jyrFk4SzJ2aJb+iz5vBrNErM8gRhzECRn6VmUJSmBsWClYAl/FSEfNw9BBOEs8Vt/QwW6wfAeMLQbDO0GQ7tiT81iXmSSprLGEsH5ZiyFuSJSaIGNlqYErifSYEn6vQUA6u79RxBCigI5LaUghLmWzykD0T0HSSf4WGzx54xyLlpD6Yg1FwgiCGd20AJYkv24hJ94TyvOWMBE26RKo2G5ISNvv9ntDABQd9oeQQgpAHJaSkEIcy2fUwaiew6y7CAJpDFKlilLCEbLyxLB+b5LwhIiUVlgSQYDofNmSWtHzqMtj0fItXxO8xfdc5BAiPCnrWWnTpr4gQjCGcf/TLEkrTEuAZwkjmjxwCCQiEqVl1psMGTGktutDyGEIGdLaxDCXMvnLAOjew4SCBH+4OIqwNHi0yXKEpaSsGSZcu8EiRMkfR+Ms7vDqBJXbn/z6cOWBWbaBabYLhc5eCc9/d4CANV8L+fRlsEghLmWz4opVEaF0qhQGiTFBonCIFEoJQrlcldqEY3uOV9MlvBx4rfmxeZx7Y5N4ioBI3vByD4wun8eGuOJ+WpkHxjZGyVKlCUlVKDbb/0NnyXMzfmNR9diPauwjk/UO9amzxLWozCTsaRHlY+qulOw5HqRSCSSXue3Z7cmP1/TxVrSpUaL6nIs+SJbjiULN8fQxPVbT5QqI/36dwihsc4iURhWvChOuk6fDpWZY3+YZaiuT7icWSaSmYFZxr0pJr5yis336WQC2+6L36jUl1gH/q6S7C3KEn8I9weXViGuApkohTtLjyWlYGQvGN3HUhrwyAJLwhBBcCL86OaFJ1dXQZcYuiT3jWtNFwwC07cE53HRT5QhiBBL3KCEfmpA8iikYp5x2gAAGQdJREFUS42K8jVddVJRAjbwQAgPdKvz89VdITwQwq8XiYrq8C51flGd8Lngn9CFdA8AqOZ77RBCACI5LaUoimq+105R1LLX5PMrpcoiLjTkrVKKCw0SRTQuURosK14UJ12rT4vKGmJ/NshQbZ9QMbNMJDMn3W9fwv2iMnPiV8yK0Y30aRNLc7YWq4NZhup60zlquucg/gDuD4QWIJwnbplAEGdLaJUU4mwhEFxClqQfqYzuA6N7wUhqltCJdy/mrj/6DnSJaZZgPauUhW9OT00Jp9brpKI5LV9tox+AltxQVTfTPjZVvkhUVB/9s04aj07o5n2mzheJREV1gWBdoUh6PYA/VeUXXs/8fKXfbQCgbrW0QwhBJJLTUoqiqFst7RRFLXtNPr+SKAxOF2a1OQ21FnGhUqE0Kmuj748QLM+69JfpEjy8SCRCdb3xYqi2N706NMhQrZm7KZEI1fZFIiDSq5PRH2j16lCZOeFPFmNkMlTbwHmogaxBYKd0z0F8AdzrDyWTj6MAV94AzhG/jC+AL1D8MZN0RlrYOBFiSXF2WJJGXMLPuhMEefeievD+KugSi8XiFSuehy7xk6uvnTiyJ3qbISe1XieNP67GRj+4jJVUr5Pmq23Bbk1+UX2y4awbRTGW1ElFIhF3wKqbfoymLRAkAjek+UXS/HzNdZW0qIjXKUWifJVt/icx3W4DAGW5+wBCGMnZ0hqEMNfyCzSF0qhUGRWqaESiUFmUhihLkq7Tq0VlDfHPqLY3cSmzrEEW/U7AmO/YW+NtPrYg2dWmtjfJ/ubadaznIL5AUpAIKJBaviDOUepV+AomKLMZZUvEkjTiEj5LRp09t/Wv0UGJWCxeuXIFdIoxq3j/Jy/2PH2EE2GBm9hZj2cuqhOatcVmSZ1UlMgVmiXXi0SiIo1KOH6RqtSoKF9zXY0WqjX5+Zqn3Zp8kfRaMOQLhjpV+YU3Qr6g4PXEvHvFHCUBoCx37+c82tIbhDBbLb995+7tO3fLN29dv2Hjqg8/WvgGPy/W8Wxot/62otigKDZIio3iQqXCYEmHJQ0yWUNEmCVMKVTb2yAT+uHKGiKMu6f/i2+H2VAUIYlM4IGGXW5+LLmPeOfFkjTEvyZNCSShUCZBAkna9OgCkegNNMvLEs7oFh4mb+mLsJ5opkQszpOIV0CnGDrFgw2vqbe8zQcJ6yUuSUzKJkd9kUh6Iw3cPlWj+WpbQksGbeX5aPkNTX6+5mmQ8AcJ+hR0qvILrwufHQEkpOoVc/QfAKibd3IsWQaDEGax5TcVydas+/itd97LytY+L+YY9kQiEUmhUlJsUBqMBqNFUqickyVR1y1riDTIRCIUZUUjLC/fq0VFAk4/0cE3yEQymSxajvk2YUNcJvBZ0iBDUZpa9P+JUQy3DrTRPSfHkmVgSde9+idX6aBEAl1isThPsSrKEswmvnrgZ7evnUoSl5iKYq8ge2azJcYltiTRBssSp2YlYQnhDxL+Z1GWXC8S2AwHKjmWfDEsuyyJRCKvv5H8YvwLbUqDFSOgE4NODEqKDclZ0qtFUW1D3J/3alHWSFPCUr4f57EkEmmQsYpFvxdkicA4F6rtZWKk+Y9x3bxzH/H6gtgC5OUrAwLxnFHqdD1v/k+y/DyNkwWwZF+KAvNhCZ1yr4um3CXQJYZOsaIwz6BcCZ1iaBNjNjFmydv64YvTkxM4TiSqR50fe/sk/cKYbuKGOmGmFmd0i26B60ymhG6WG0nT+PkqW7R5u9T5+eqnrER6lyq/6AYeEByeyuCM87oN06MAoG7eboMQRkgyp6UUhDDX8lmRQmXBMB5LkpW3a1GZif7cIBPJTCaZSCQz2bWorCG6ENXaTTJR9E9GvVoU1do5S0QikczELRZfYpLRq3DXtWtRVNtLkg1abS9pkqHaXlbhWB2SHi/dcxDMF/TMpUCiuAX4SVTMH5pbGcU6qfP5c2RNssmSuSYHJ2cJQdKCCPLgxsnB26ui07ecLNEgseVh1jyLcuXpI5sTH39iU+UzrwszFUUn+9qe1cVzJNEJWmppUTwKqS/ip9lZ6lTl8xLpIV8g5OtS5+erO+mwwx/y+kOd5fmF19M9X6n7AK/bMD0KAKrpdhuEkMzZ0hqEMNfyWbHobOBig6TYII6NcSUtbdeiMlP0g4j+RP+Bau0mGaq1kyRJmmTxrxJKJPwtkpl4JZnN05tBtSYtispkvHXjf8d2apKhWq2MG72w1ooZ3XNolgQyFv8qddHgkUJzzBuGCJI2S1IpM5bEgpLp8eGrx17jgEQiXrFy5QoGJJg1D2vNU7z6vNNhZ1hSJxUV1SUfy5LW8x6RUh8fnWLm/vKaqFOVn6/qFmhPFks4+ZLMRj55LOGK6VEAgMbm1pxHW3qjKKqxuZWiqOWuyOfeJMUGpcFitDgtVqek2KBQGtNgCR2OxBdH3X50UUqWmGSMn2cAxN48U0okQrV2u9AYl50pFGdJfDtzGN1zEI8v6PEGMpcvxBM/uEkogKWhNBIq3LjEHyC4iiVXIIL4H9MsKQFDxWC4BIzsA6MHwGgZGD0Mxo7MQ+NcUTGB0cNgtAyMHgQj+8FwKRgqAcOlVKA78DjOEsupA9GUOysiWblyxYoVz7NBgrXmWWtXVu14O4STLBEh3KbOF+WrbSE84c7EZ2q0qC4c7GbfXyK9EUt+PFWhdJjyNED4r6e6T4VGC80SwWyJSCTKVz+Z8/Sl0St4BWI9CgDQ2HwPQhgOkzktpSCEuZbPipQqo9XmVNZajHVWo8UplihXvCgWLGmSikQiEaqxm6QiVGNP+NYkE4lEUhP9p0kqkpnCzOeo+9f0xLcTKxlTD4MLZkWyR4PSxXo0aMLuerQoqu1htk9/Nsn4P31RvFhcdM9BPL6g2xtIU3wX4PZylZIlfAmwZP5jXHM/mQMiCBXsAaNKMHoQjJWBsSNgXAVcOjBxHEycmEuTieIVoCYZHacmdcClBuNHwfghMKoEY2VUsCfwJI95Ha9RmUcPZ8VGtMSYVcxGCGbJwyx5zro8Z12ectWKhNdSJT70N53XwKR8YEnKG0H4gUh65EjBEqFuExUAwHwr59GWQRDCXMtnRUqDccWLYo6WvVaLJ7rnzJclXE64vVwJDYXNnZIRSulnwpK5BBGECvWB8XIwrgIuLZg4DiZPgqnTwH0OuC8sRFRc56mZ09RUNTVpABM0VFRUqC/QGWfJ04aDRmWeQZGnXLVC8erzc0u365WE91BlwpIUzZIRS7gnK+X55SfehLoNky9hWJKzJTUWS3KWs3lYlCVuLDCTtvguIJ21MkjDcK58fXwJ3N7IvUcy4Rr86a8ggoCJSjBZBaZOgelzwH0JYNeAt57ymrKkegq7TnkuUTPnwHQtmDoJJquo0EDg6a/ZryoRflsJzpXQOw05T9/iKnUUwmsigWbkNTUvCsnkhKbftQAA5lstEEKCCOe0lKIoynyrhaKoZa9JTp8v0T0HmcH802lrJg25+fIFE8QDErcAP1Lxc5XO/fYJ1+Bdv4IIAqYvgGkjcF8BWB3AmoD/FhW4QwVasqQ7lL+Z8jYBrwl4roKZS2DmIoUPB7p+nep1vNx3kwi+noQTlwjMy+I/BYsThaTxSAJ+U3POBf9kpXNCOV1ijv4DAGiwtEAIcYLIaSkFIcy1fE4ZiO45yLTHP+VOKjcWYGvG4+cqLcAkXoFiQa54zig1S3gzhea+ByXQ9UuKcEEEAVgT8N4GvhYQvE+F2im8g8IfZSQrTx1U6CEVvE8FWijfbeC9CbCb9E4zeGdiytfrCjyjTOBJ74k44TWR0ISrVCzhk4N3QoUij1SdJNajAACmm3chhLzba3JaXEEIcy2fUwaiew4y7fFNuZNqGguwNeXxc5R+TDNHcJMyMSPg4HiaO4MSePZLinQD/0OIICD4GISeAuIZRXRTRA8Vzp6Ibop4RuFdVOgJCFpBoAMiSLD7VzhJJogfhfCVkiU4wRX/afCpsiPpNCwvQ8Y9WfwTmkGvYHoUw5IQjue0lGJYsuw1yenzpShLpjy+SXdSTXkCbE26/RwJ0CWl+HTxBjjyeIMJ8qeWz49zxRrMCXT/gor4qIgP4A6IIIDop8IDVHiAIp1Z1QAVHqCIfircTxH9EEGoiC/Y/avUI1o8CbwkMVFC9x5yWcId1OI1UToNyzkX/JMlwIZUfYDfbZgexbAkGMJzWkoxLFn2muT0+VKUJZNu38RMUnGGvCZnfBxN8eVJIb5nEcrEJoYpXq5HSzn1y5v4DCj/cFnA9msKBCngp4APIghFuSlqhqKmKWoqS5qmqBmKclOUJ7oLEAz2/CY0cpgIh9nKLC4JhjjintGU07QERrT4k7J4Tc2LQrgSQkWqbsDrNkyPAgDUN92BEAaCoZyWUhDCXMvnlIHonoNMur1zjHFNznhTiUsXoeAmQQJJF77mDlO8gtl4rrgPWRlSBrt/xggiSKj7Z4ujn0MECXX/PNT989BIGf9FWHyWCIiXQeGwJOWIlgBLeE0kMKLFa2puIJLG6ePDg9sr+N0m1qMAAPVNt3MebZk8Qq7lc5q36J6DTMx45xjjyg5LMD9bQnEJT1lhSeIID3+aE0QQ5kHCtPhDSZxwge/0mWdtMU/cgghCkGSCODghuMpg1CudeVy8WVvZYAk/O8KPSzCu5sWSusacR1sGURRV13iboqhlr0lOny/RPQeZmPZOuH1JNeNNpbmGyAQHytJJ4HPmj6We6OUTmCXMnbbEey05fYEPEYQ3fBRXSpZwXnKF86IQgbgknTnBfJYkryQtgfeuc2Zt8WcA85pRaJpWwrmYI20eF29CYBr9JNqjAAB1jc3w/2/vfJ4SV7Y4zl/Ljv+A+BZ4V28Ta1LXyujuplgMUxXvMFfx4bx3GX9QT5gaF69qFHVARxBHhSTEERCq36KTkJzT2AGVMDVtfRYJBAx9TvU355z+QcjTto4WTAwhRLS8YAqo58SubozmU7g1AdzYBSdAuANG8TpguBO0Ogi40S9kVDuKxUgsdvfjfpq4pNfr9npOOOJURLhy0puiggLvDdVLGHEJGLiFmohVL4FNzbUOI6M1PuygYLfxPGowGGxs0R7tTjBLCCGi5QVTQD0n1rwxLp8A7hS4sQujGs8bN4zHobJq7xDuIitwNAJVFNBldwPgTj+oIs+mJXcYnpaEqL3DJmLFJZwhv6y4BBr0kbCDgt3G8yhPSyz7TjBLPC2J/E4EPxc+LbkOSxNzYwL4WoKL/Ci9jrSEn+PizjgZl+MCUG1wIxV2Ydx/DUMqUDmEn/UKUY2fIsfFn00SIscFoxAMMihfS5DbeB71MBhsbBUIIYxAU/CSEEJEywumgHpO7HISLWFwYwKatxYAdCusgV6cCsojSwGOduXq3AOm0ZLgs79fM/zc9y70xXSx1yuuLunnjh7UskvxRNIlvbya9J0m44v52nhpue/1ACFyXBNrCW6iMIt1cqsj2KBYS4BLYLfxPGowGKznC4QQHEVFxNnblLY92WWflNRm5XRTSrA+uKcFHIPy+lPUP/OOEDJnLT9zTjclvyFON6XUZgVftqdJa2f+03kwX4RQz4k1ro3GdXscSDxMLiwtCTyTfr/tAEJoCT/HZXTuAdNoCcos+SODanZpIVu/7/Xve3V9MV3s9e/P8wuJJf1sFILUskvL+1gtDpZXDx4bxxWiGg/vbZq4BBEix8XXEmRQHJtCLRnvP4PBYD3/9zz1aDwtQdqg7H1SnD7ok5LQtjt326/974b72mh6hLlq+ZkDtKRzt/06GZAN50X57anvQGgJIev5v2OPCAlLS3BcAsG1d9iztCDcanyoesm047hCa8nn3xPpolPhcOKSbq/XPcsvrBy4qlDXV/I1Khjn+YVF93g/HRAYRhJs8grKS43j4tRLGNURZFCsJcAlGLU3X1zy179oj2bPB7W3KW17dFpWArLBvAx8xDY7tnmak1K5Cj2AcQm6OAoIIXPW8rOk9jY1MofyGgWOnq09O3bKCj3Y0+Kvy1Hff5RQz4k1vrcfxQhwDQlTUwmhJfBRF8x9exYtwZP7JtOS/XR8MV9z+/ri6tLy6iiptZCtd7v97n56IVt3tog5z/9j9YAe+1NhL6cljNmLz6IlcB4iJIyWAJfAbuN51IOnJZYdOZU1OdChqGXTKiupXMV9V9nz90FjoNef5CRw4FB7m9K2o/6lpuXTkqjvJDJOcpJaNi17W00qe4G3KmsyfaWyJsfVsmnZzFyltFaL/lfMnJGW1B/DCHANCVWxBwO9QmgJmPsWZleuF45LPv+eSMYX80V/UWT1c7fnn6tY1xd90rKfXsjWu71+102IzWFcwqqXoBwXbyktbFDGMC2ek3ge5WmJYdnzQVlJaB8t2zjJSWrZsMpKKndk2YZlH63Jyp572Z4WV8vuR2qZlPYRfM9JTqIfdA+O1mRprca+OAo8LYn8TiLDMTE9LSsJOXNiH63J8YRnoLKSSMbVsmHVMik5c2IbFjD9r4ijJfWr9sV46kF4QUy78Z2RFmtem37wQyue2ga1BExdNGxWXHIPeEYtqWaXFlbSC776eS275MQiHvvpOK2dUBXZT4NnFldaWFoSYib8c2gJhBGXoKaGWsKYh4ijEAiMQsb7z8Ng8H7zP4QQw7Tng7KS0D6atnGck9SyYZaVVO7ItA3TPtJlZdc+0mX4fKqWP6py5tg2jnOSe/Ho2D040mVJrxlmLZPSPkb/M21CyJy1/Mw5pulHWVHleMJvlLKSSFJbS6omqWXXGWzDtI1dLe4d/5JQz4ldXLW/XbXGUQd8x8BQhqElwemNjGQ6GgjE1ZIp4pIwOS48eoqOqipm81Va//C6+0CZpN/t9osr6eWVJf2s3y2lF943uv2HEb1gTT6MlvBGdj1LjosRl/C0hDVqC2kJmtMKoxBGBOx4VN/VkrbZmQ9KSip3aHbaxzlJLY1Ozc6hLiu7owPv1HuloCa9V9rHOcn7nlTucPTxaialFaL/mR1PSyK/kyioZmiuUi21zU57F+evtILZKei5Q8cNfJ/d1eLglV8MV0uaj2nJRRAoLVet+pUB4Nbnp9GSEDkuw/4BQFoCF7AKpSUeZ0Et6R4sJ9LFoAAUR1qytRwcEKyvJifTEt5MeJaWoP3egy2Am2iKHFcYLXmktO5oCXIbz6P6g0E29+856tG8vmOslpSUYL+j7Hbau5qUkgNdjPPMm5RUjWpJQZUzx5250pL5avnZg3Qi8DTgv4YhNk5t7DDyXzFzqOfELppQMB4Ba0njxoTg+vwUWjL5mGDGTovBSeDTacloW2OoJf3iipu2codsOTV2VlxS9GtJmOmNaFPlabQk2AJh1pznjgmeTkugVyC38TzqYc60pKAmJb3aNjvtXU3Sq8y4pD06rWZSSWXXF4WYJSWVy6iuxnjf7HRGVE7mAqElE2iJ/xURl1At+dZsTcBVG4CHEcNy/Xec8oJznvlagnaBDTNXEWlJD8BdfevRuISGJsnl/X53Px1fOaDq4pRG3teDSwXX9d+SyyX39FniEsbuWBCkJSHmKqKm5moJNiijtB50Cew2nkf1B4N3uQ+EELBFfDRUclJCK9DjHU3Sqy2j9Mr3HPpqh15ZfeOM5pLfVDqtHS2e0N7osqRXWztaXC2Br/2iy3Hna0uvEkl8QSQMh8N3uQ/D4TDyO4mMSk4K2qKgeiYeew3TxL8U1HNi35q3k2gJpHENCaElkBBaEqJeMkVc8lQtceQkThUlkONytaTkVuB/y9f6L60lE8cloeolfC3hVEdYWgLdxvMon5ZYUfP1TUp+U7FaO3+4OmG1jNKr1MYXw2oZ1hddfrVjfdFl+tboVC3RbyioVG9831nZkBJJSf/q/0f+j0SIT0sib/kIoMaS9K+uuRHURpUNCRhr5495MF+EuFpyeXt+2RoHV10uEFhLwCQVhpbg7RrBdBO0lx9DSxDPoiUo1xRCCfzZLTfHxctoTZ7jmkJLUBPhZsRNjWa5Q2Nhg8JpScglsNt4HtV/GLzb+EAIuW1bgllCCBEtL5gC6jmxWuOmWr8dx9kllxYA58HAwGLWQC8LgErxNqBt/QAwVqGHe2F1Ifc9AN4ZF64wz5gagnlA8JZ3DBOXBG8M3zz+gaAFGCvMo2bETY2iEAgjCkFGBy6B3cbzKE9LQuzDJnhOPC2J/E4EPxeOlpxdtmr123GcNYIgLfl22YKg2IU70At3T2BLrhvDBjBWDuatE/wraglvnWDWSo6wqYEtwmkJBHoFchu/lvy5viV6tEh6BNHygimgnhOrNW6+XoylBmhAoNg0bs8vIRfNth88PQ1PbQNZFLwLbCgt6fzww9ISCFdLMDgZxdKSIOgjYdacR1qC7h9rSbAFQmkJamqY0ULGwgYFFr9otoFLYLfxPMrTkuZ1WzBLhsPhn+tbw+Ew8jsR/FxQz4n1Hx6exmBSHjADDoy/4fAl+In+XqgFcEtDczAtGIRld67bjN5dW98ihLAmMwleEEKIaHnBFFDPif1TXhYIBAKB4CnE9v77SSAQCASCpxD73+GJQCAQCARPIVb9dikQCAQCwVP4P/XnxVF2THWNAAAAAElFTkSuQmCC" alt="" />
2. 在随后出现的“宏”对话框中,在“宏名称”下键入 Hello。
aaarticlea/png;base64,iVBORw0KGgoAAAANSUhEUgAAAX8AAAFPCAIAAAAqXFmdAAAfSklEQVR4nO3d/3MUdZ748f4DrqxPXaX8bNWynyrjad1+Plf1ufsYP5+9WkSX3LkLfna9u6xRd29BBbKLtatBCLjKMhh0+QgIZAXly6IjKggKkoSEQBDiJss3lS8J8iUCIRDIJJOEZGYIJDNJf35o0na6393T3ZmeHpLno16V6unp7snsmmf1TEKPJGvkAIA3xo0b953vfEcbHEntzsSJE3fv3n358mUZAFItkUh809bx3dzJWXfeqayRGs+dz8nJWbFiRUtLy5qdxxmGYbyb+u4bW05dzLrzzsZz5yVZlidOnNjS0rJ25wmGYRiv5/Ou6+N+/ktZlqWcnJzLly+vq6xnGIZJz2xtuz5u3DgpJyfnxo0b63c1MAyT4VOyte63C9f+6vn/l9r57cK1JVvrlIcIbtr7qwd+mpuVndr51QM/DW7aqz6RTa2xnJwcKScnR5blDVUnGYbJ8Jkxd+Xu2uNNoUhqZ3ft8RlzVyoP8ei99+9Ztz7W8GVqZ8+69Y/ee7/6RN67qqnPO7tPMgyT4TO18PWmUKT2ZGtqpykUmVr4uvIQuVnZ0RNH2rb8ObUTPXEkNytbfSJ/vqKpzwf7zlrM7x6Uvju1wnobhmG8nqdmLWkKRf5ystV6FpdszMsvUGdxyUbr7ZtCkadmLVEeIjcrO3L0UOumtaHNa0Ob14Y23RplTauyMLQcGjbrbu21ad23Ow4tRI4eys3KVp/I4oua+ny4v9Fq3v3dOGnSc9bbMAzj8Tw9a8mFUNROerR/aJM0QBdC0adnLVEeIjcru/uLuqsbV38776+++v6t5bdfmq9G7e2X5gvXGOfKxtXdX9TlZmWrT2TRBU19NtecGzYLJ0mWxj21S78LwzAez9MvLD3fGvm8IWQxefkFiURCLUIikVBuWuxyvjXy9AtLlYfIzcq+dujzlndWtmxY2bJh5eWhBWW0XcvLL3hr3u91ay5vWHlZs33LOyuVQ1079HluVrb6RP5wXlOfjz4/P2xemSw99KayvOy9KuO94542rGQYxuN5Zvay86FoTUOrxfxx5ca8/II/rtyoLNy8efPmzZt5+QUWu5xvjT4ze5nyELlZ2Z11n11as7R57dLmtUub1ywbWljavHbp6qJ5efkFA0N0y6uL5l1au7R57VLla/Papc1rlynLnXWf5WZlq0/k9+c09dlSe95kqh67S/pBsdm9DMOkb56Zvexca3R/QyjpvLZyY15+QTQajUajefkFr63caLHxudboM7OXKQ+h1Kdp9eKmVYubVi++uHpx0+pvFy6uWrxqTlFefkH/cHn5BavmFN3abNW3ezUN7aXUR30is7+Jflufj+uatLP8mXusX3lJP1qt24VhGK9n2pw3Dn3dsqb0y6STl1/Q1dXV1dWVl18w+5XV1hsf+rpl2pw3lIfIzco+u255Ve4/WEzxTx/Jyy9oG5KXX1D800esdzm7bnluVrb6RJ5r1NTnk79eFM3qf5buyf/g4id/vbjig2qTbRiGSdNMm/PGkdNX1+88lnTy8gtCoVAoFMrLL0i68eHTV6bNeUN5CKU+1ZPu2zP5vurJt75WT76venJO9aSc6sn3Lfr3n+XlF1waLi+/YNG//6x6Uk71pPv2TLpvz6T7qifnVE/OqZ50nzJKfdQnMvOspj7bDzYbpvrxu6TvTa/efrB5+6ZZ35PufXxT85zps0oEWzIMk46ZXvTGl2dDwaqGpDPv1TXKu87zXl2TdOMvz4amF72hPERuVnbjhpL9eRMM88D+vAmvPZaXl19wbohu+bXH8kQ7TtifN6FxQ0luVva3T+S0pj47Dl0aPnufuEv63vS9Ow5d2nHo7R/eNevNQ5d2HNr75muzvpf7tmFjhmHSMTPmLj96rv3Dz84knbz8ggsXLly4cCEvvyDpxkfPhWfMXa48RG5W9vn319RNmVw75ZHaKY/UTZ1cN+XbycsvOD0kL79g8S+e1K2pU3eZOrlu6uS6KY8oO55/f01uVrb6RKZ+ralP6eEW7czNlX74R2V535PZhjd9ctfotmcYJg1TMHfFiabOrXXnk05efkFjY2NjY2NefkHSjU80dRbMXaE8RG5W9sWPg4efffzws08MzeNDNx9fMnWq+rv8JVOnHn72CcOaxzW7PH545q3jXPw4mJuVrT6RX2rrU/bFFdHsfzJb+m8F+3XrVxXc+8PFwu0ZhvFwfv3iyq8vXdtx+FLSWbDsXaUIC5a9m3Tjk5eu/frFlcpD5GZlt+z8+GjR9BTNDGWhZefHuVnZ6hPJPxn5tj7lX15lGCbD5ze/Lzl9JbLzy6upndNXen7z+xLlIXKzskOfVdQHnq9f8HxD4PmGBc/XqxN4rj7wfH3g+foFzzXcWn6uPvBc/YKh5QW3Rt1LXQh9VpGbla0+kf9o0NRn51dXGYbJ8JlVvH7fkTNnW2OpnX1HzswqXq88xL99/wd7163vOFCT2tm7bv2/ff8H6hP5Wb2mPhVHWxmGyfB5f0/DrOJ1M1/6U2pnVvG69/c0KA+x/t2KR++9P+XX93n03vvXv1uhPpHJJzTv++w6FmIYhknP/Pi45tyn6ngbwzBMeuZfjmnqs/tEO8MwTHpmolIfSZKU+nQDgPd2n2h/8Gjk1h8PUh8AaUN9APiD+gDwB/UB4A/qA8AfjusjSVLSg9rZBsAY5+bcJ2lcbNbHbDPiBYwFtuqT5NLOw2ORdAN1M3Vj7YL2XgCjmN36CJft3Gu9i1l9zA4FYNRI5fs+akeSbu+iPsQIGGVS/8qr2/CqSnhA7ZGFG5MbYHRzdu5jswgW3dEdR3u6RH2AMcVlfSxOauycH1EfAA7qo82B8NWWMCLC7akPADf1sT4DsrnS2J2kdUv2XADcTuzWx6w4ZidB1q+8zPa1Xg9gNHH29z6O3tNJulJ4wBE/IwC3B/6VKQB/UB8A/qA+APxhqz4fbytnGMbmWP/I7are9+nOXdvKKsbCfLpz167qfSOtjwyMGTPfqpq4qHx8oNT+TFxUPvOtKlmWretTWlFVU3ugJxJJjA09kUhN7YHSiirqAyT3i2WlMzfUNoWj/QOD9qcpHJ25ofYXy0qt67O9vDISicbj8djYEI/HI5Ho9vJK6gMkN2FhWXNn7EZ8sL13wP7ciA82d8YmLCyzrs+2sopEIuF3E9IqkUhsK6ugPkBy4wOlfQODod6BpVvbF33QNnd96/QVLY8tunD/rw/95Wjzqo8OL1xTM3/13nklu+csr5yzvPKFZTtfWLYz1DvQNzA4PpDk3If6jKg+6pa6ZS31Twct1gCZaXygtC8xePX6wMyVTT9feGbSvBOT5p342Usn/uMPJwYGB2N9ia7ridbuxJzllb3x+LXeeFsk3haJX70+0JfwvD7BYFC4bL2lv1J87qOtj8X/i8Z7qQ8y3/hA6Y3EYHM0cf+kaaXl5WU7d+6qqjpw8OA7m3cODA5ev9Ef7r7ReKVn2976yM34N5fDR063HTnd1hxN3EhLfWRZNi4bN4vFYrIsB4ez2Nj+eqeoD2DX+EBpb3zwXE/i/knT7p807f88MuOxgpff2bwzNOep1qcmX8l74MzE7+//p++W7T/57KJPfv3KlhmBj2YEPjrXk+iNZ0R91PQoN3XPTrixWaFSEqDU18fstZVuM90zF64hScgo4wOl1+ODZ7sTew409iUGbvYP3uwf7EsMtEz9SdvapS2LZh3857u6Txzc89fT2ldeZ7sT1z2ujzYQZic12rMeOweMDXVKaZlxx5EHyPNzH+HZUNL62DyHAtJpfKC06+bg3iuJ4jV7LrVdO9Xc1dB0raPn5vlH//fV3+S15D/U/KtJn95zx7a99bG+xLmWDuWV194ria6baTr3kQ29kDUnNfJQQYIixqPplnVHs3h9Z1M66iM8G9L9/0p9kPnGB0o7bw7uvhyfWby1cEnZC8vKlr6776/Hmg7+y//c83d/cz7nvzY/8r+u5D2w5+/+5viuirc2ff6bhR8+8cL63ZfjnemqT9JeqGvUJ6WmSjYpizZPZtu4k75zH+FmZmuoDzLQ+EBpx42Bsot9z8z/UHlh1dqdCHffqJzw369UfPju3XfU/+OdTQ/dU/o//nb13Xccru/4aH9nySfNZRf7Om4MpKE+2vMa2VAf9V55eDKEETG2zOaOjqTjN+7acx9pOOEa4xGATDA+UNreO/DJuRtTXgwqv9Lae7T14Nfh4KcH+/r6LnyyYfXdd3xwz3958+47Ghpbqr/qXvXJxVeDZz85d6O919v6qMWRh0dH+MpLdlWfmOGNnsyqDzC6jQ+UtvUObPmm94kX/vzUS+9PeTE45cXgjD988NviD+evLP3g07pDO7atuPuOhsaWjTsO/Lb4w5//bvX/LVi55ZveNo/rY2yE/TMdR/WRM/mVFzCKTXilrOFq5Fx3fPPZ6/bnXHe84Wpkwive/ksLXSN0Xy2SYf3reeNv07T3Cne0j/oAdv3nG2XT19eebI2Grifsz8nW6PT1tf/5Rjrqo42CPBQj4YmMbkezY8Y070+ryylJT4z6AI48uax0wsIyR1fYmLCw7MllpXKyK2yk6u99ZHsvo7R7GXdRmd1lsYt9KagPwzA2x6I+I7zChtpHs3vNli328lQKrrBRvHglwzA2x6I+pZW7a2oPRKOx9Fzcy3fRaKym9kBp5e4R1cfif1AAqqQ/LDsqqraXV/p+zdP0zPbyyh0mFzbsdlSfNL3mBjLDzZs3L1++3Nra2tnZeU2ju7tb+arq6emJRCLt7e126gMV9QHEqI/XqA8gRn28Rn0AMerjNeoDiFEfr1EfQIz6eI36AGJm9ens7AyHw52dneoPCPVxh/oAYsL6dHR0hMPhl19+WRsgR/Xhk5SpD5CEsT5KembPnh0IBP70pz+pAbJfHz5JmfoAyenqo6SnqKjo9ddff++997Zu3bp582YlQPbrwycpUx8gOV19wuHwihUrgsFgeXl5dXV1TU1NXV3d/v37w+Gw/fps47NMqQ+QlPDcx8jRuQ/1oT5Acl78xt26PkHDh2cZ1yS9K2j4eC+nR0gt6gM4lv76xETtkA1XKVQXZJOLpcrmFzk0Hjw4XNLvys56LeoDOJbm+gTNCeNito2d+ui6pnviZhubPRz1AVIs/fVRH9q4LKyP7huODb/6qkWeYs4/bTmoufyz8VuiPkAqZc65j2xeH4uKaZd1G8vOP23ZeATjNtQHSI1MO/exyJO2GkHRKy9jwtQ1wgcVlsXYJuoDeCIDz32Sfs/aRmj31UVEmAxhRMxOmqgP4KH0/85Lfeig6D0d7U97bPi7LdoTH+MrL7OIGA8rJ6uP7uGoD+CJdNbH5qsq9SdfHv6KLKZ5I0a33v6ZjnV9gia/VqM+QOql+dxH+9DGcx/ZEBptmGTzt6V1X53WJ6bpl/ARjd8A9QFGype/NrQOgS496rdq3FcbBd0uTuujTYzuEZOmh/oAbmRgfXRnH8ZtzE6IjIfVLevaZGR2l8UuCuoDOOZFfexfYUM2/2lXWOxosYF2vW7Z+rDucIUNwA0v6sMnKVMfIDmPrirPJylTHyAJPtPCa9QHEKM+XqM+gBj18Rr1AcSoj9eoDyBGfbxGfQAx6uM16gOIUR+vUR9AzKP68EnK1AdIwpO/deaTlKkPkJS//85rdODfeQFu+Phv3EeTBP/GHXCK+qQE9QEcy8D6CK/obrGZ2eVZ04n6AI5lZn1k80/XEW6mPh3rC6faX+8U9QEcy7T66C7qrPtu1QuqamOky5Ns8ukUFhVz961qUR/AsQysj2z5GaSyIUwxy89oF+YsaPi8CrfZuYX6AI5lYH2Cwz9Ox0i7mfWrs5joMs9B80/IcI36AI5lWn1iNt73Ub/KJu/7yJafkmxsDfUBfJBp9TG+UBJ+1cXI+NJMWBbtQcy2cYf6AI5lYH20TZFF9YkNf11mPPcxK4t2d7Nt3KE+gGOZVp+Y5jO8hK+85OEvo4ybyTbqY/HekDvUB3AsA+sTG/7OjsUrL+Up6M59giZ/rGhRsZiNzwu0Rn0AxzKtPmo+ZJPuyMNfeQlPjmSTP/nRPfdUpSdGfQAXMq0+seGvvGQbn9GufToWr6GcrneE+gCOZfgVNuThaVC+Z7N7LVZ6iitsAG7wScojxycpA27wScojHz5JGXCDq8p7jfoAYtTHa9QHEKM+XqM+gBj18Rr1AcSoj9eoDyBGfbxGfQAx6uM16gOIeVSfacVr/3XBlvGB0rEw/7pgy7TitdQHcMaL+jwVeOvBVX95+Iuen5yJj4V5+IueB1f95anAW9QHcMCL+uQu2PLwlz3Pnu+LjA3Pnu97+Mue3AVbqA/ggBf1GR8o/cnpuN9NSKufnI6PD5RSH8AB7+rTM5ZQH8Ax7+pjsYEdkiTZXGmxPm2oD+CYR/X58an+ayMgSZL6VbheoV3WrjQ7oP31Tv34VD/1AZzxrj6dbkmSZFxWFoR3GTczO6A2UsLjuEZ9AMc8qs/Dp/o6XJEkSbhG+1V7U0h4QO16s21ce/hUH/UBnPGqPl/3hd3SpURdqfuq20W3YOcu4zauPfw19QEc8qg+Pzoe+8YtSZKMy8qC+lWhXdauFB7NeJfwEd350fEY9QGc8a4+jW5JkmRcVhaEd+mWzY5mZxvXqA/gmEf1eeh49IxbkiQZl5UF413Gcx+zoxnvEj6iOw8dj1IfwBmv6nMsesotSZKUr8qCbqXuq/Zei6NZb2+xu00PHaM+gEMe1efBo5GTbkmSZHZTXVYWjCc+CrMDCjcwbu/Cg0cj1Adwxrv61LslSZLZTXVZ+Vk22yXpMe3vaBP1ARzzqD4Tvuo5MQK6cxntSmVBuJlue+tjmm3mzoSveqgP4IxHV9iYUNv2y6/aj40Nv/yqfUJtG1fYAJzxoj5PB94aX1LzQF3bA191j4mpaxtfUvM0VxcDHPHoyqpTAm/lLtjq+zVP0zO5C7ZOMUkP9QFMcVV5r1EfQIz6eI36AGLUx2vUBxCjPl6jPoAY9fEa9QHEqI/XqA8gRn28Rn0AMY/qs6t636c7d20rqxgL8+nOXbuq91EfwBkv6lNaUVVTe6AnEkmMDT2RSE3tgdKKKuoDOOBFfbaXV0Yi0Xg8Hhsb4vF4JBLdXl5JfQAHvKjPtrKKRCLhdxPSKpFIbCuroD6AA9QnJagP4NjtVZ9gMOjirjSgPoBjmVaf4BDdsnqvLMvC9TFXbUpVs6gP4FgG1keWZeFX4b1qQbTLxmPGNC3TbZOSAFEfwLHbqD5mX2ND6RHWRNcm5VmnPEDUB3DsNq2Prim68xp5eIzUm9rTJbNt3KE+gGMZWB8z8vD6yJpeqHcpdAeUqQ+QgTKwPrKT11zCThkPqFumPoD/buv6yLIci8WUJ6I995F55QVkvlFQn+DwX4cJD6hbpj6A/26X+sQ0b+5o313WLsgmv3Q3vkaLad6ZNr5R7QL1ARy7jeqju1ce/ut2s/MadcfY0Gs0hW69u+9WRX0AxzKtPrGhkxRZ89t03bK2L8bNzGoiXGmx3hHqAziWmVfYUL43i2XZkAztZmnGFTYANzy5uljl7praA9FoLD0X9/JdNBqrqT1QWrmb+gAOeHRl1R0VVdvLK32/5ml6Znt55Q6TCxtSH8AUV5X3GvUBxKiP16gPIEZ9vEZ9ADHq4zXqA4hRH69RH0CM+niN+gBi1Mdr1AcQ45OURz58kjLgBp+kPHJ8kjLgRmb+O6/bC//OC3AjA/+N++0owb9xB5yiPilBfQDH/KqP2RUIzTa2vnS876gP4JiP5z5qQbQXZtbeq62M8t2aXTped0Cb61OI+gCO+fvKSzb5OECF2hr1Zsz8UoTaCzwbT468DhD1ARzz/X0f3WXhFepdsihPZnGRNVd6lg2fb+FpgKgP4Jgv9TG+qoqJrgavu1C8lvFlmvEgZtt4gfoAjvl17iMP/3gc4XmNsSnGu8y2tNjGC9QHcMzfd51lwwd1qd9YzKQ+suhEifoAt59MqI+6nLQp1AcYPTKhPro3nrUvr4LDfxlPfYDRw/f6BA2fa6xbL2tencU0b/3Iw1Oia5bxsMabwt0t1ligPoBj/v6tc1D0JzzKN6Zbr93SrAvaMKkHsXgU3e521pihPoBjfv3GPWbyp4ba33mpGxvzYRYg2aQXZutThfoAjvl1hQ1ZkwPhN6bbWB7BiYnXuMIG4IauPh0dHWGRzs5OPknZDJ+kDLihq084HJ4/f/7cuXPnzp374osvFhcXv/3221u3bg2Hw3ySstnwScqAG8Jzn+XLl7/55pvBYLCysrK2ttbpuQ+0qA8gZnzfRwnQO++8U1VVdeTIESU93XymhVvUBxBT6hMKhbq6utSfhc7OznA4vGfPHjU93dTHLeoDiCn1CYfD165d69Ho6urq6Ojo6upS10QikWg0Sn2coj6AmFIfpTIRS9FolPq4QH0AMaU+3d3dxtaoxdGiPk5RH0BMqY8xNLFYTPmqQ32coj6AmFIf+3/XS32coj6AmFKfdie6qY8TDuoDICl+WOyzWx+GYWxO2n+Kb1e26gMAKUd9APiD+gDwB/UB4A/qA8Af1AeAP6gPAH9QHwD+oD4A/EF9APiD+gDwx2irz8fbyhnG3/H7h+C2MQrr48O1GDBKFTpHfeyjPoCpwsJCRx/dSX0coT6AKaU+1peUV1EfpxzUR5Ik4bJ2pRlPvncRs/ooz057U7fGuI2je+0zficjPJTZEVL4QGMW9fGUy/oYb2rXKAu6m0kPmHS9Hbr6qPkT3tSxWR9jW83WGx/OTvLsHEe7r8XT0e5ofSgIKfXpsYf6OGW3PnaKYPFjY31A4wZ2Hk7IWB+Lm7Llj7qLcOhWGh/deGTrIlhkQngEbWu0m+luwialPjb/26M+Tjmrj7u4JL3XxRHMOK2Pzbts9khOVh/dsqOjCe8yHsdsRwLkglKfa/ZQH6ds1ccsMcZtLOg2Tnp8O4UyMnvlpf6UmnVESHco3X+aI6xP0uObrTTubrGvnacGM0p9Ou2hPk45fuVlMwrWsZAML7uS1scms3Mfafg5gnUIjNsYbwrXGI+c9C7ht2TnIczqmXR70mOfUp/wEGHH1Xupj1Mpro/w/x6Lo3X7XR/7JwjGlWY//2aHMju4ZKiJ8CEs7jJuZv29mR0TOkp9zmvo/pfU3kV9nHLzrrPZsvGmcI3xCKqkOyaV9JWXul63mfG/PO3Gwh/apL2weBSv6yOLCpv0mNBR6tM4nPrfg2499XFqRPWx0xo79RFumar6aBcs6iMkPJTFGtlVfWwezfqBLL7tpE8NZpT6nDGQJMm4kvo45VV9LLbRrlceV13jqGtCNn/nlbQsdrZJuiad9THbzNGW0FHqc8oe6uOU+7/3sT6pSVofi7vcnfUoLOpj86zE/jYu6mNx9pHy+gg3oD6OKPU5aQ/1cSplf+9jdpd2G+Fh7Wxmn7Y+9nMjbIFud+NNp3mySKG2DtbsPDvhGuOzQFJKfertoT5O8a9MAVNKfU7YQ32coj6AKaU+x+yhPk5RH8AU1/fxFPUBTHFtQ0+NwvowjL/j9w/BbWO01QfA7YL6APAH9QHgj5T9G3fjHw0a1wCAys11nYUlMi6b3QsA3Sl85UV9ADjiuD7Gf3mkrtduY9zSu+cA4Hbk+LrOjt73MW4GAIpUvuusW0l9AFjwtj7Wr7y+brrCMKNvUvKTORa4qY/9932MuwOAwvHVxbrNz3d43weAfQ7qY4yOdV+oDwALI3rfx3iOY9xeeBMAnP29j/AEJ+lZj9m7zgDGMv6VKQB/UB8A/qA+APxBfQD4g/oA8Af1AeAP6gPAH9QHgD+oDwB/UB8A/qA+APxBfQD4g/oA8Af1AeAP6gPAH9QHgD+oDwB/UB8A/qA+APxBfQD4g/oA8Af1AeAP6gPAH9QHgD+oDwB/UB8A/qA+APxBfQD4g/oA8Af1AeAP6gPAH9QHgD+oDwB/UB8A/qA+APxBfQD4g/oA8Af1AeAP6gPAH9QHgD+oDwB/UB8A/qA+APxBfQD4g/oA8Af1AeAP6gNkisBrS+bNm1c4isybNy/w2hKz50t9gIww/5VXS0pKQqFQYhQJhUIlJSXzX3lV+JSpD5ARioqK2tvb+/v7I6NIf39/e3t7UVGR8ClTHyAjFBYWJhIJv3OReolEorCwUPiUqQ+QEQoLC+PxeM+oE4/HqQ+Q0ZT6+Ps9SJKU8mNSHyDTKfW5lgqSgdlmSRdGjvoAma6wsLC/v78zRSRJ0i5oS2S9mXZlSvT391MfIKMp9elIEUmShAvqTeu9Uoj6AJlOqU84RbQnO+oa9at2Qbexbq+Roz5ApissLOzt7f0mRSRJEi6oN4XbGO8aud7eXuoDZDSlPo0poj2LUdeoXy021u01ctQHyHSFhYXXr18/kyKSJAkX1JvCjS3WuHb9+nXqA2Q0pT6nUkSSJHVBuyzcTHjuk6rvhPoAma6wsDAWi51MBV1HtOt1mwnXC9e4FovFqA+Q0ZT61KeaJEnaBd1N47LZGteoD5DpCgsLo9HoiVSTJEn9ql1j3EZ707iNa9FolPoAGa2oqOjSpUsdHR3HRpGOjo5Lly5xhQ0go81f+OqKFStaWlqio0hLS8uKFSvmL+TqYkBmezlQXFRU5NVVTv1QVFT0cqDY7PlSHwD+oD4A/EF9APiD+gDwB/UB4A/qA8Af1AeAPwT1YRiGSc/8/bGWW/X5+2MtDMMw6Rzh9T0AIB3+PxrH8oU7ySYoAAAAAElFTkSuQmCC" alt="" />
3. 单击“创建”按钮打开 Visual Basic 编辑器,其中包含已键入的新宏的大纲。
aaarticlea/png;base64,iVBORw0KGgoAAAANSUhEUgAAAvAAAAEGCAIAAACM5za0AAAgAElEQVR4nO2963vU5p3/rz/Bj3No3E2yV36/75O5rt1uaXQ1zLa/bZ3213Z2G+wx3XRnm92Nc2oE2GbS0la0ydZJOAgMZnIWYOwBY1s2NpijhcHgAzayDcbGGMTBwZhQFL7bb/JM3we3RtLoNJoZn4Tfr+tzcWnukW7dukcevfjctzTUhweH9aAoNhWUmooUrDnMW2UdiVceoZ78SSKPGrKL5p98g6Io6u/eWpB2bvg76gcvz+4RZdGwXI99NiPVA/n053yfMxv+jvLA9IG+9YNHftH84cFh9hdPkgVLsL940tjuG6/85LvpNX3jFXYWm5145RGjwg1/R5bTCm0v3/oB9d0Ns7ff5p984wcvHxx++bvGh5XWA9QP/m5OewCBQCzhoD46NKIHRbGUqmphRi/U3mLNW6WH8NMnKIp68qcJS/nGv6co6olX1x8a+Sjx6iMOK8xVrP/XJ6nvbvRY4eXvUpYV1v/rk9QTr66fnXZu/HvqBy877lSHdIv/8N2wjMfuI4SfPmHtnxx7IJ/+nN9zxt6Nj/yr4PjWy98lrRJ++oRT8xKvPkL94GXycT/x6vrf/ID67kbyt/D33/3B3//GtOZvfkBRVFqJv9BOJPIBJV595IlX12t/gzb0vz7z+aY1yVZzpvaYTy1T/wg/fcL5s17/r0861bbx77+7kRyF3sPaEWX7R4FAIJZ8UJ8evqAHRbE6VolJFxrzVunR8rMnqEeeePKRF1vM5W+/+CT5knrbdcO5ileeo1KNafnZE9S3fmtb57c/pKgfvpJ+CA6r5Rgbv5VWub1VF155jqKe2zjHx55rfPjqI088+YjTIeTZAz5idj+I3OPtF63ns6lzXn37MDmFHATiZ89RFPXkzz7c+C3HRA9FPveWnz1BUU/88Fs5Hewrz5m20ttDup0spxV6tdn8Z5KhPZYdGZ9vy8+eSC1/+Oojxlnd8rPnUuubt/3tD1O7aPnZE0/+7MNU/b/94YJ8VyAQiEAH9dmRUT3MuRiKoizDTOYwb5UerZEnqG+9+Nqj1A9fTSt8KvLiD6knXnvbdcO5ilefox59sdVo2zr7Opu/RZnKP7I0Ps/Y/C2n2kytGn37xaeo5zbP8bHnGG+/+NSjL7a++pxjv+XVAz7C7fOa7yCd4FhOPbfZOH/W/dBptfTD/+i1R53/CnI82NRH0xoxZWW+9ZxdsH746pHRV58zrUP2te6H2rlnbbxXe9LOh3Vpf9evPvfUt557St+LVqe58o9eezR1tr/63FORj0z16H8F6xbmuwKBQAQ6qF3HxkjoNmNGdYKijK1s0fbPT1D/8Lux15dTj/6yTSv8XRH1xOt/Jv8eG9v1yeuPUkWva+tz/6B/9/2yLbU59w8Upa1sWoEythr78y+fshU6rPn6cqf/Fms1G/H6copazhk1k2VTO627Mx+CdVnjH36nt8potnmPqf7RemyXaw2ee7d2YPpBpfWGY0/aO9zyaT71z5+kPkH7JmntdCtP9YB3s60HbmrtE6//2WXb9E//qX/+ZZGlK5zOk6zjz798ytK3RjOWc8a7vyuyfwRaJ/yuyOlENDcp/TTwHcYuyMGSj8nakrZ/fsJ0ipo/aH1Nh03c2pM6K/ROeOL1141+Nv6UzFUZn4uxI1OrLA1LO98QCATCV1C1J8ZrT4xTJpthWS0od6EhWzlF+78UUt/+w3jtH4ooqugNS0nhG++eGK/99I1Htbe2fJuiHv23dsvmqQ1tK+h1GjXo4bLmifE3luvlqZbYm21UaFpHL7Tvzlxi3nb5G+9aG7Dl29amaq0yKExt5ViD197tHWjdS+pdt/6xdHh66B/ZiS3fpp76l0+dPiO3quw94P25O3Sd02fheiBbvk1R1PItqZWf+pdPHc+TXOLdf3vK3snv/ttT3/63Nx4lezQaY0Ba/sZy7eTXavj0jUeNLjW3zf3k9AytfvNJtXyLpSVEnozT1TjfTA3TFzK3x2j5u//21KPLi8wVOvTVH4oo8nGQXdjaZjpFTSePuZEIBALhI6g9nZf3dF5mWdbNZkRRtCxQlLaVUxz8eSH17T9oC4/FDu75w/NU4Rvvdl42Fj574zHq+V+bSxw2v7zHYQX93S3fpiiKeurnn2Vc8/Kvw9RjsYMOlTvuV2+buZ323TmvdnlP5+V3Y/p/VfVtjXf1MLXq8p4/PE9lqMFl7w4d6LIX1/7x6JO0Rrp3o1tV5g/r+V/7aLbtwE0Vum5r3oveRQd/XkiWbV2XFuRdjxWMhhkflt45sTfe/eyNx8JbjMI/PG9fzfQR2zGfGB4fhFc7fx02dVHhU48VvvHr2FPfDltacvDnhabTtfCNdz974zGnBlHG4bi3h9Rg7gTzJ2Lpk87Lvw4//+3wUz//zLl/3o09ldqL/qllPrERCATCHlTy5CQJllhMCsfcjC40+la26HihkFq2fjJ5cjK5/kdU4ZsvhKnH/r1Df7nh5GRy55uPUT9izCWOmzus0PFC4dMv7ExbmaKefmGn15qM3gBL5emx4d+fpsLV5F+tUG+nfXfmt/TlnW8+RqX2ZaxQvSytEi1MrSLr6NXaa3Dfu0MHuuzFtX88+qR6mfVyR9pj2UR/6Vae6gGPZjsfuKlC1231A0n1ofd54t5XHrHh3582fVjpzdbPlpOTyfU/cliNFOpv7XzzMa39lhPD6+T0CCasbcWEqWX/nqp8/Y9sqmI+XSlK6+2OFwqffizseAp5nximlhtH5PSu1kjtj/Sxf38z7aQqfPOFsL4X04aZTmwEAoGwB7X31KQe3h5jFhrzVunRseKb1LI/kmVyRfzRKvLWH39EffPNjacm9+568zGtsHoZZay84lcd6ZtrKzz2q469thpW/NGyO5c1T02u+ke93FJ5eux68zHq6ce++fSKXeaSH61y3N2uNx+jtDU3/upp7RhNOzUKT1Uv03vAFKZWTe7944+8anDeu1sHuu3FrX/c+0RvlemzWPZHbRPqH6v3Wo/UrTzVAx7Ndu46U9vSt3U6kOpllP7Zdawgn6PDeZJLbPzV04/Z+lZrVep4Uz1mQDZZ9Y9Pr/iVXS8Mz0j1cI4tXPWP2larfvXmxl1vPpbqxtS7pvP51OSqfzTvMXVcf/yR09F5tMfc1ZN7HXaa+oBSb2nNcNqR3n7TR5z2h4BAIBA+g9rfLethFhr7SJN5yMm8VXocLf4m9Z0/aS83v/Q09b3t2lt/+jH1TWZzt7y/lnmc+vEaUljLPK59s5OStM33d8v7u7d/x/j2T23VLa/5XqpMr999zcdfOmq0h6K0Zji1PO0tUzvtu9OqoqjHv/fjx02NtxVu/46pMfvt7U9rrWMNtr17daB1L/qxu/SPvcNNLTT61lxytPib1He+92PnqhzKUz2Q6XO3H7jxeZm3dT6Q7d+hni6u1VuiLTudJ1nH5peeNnWjKWqZx83V/unHttW2f0c7o8zNS2uh+dgJjh+HW6z5nmn9WubxbzKb0/rHRNppf7T4m+kns/Fu5vY47dT6N/udP8n7//Rjsgv9U7D1j+n0S62sLTv/kSIQCIRrUE1nr+tB+c7QmLdCLLE4WvJN6tl3/JcHL8q/Z5UBK9+raTp7valu1eNkgcQ7P378P46a69nyH39rKjla8s2/LamreTalYuWz1FSjz+tWPf7NVVtMbz3+HzUl3zNKUlHzLGX7pOpWPW4vdAvzjtJ3at4Flaqw/Ht/W1KX3j/vpMRX25Z0jtGTlEOdCAQC4RVUS+8tPfwLjXkrxBKLE6V/Q9H/7b8cMYdR+X2Koijq+4mW3lst9au/8Terq//7/yeqoH0W9au/QZnWmaWo/s+/ncUKK79PfeM/T6Qd0d+srl7ovkUgEMEKqrV/So9M/y01MG+FWGLRWfo3FP1n/+UIBAKBQMx5UAfOfY5AIBAIBAIR6KDaB28jEAgEAoFABDqoQ+enEQgEAoFAIAId1OGhGQQCgUAgEIhAB3Xp0tRsxdiY//jcO8bHZy0uX9bjdp4xMZFDTDvGlSuzFpOT9riTW1y9mk/MmOPatVkLWfaIu1nF9ev5xxckbtyYtbh5M2Pc8xm3bs1aTE39Zbbi88/9x33vuH171mJ6Wg8lz7hzJ4f40jFmZmYt7t61xIOc44svco7/bYl792Yt/vIXt/ifbOP+/fzjryQUZdbiyy8zxv/xGQ8eLImA0EBoIDQQGggNhAZCA6EJfEBoIDQQGggNhAZCA6GB0AQ+IDQQGggNhAZCA6GB0EBoAh8QGggNhAZCA6GB0EBoIDSBDweheeGFihdeqPB2F/K8YEtJNmYDoYHQQGggNBAaCA2EBkIz90Kjqqq3zaiq4TQURbEUq7+E0EBoIDQQGggNhAZCA6FZYKG5dGmK/Ailh9CoKsWymtBQFKVSKoQGQgOhgdBAaCA0EBoIzeISmozjTbMkNL3vraDfrHURmtryFe/1GmpSW04zjfMlNE0MXb4n7WX0/U6rrNQx0ffF2xMTfe8X0+mU18290JzcEF1VR4SmaZVl/8VbuybvTHZttbYrjeiGrnkRmmRF8cYBq6acriZtW500Ck9vjNKrhfkVGmF1SXW3tjy4qSS6qTuT0OyrLNk0eH1fJU1X7ptXoWldQ1c2aAsOrGm4d7OhsoQ7b1WTnm0lJZVrSug1++dLaHq3l5S3Tk39ZWpK4krsLV3baOhLazm9tvHz1nKHdeZBaA5UeP2BrG0ivtJfE3VeoXRr/3wJjRCnK9r0lwPVpdHqkbQVBmqiphVmZr4UKuho9YhVaAZ3RGk6Wt1ebT2kuGD3GCFOR3cMLqTQXNhWSpduu2B/q7XS9WMr3X5hgYTm0Fr6rQPZCE3b2pU1wxCaORYa7zk05vEms9CYZ9Vkk6FpfJOOvnfCQWhqmeh7naYFJ6HpfC9KM43j473vrTCd0Su2vMfQugzlIjR7yovf77t8uYlx+oNh6oipNDHFW8QJIjTEbEj0vV9sCI34fpRmmiYm+tOlp6LuynTdKrp4Q38eTtO0qnjrSSI0xVu7jPQMeXlnsmtr8armyck7k5PnNhTTq+rN7nJuQ7EhNF0bovSq5vpVNL2q2ewopzZG6eKtG1fRxRvP5S80ydWmDiiuPu2UjDm9MWq3H11fTm+K0quF05u0L+PVe2f2rqZLNg3OjtDss3xHVu7zEJrrX9zYV0mvadGl5MzmUuPlmW2m63jp5jPaOvvW0CWbB/PI0BCnaV1Tsu3szXs3b57fXEIU517DGnpNw72bN+/tX0NbnaZnW8ma1lu3znMlpVyPVtjDldJaYdoh709ttX8NXcJJOTtNL1davj9zhqaxnC5vzJCh6d1SSpcf+PzzoS3ma3B0e9/t+7dv328qp6NbhmYlQ9O/tTS6ddghAdNfE61os5c3VaQJzbmtpXRFW7NdkSramivo6NbhfIRGqKArhC/9CI3g5GjR6pHB6lKaplPiMlIdNRtMe2VKaAR3UaBpmi7dMfjFgy++eDC4bSVd2Z5SlpFtpbTp5YOWSrp020iOQtMa92wBXdmqCU1lq1NupjVuFhpp+0p67cHWtTS99mBaYWlCSn+5fS1duv1ijipz4C1LI9e2HVprdFpiWPmroozWlJpXcBWa4ZqV9NpDZP14m8ldRhKl9FttX/61LU6X1oxCaLITGschpzSXoSgtS6Om2Yyn0KSbhyMrtpwY+3y8c8uKFVs6xz8fH29kyIJdaIx1et9bQTO1ZtfpfW+F5kPZC03f+8yWToc8DcnK0Ezd7Tqz6RSXM24ZGnFLcfFWcWKaCA1TZ8nQ9G8ojm44mYPK9G/Q91i8tSslNPWrohu6HISm3prAiW7oMglN19Zisn59BU1XJA1BObexmF6VJAvRjadyEJqBjUY7DYNJro5uPO02wDSwsdj6riY0p6tLSqpPyzOyTDxmQJZnZHlwU0l00+kchGZwk+laXrKpejVN6xLTvSlKrxauXxdW05kgEnNmW0nJtjNEUPZVmiWGyM2afeTl4OYS01s5Djm1rinZ1rDZ9O24plUXmlu3znNrtnGOORyapte0pnI223pu3SNCY2Ru9lfStP7yPFdSyvXmPMwkcSVr93sKTWM5Hd0iZRhy6t0ejW7v/fw+EZryRs1FmsppuvzA7dv3b98e2hIt3dI3x0Lj3JsmoTlXE43WnDNkpa2CXttsvBzeGi3dei5noWkzW0qFYBUak8SUVg98OVBdSuzn7t0vB6tLTXkaXVy8hKZSyDTkNLijNGU2qZcrS+l4i7HOyLbSldsGcxQakpI5v20lXXmQFOrL57etzEJopEQpEZfWt0wGc3F7KU3TK7dLmtC0aipzcXvpyu1Ds5WhObSWfqtN+etwzcrSmlFFE5q32lLK4io0w4lSkwA5Cs2XX47WlK6sGYHQ+BMatzk0uruklbAsRVkryZihOfFe1DrSVFu+4r1e/WUq9fL5eK0tG01r2ZdaRpcYu9AYApS10OwpZ/bcvrynnGbKPTI0qfEmr6hjdIlxFJrpK3UV9KqmfEad6FVNk15Cs1VTH1IyeadrQ7R4wzlzhqZ+lZ68aV5FE4O5c/XqnaunthbrfpOssCRvss/QuMiBNVUjrKZpy8CTnJKY1XuN5ZTQ3JX3VtKrhRwzNN3VJSXV3dfvdm+Krt531zCY1YLrkFP3tpLVLZY5NPvW6MrSssbQl1SYx6fS8zq+heb85hKaJuNKnhkap8Gj1jWavhjZF5O1pA9F9WwrSeVppvavpbWRoxxjv8PfLk3TNF3e2rullNhMY3npll5XoWksp8sbyXKa0NxuWpsSmvTlBcrQNFfQFc1mWbEIjXKneS1d0Zaj0AhxXV+ECk1ZPIecRqqjcWHmy7tCnK5su3v3y7t3R8xjTB5DTkRonPM0KYlpqaQrWwy/Gdy2snTbiKXwi5Z4KmeT9ZDT+W0rye7O37uwrVRLyWiFKcXxIzSta+m1rSmzMQzm4Fr6rbX6W3+5uL105XYplWhZezAnlTm4Nq2n3mojQjOcKKV1ZbFkaA6lb6Kt1rZWS954Cs1fv2x7i44fgtD4FRrHYSbdZowMDcnNmHI2foecTmxZ8WajWWhq3zQPPDUyNJ0aS9ISLbYMjektR6FJ5W+yFZo9xGKKt3Q6ZWgm9NQL0yS+Hy1+v2+izulru3iLqA1FeQrNya3FxVtP5iY0dRVk6MpTaJq1MSZ9Po0xCEWEJm3sKWkadTq1MWpIzKmtxcVbT+UuNNWrfWZokhX06mpLkkaWZ2R5YFNJdNNpJ6HRMje5CE13avSqZNPg9e7qEpqm6crVq2nX8SZnoTHlXfZV0nqqxoiWNXrOxpzLyTJDc3ZzaUpoKtekDxWtWUOvaUhJj3WujEVozGNPNqExlUz1bi8p2d6bs8cYMtRaTlusRQuiNY2O3qMNM5Vu6bULzdCWqGmkqW97NDUCtUAZGnsCxiY01hSOf6EZqY6WVg+kmcpAdSlN02lOQ4RmwKWp0ZrBu1/eFeI0TdOV7R6Tf00ZmpHBQW2hOmrYTHr2xfSyJU5b0zbkZXZC4zE5JnWyH/QnNJqp6FkZzWBa36LXHiRDUSnXeauVzKEZSpSWJoZyz9CMbi+1ZmiIl6xty5ChSS2M1pSmCZCr0IwkSksTIxAaP0JjmUNDbsnW5/xSFEWpqTBKVC0oiqIoH3Noet9bYTKYE1tWrNhyIiU3J96LrmDKVzCN451bVugSYxWaRoYurzXkxjjhU7NntBVyGXIqJh7TxNDRYtvE2uL3+8T3Td8bxVveZ/SJNbcnJpoYbciJLBhCY8DoWZmmVXRFXQ42c1IXlOwyNJP1FTRN08UVqzSPaV5FV9Trk4KNrIw+3kSieVXaaJR/oSGjThVJffipuHrj6ujGjVqW3DwpmKy8Okm0RkgXGmE1XbFXdhIaWVhNV+7NRWiE1asryRyafVaJ0RJFuvHoV4ZN3S2rS7Z1X7f4iikB4yA0g5tLzCkc62zi7IWGZGiM0DM0PVzpmv33ejjjP4Ml3LZ0oWldY8yV8RSaqdZy2hg2ynVe8F96OT0Zkz5jpnd7NG2CsK44Q6kMzYFyY3aweQ6NZYzpQDm9tmkhMzQ2fbELjUOJP6ER4nRF20B1KU18JVozkJpDI1TQdLRmQBcamtYnDpP1LXc5CdUro3S8ujpeXe0wTyVaPXL37gOhcmU18ZjB9kqtw1dWD5qHnNorzaNLhse0V9Jm0dFXyzpDQ2Tl3r0L20pXbjtveuv8jtIsMjQH19JvtaZPpjHSNubRqLUHU5OCD66l3zqQvcoMbV9p6czSmgTJAxFSQmOskCqxeIyuQdb1U6SE5stDcW0ZQuNPaPQhJ/0mJuI0FEVRbCpMz6GhWFabUuNLaMwSY50XXPvelk6zyjgKjTGBxiVDk0rhZCs0nSlZKWbKi4vLmeLyPZebGKaJzBTWsjKpCb9kuc46NFVep02g2SJOeGZocp1GU7cquqFua/Gqpit1FcUbtq4iM2lo85Qa66TgFERfUokZfQKNdpdTymPM401XfU6jcZxDE924kQw5DWwsrkimZ2hOb4ymCU2yIjUClTaTxjKBxiY0WUyjsaRnVu/TJwXbRsSMu5/sN0NV7jMLjWUCjbPQ6FNnHKbR5CI0Dcb/ZEs2n7cITUpNiLjoC/pNT7rfOAqNlr+ZmpJyn0ZjCE1recn23rR7mnSboWlvoTEm0KRlaEwTaPSETS7TaGYtQ9Nvz77Y9cWexfElNEJFXJj5cmBghGRlyOQYY8hJiNMVNdr4UUXbjOAyo7ay7e7dturqHZV0XLjbXplK0gxWryQeY8rQrKystF6eTfW0WybQmOf/ps8F1hM5OQqNNsZkEG/NSmh0ZUmbT6OnbbQFMoEmJTT5TKM5uJZeuX3or/fv/1Vpe4sITVvabF97hkYvSS0YE2gyZWiMaTQQmkxCY59DY7kx2zLkZB6Wyu4uJ21+jNNdTkRonCbQ0DRNr9jSacvQ2IQm5wyNMZmGZrbYbsmmdaGpSw1O+czQOAlNrhkakqRZ1XRFH3Kqr6CLo8XOQmOKrnNdaUNO6Rma1EhT2nhTXhkafQ5NxgyNsNr80pSkmaMMzb5N1d3XzUKTnqFxFZov9q2mV+9zydBknEOTb4bm/OY1pSVrWm82VNJrWkmhXWj2c9t6TB6zf41xf1OGDM3+SjqlO7OSoenl1nK92hRgjfLW1NQZk9/4y9CkhpwOlNN0edPSyNCYUzWpfIznHBpjiOru3S+FytLqQTI7OF49qE/+bbcN7JDEjGWy8IO7QpwMUZmmzpgzNPZ6zG/lnqEpLV1JVx5srdTu2dYW8sjQaC9NltO6ll7bagxL5ZOhuT+UcEimpDDNibEIzaG1xvxf8pY1Q+MuNMjQZCM0btNovG968j8pOF1oHB5FM54xQzPeyNCZ5tDkLDR7ylPu0vS+Q4amiVhOcbFnhmaiiaF9zKGZBaHRHkWzql6/fzs1b2ZVM5nqS9P67BnLbdvNq0wPpEnNBY4WW/Ix1oRNbkLjlaFJrqYtN2zrJSmhcZ9Dk+OQk9lUshCa6/sq6dXmm5tMU2TI/duudzmRlzkKTcMamqZL16wpLdl8/qZHhmZNZeqWbE1cerjSEu58KjfTuoZ2mUOzv5I23ro31bu9JF+hMR4wow82mWYB+xEaxzk09/u2lOp3bt/u2x6dK6EZ3uqSnDGI1vRPt1XQPubQ5CM0AzVRWp9J4yk0A20VUZqm6Wj1iFBpPIpGqK4ZNN3N5JKhaa9MPXjGKjRGYsY0tNQSp9NubmqvpFNTgwd3lOY75GRMqdEeRZO10Bi3MmkGs/Ytko9JTaZ5a23Kb1JekpPQGDKkZ2hGU0+aSROamho97bSypuYt2w1Qh9bSvufQQGh8Co2f33KyiI75OXt+hKb2TSIyjakZwTRN0+a7nHwIzVzd5bSHoWmmKfUwvT4noXEYckrd+pQ6XYu3iLa7nMzfgtowUz53OelC07W1mKaLN/SbHkjTvKp4a5clQ1OfurlzVbPLXU7G3dq0ZQrwLNzlZLqF28TqZGqejcMj9QY2FtPFGwcsdzmZn0OT711O130PORktbtFu+V7TcmZzKXmujOkuJ6/n0ORxlxO5p6l089nWNXTp5rP39AyNfQ4Nbbolm6Zpmq7cT+5d0h5IY73LyXTIaTdD5X6XU+92Uqv+JBuX59BkFBr3u5xuD22Jpgae5voup2mlf2tpyl1MlmNK28z1XU60yWZ8PVjPGHuKC8Y0mgxCYx+BMmdozI+ZIdbSUpn2+Jm0kjzucmqtpCu37SA5D+MWp9Id59OFxg2Hu5x0g6HNJQfX0sbzafK7y8lBaNq0CTTG7Us0TeuiM1yzkjaSMUZiBnc5zZXQePz0gUVoyGxgf0Kjzd51fDrwifeiNG16Dk0moUmfRuM8gSb3nz7Qnq2nTxC+rT9nTx9dIkJjTs8wdeYhJ/NzaByfFJzzc2hMQlNXQdMV9doj9UzPp1nV7PdJwaZpNC6mkvNzaLSH6aWsRcvQmB+jtzrpkJuxOI2WjEmfRpOKnJ9D4ydDoz+rxvwW+emDljVmWXG6d8kp8n0ODRlgMk0H1u5sorWHCGujS9qkYPLUGf1JevoNUGnTaNwi9+fQ7C/XNvS4bdsmNHouR0/J2KfROD4pOPfn0DR5PieYpmm6oo2ojLPoNK3V33K6icl7Ak02k4LpuJBe6Pgcmmi1Ns+GtHxG++mDtkpaz9MQoRmx3bNNvg/ilabxpsFqLZdAFMfrOTQOkcdzaLxvdMrmtm3rNJoMTwrO/zk0qZ8+MGVoXCI1C7hNeyKfsX7aNBq3pwPjOTTZCI19Dk1GoTHbTBZDTnn/lhN5XI39tK/N80nBLuHvx5tMQpN6UrDj32beTwrWwvW3nBzn0Lg/KdjtOySZ55OC8w7Lk4LNbcv7ScE5hPNvOZEnBbt/E9M0Tef9pOBZ+y0n8qRgj6bm+aRgS+TzW07kScFu7ZzFJwXnE/qTgh0bmf+TgnOLuRGPZwcAACAASURBVPstJ/KkYLcPJa8nBWcTGX/Lidzc5P1XSTiQz5OCLUKT3+83kScFezQVTwrOWmiyCvv0mnkTGj+BH6fEj1POg9DkE/MvNHP7W06zKjT4ccpFKDT4ccq5Exr8lhOEBkIDoYHQQGggNBAaCA2EZpbCh8dAaCA0EBoIDYQGQgOhgdBAaCA0EBoIDYQGQgOhgdBAaCA0EBoIDYQGQgOhgdBAaB6+gNBAaCA0EBoIDYQGQgOhCXxAaCA0EBoIDYQGQgOhgdAEPiA0EBoIDYQGQgOhgdBAaAIfEBoIDYQGQgOhgdBAaCA0gY80oRm/8vmEjEAgEAgE4mGO/oHLRw4PHmjtcYvR0RsWXbh95y8L3mzvoGAzCAQCsYChADDvTMif9w9cbhHOuMWRw4Nmp1n8NjNhFpor128jEAgEYp5joS9tYClCzr3mptPeoQvNgv+Z+AkIDQKBQCxkLPSlDSxFyLnXuL/LOwIvNC+8UPHCCxWW9ViWpVjK/78eu5Q5Qdp2QKoSpCpeYnkpzosMJ5ZxYowVo6wQYYUIKxQxQhGzUJ1y49bCfzCLPxZzLy3mts1WsLyccZ2RrpMCExOY2OjAgP9eYnglzEhsUvGoWemIzPUBCgcvMowciYkNLf1u6/RsfPfIyy8eeflFoSw2R83IeC61nZ78007pv97vfb7ywPOVB/7r/eN/2nm27fS4/2oX+tIGliLk3GvYJ3qHXWicDSHvr6NZCUNoJm9MkyDNVVVVL5m8MZ2VzbAsa95WD5aXJ29My5xwrbVLFkRZEOWkKPOilBAkTpC4lOKwvBTnuVDMsRI/IXQoQociCIogKEJS4XmFT8gcJ3OczFXJLCuzcYmJSwwjOW5+49Zty+Fb4uLF8XN9A2T5+tTM5zdunz7d46dho8Ojo8OjF4cvXhy+OHJ+ZLBv8MKlKzkfJonB/sHB/sGzp8+OjE7ksPkHydOVGw/8U9mHesluoddSklsv6SEO39197C/1x+839/zlyOAXlybv+Nnqijw1Pn519OLYyNCF0bHJCXnKz1bZti24wSZklpf7L7l25tDQgMDEZI6R4jGBcfhrcuulMCMJshpmpDAjMQk5xsmWFZSOiKpISrLQZ1MHz587frhBSHICz/E8xydYnmO5KvZg2wG+g+dFwXErhpFFUeU45b/KPrC8VSN+RBaOlr2o8qwaLXw78v/NUT97nEu9Izfe3jn0fGVXrEqKcVIsIcUSUoyTIqz0/JsH3v6kp3fY2nWO1S70pQ0sRci5l6zv9A5daPRT19EQZuXrKP+/VgehmbwxraqqtbksS7GU6gOypuPOyDFLnCAVsWIRKxaxQhErFDFCmBHCDB9m+GUxEtyyWF5CIyiiqHKccwuVr9VIVIxFhVjU+Zs04+VwbOJ6V2fX2JUbkzemb9++d/7c+b6BIT8NGx0e/erBV3oM9A20tbRJI2NZHd2F0ct9Z/tInDh6YvrW9PStafmKvLd+75GOI0cPHz3SccS/JzF/bFC+Vp/5p997lOTWSyRqDv6FTciVH8uV2+TffSC/s1ve1iBfvJLBaa7IUwN9A2dOnT3d1X26q7vnTF9315kLvo1tKQgNk5B5UWU45y+RoaEBUWCFDkmqYgQmxi0L+e8lluMZXhFklRfVCCvHquQIm3ZhFqtCak9MnRZl3qFac5w6eVBIcjxbKCQ5RWa1GGMUKSYJMa6K5UWBlzjHbSMxkeOUWEykKOP7pEb8KLo7Gma1/R4te1GNFvKR8LP/63/56bTjR48fP3p8dPzqQN/AQN/AxUuTGTdx66XekRu/+XAwViUxCYlJyExC5gSZE2QmIcU4ojUis/30WRengdCAhYWce3V7jnuHXWgmnQxh7r6OsgpDaK7evOMRJO+iqqo5DWORGPMKjpXox6x8bbOMr1VFD0VVFDVUFPNukkdoQlOlONqMoijhiBgKxSJRwXFz0rPeuzglnhocHL52886dW3caGxqHRyf8NOzi8EWz0PR091wevdy0v0m6MO7/6PrO9t39/O69O/dmpmZOnjg5MzVzoLV97MJYc2Pz3vq9YxfHhs8PJ+uSfqraLfSxnBAp40MR7tl//u+rN+9wSdFS4hYevRSrEs8M37h6884fPh2NVUnRd4bCZWK4THj25QPP/15+Z7f8/s4R74YNnjvfe6a3VThQvye5t35vU2PziWOdXeKpC5euXL1558q1qcaGxtzapkfb0PGcT7DFEAwn8z0q16FGquRzY2lvDQ8PigKjyJzcw7BVLLcsJDY2+e8lluNVVQ0zEpNQeFENlUn2dXimQO2J8UyBdyPNNsNEw7rNKD0RRQwrHSE2ybCi81/6/taBl8s+oCiqvvHU1Zt3ROnMzzf8gBvjYslYmA1p9ZfF3v7RPxUUFISfKfTTaZcuy91d3cePHh8cGj1z6uxA/+C5c9L4lRsem7j10tu7hmJVmsrwoqx8regh9Mi60/z2k56M1TpdbvgIFeEVPkJZiPCzdD3riT9jrZt6Jt6jvzlrOwKLE3Lu1e4+6h260CzU15E5Mn5pOwgNSShZv+NSGRrL0JKlRH+Z8ZiVr1X165RhpDxGToUoyfkIDZ9URFFlWdnRZuRpJRQR2LgcifBZfYWZ4/yA1Hms8+rVm5dHL+/Zvcen0IycH/nqwVfXJ69fGbsydX2qu6t7fHT80silSyOXhs8Pa/9rHJv0rqTvbN+9O/fu3bl3+NDh8Yvjt2/evjZxbeziWFdn1y5+18EDB8XjYl1tnZ/2sAlR/VoVRJnhxMIi1ijpkVleIiVu4dZL49emY6z4u50jNc2XGU6KsFKYEcNl4kr2xM9/dzAc4yOs/H4ys9B0tHfs/Gxni9Da2tpevydZu6v2+JHjJ451Do2MnTp5em/93snrt7NtmzmoKqrtQl5OwwkqJ6iVH8uW5WxrYAWFTSosr7C8Qi6QfuqJVWl/TaygRuKS/iUyPDwoJGOKzEliTEhECgoKzvScyaqXiNBIskIm04QZKcI6tMfDZvgOSQtB0GwmFtGcJmUzslAo8YVMIsZ0RHx218G+I7+pLX9x67/oQuM/jh89fnFs8vzQxa7OroMHDk7IU50nTj649+Dzm7fPnDrr4TSOvXTwzNXnK7u03Ayv2Yw4pnCCrCiK8rXCJeUYJ8WqpGffPNB6+rJ3tfaLDdEZv5jcJGsNsagLH3km3uMmNGl6pcsPCCbk3Nu187B32IXG0RDm7uvIHBm/tA2huXZrhoQ+QqaXXLs1Y07AWPI0Fr8hC+Zt9bAcM1MlxOKc8rXKciJTJTAsH4tzMYaVpzWhcazET/C8IooqE5cdbUYaU0JFAsNIkQjvuDnpWe9dDEkXujq7env62w+079q122fDBvoGSG7mf+7/z/2792emZsZHx805m94zvfV76qUL4x6V9HT33Ltz74vpLw61HxKahObG5n3JffuS+5J1yT279zQ3NovHxU8//jRjY8avfs4mxBir5WPCUe6fXvkwFheYKiHC8KEitrCIvTT5udvmHr0Uq5JinMwklOjG++GYEI4JW/dJ127NDFy68Wys9vnfD7392XXvtvX1DrQKB3byu8Ynb1y7NdN9tr92955PP/n0yKEjxw4fO3zocGNDo8fmfj5BqoqiElT7heM5n2acoEqyGooKluVsa5BkVRxTRUkVelShR+U7FD/1xFiZ71HDjMQkVYZXI3FpYHxmZPi8wEfMXx+nuo5m20ssx4eKYpKskMk0TEJmEgqZTENWUJiId9v4DklVVXlM0m1GllgmFlGkGBMLy0JIShQKVYVMpDBWFYkJGWoT+ZD5ZePp5ncanL9hPOJox9Guzq7OY51dnV3tB9ovjk0eP3r8i+kvLo9ebm87JA2NTlybctzQsZfe2TVsSc+IYwrJygg9spakqZJiVVI4Lq77pNe7WsuVho9kZQuagygKMZvslKYn/kzavjIJDTTmoUH7U/3skHfoQqOfuo6GMHdfR+bI+KXtIDTXbs0QA0j7jjPNoXFzGvPwk8+vYJKbYTlBGpNlWZEVJVY2G0KTkEVRZRjJ0WZESS4M87GyvIRmdPxa+4H2xobGPbv3NDe3+mxYf0//Vw++GrswJp2T+s72nRJPXRi6YBaakydOjo+O7+R3nh++5FbJmVNnyHjTLfnW1ctXz5w6Q+KUeEo8LpKo3lqdsTEsJyqKonytimNKjBUKi9h/KKlmOIF0lygpkbhQWOR65fDopQgrRVg5xikMr/xXvOFA14T+VrhMfL5y6O06X0Kzb59hLdLImCAcOHni5PEjxw8eOLi3fq/H5r7+NliKlVmKo9qHc3QaVlDkabUwwluWs61BGlOFHlUQVb5D4QSF5WU/9UTiMi+qoZgYYaRIlRpLqDFW9P/1kbGXQkUxluOJ05gn0yhMRB2TlGihR828IKmqKiQ54jFih8DEIrIYY2IRpSMUeqYgHCoIPVOwruLX4Xg4lvQSGpEPqQpvcRrjrEhQshASEkzG7hqbuH6042iyLtm0v4mM9nZ3dbcfaK+rrROaW04cPSFJF/330ssb+mKcJjRMai4wCXlaUb5W2KQcq5IiVVKEFX/BnvCu1nyZ0Q3D5Cn+sfqJj/XTR7MgNEsGcu59+km7d9iF5pqTIcz119E1f1/ahtDIU3c9wjJpxu405rdYlnWsxH7MxGlIqibGcDGGi5Wx0rQq9sihopi9Bjodt9ZynCyKaqxMcrQZsUcuWMbHYmKkiHPcnPSsd4fIU3eFJmHP7j3JumTfuaGMK5Po6e756sFXD+49uD9zf2ZqZur61NDg0FcPviJ3Kt28dvPY4WM7+Z07+Z0ff/ixWyVdnV3Tt6ZvXrspX5GvjF05f+58d1f3KfHUiaMnjnYcPXjgoNAkNO1v8m7Joa6LTJWgqqooyRwvRRi+IMzWHxlgOEEak6UxheOlSFwoXMbWHxnItpcicSnEyBFWYRJKjJPPjnyhvxUuE5//vfx+w40MHXW2/1B7x+5dtXrJlWtT/T39xGYa9jbsrd/rsbmfT5CKU6GxMCuzVBXVLp3w+Qmag00qkqwWFvGW5WxrECWVF1UuNfDEcJKfeiJxievQ9hhmpAir8DwvdnCyxJCvj77+s941ePcS3yHpk2kirEwm0yhMRGYL1aoYv6xAiRa6biuIqqoq0zIbj8myrKiq1CMysYiUDIWXFfK8oP91f9D+WYQNu9Uj8iFljFEkRumJcfEIz0Z4NsxXhUUuJCXDIh9SemJKT4yJRfz3+YXRibraOuI0PT3nBqSLybrkF9NfCE2C/156vvJATJsLbNgMmxp74jtSNlMlRVjp2ZcPeFdrv9gQMbHPoMk0qpTdUJV5dc1k/A45YYZN4CHn3scftXmHLjQL+3Uk+/vSNgvNDAmSUNJfkrBkaPSXljyNnqGxbE5CP+bUt6QS45RIXNJmz0yr8rQqTasmoXGoxGQzDu+S4KpksUMVOtRYTIrExEhUDEfEUEQIFQmFYV6zmagYLuIcN0/1rGv9Y1fk7u6e9tb2zs6uluaWA61tXafODA5d9NiERHdX94N7D0huhiRU+s726emZB/cezEzNXL18dbBv8OMPP3arpKuz65Z869rEtcujl0eHR8+fO39KPGWMZM3cn5maSdYl62rrPFqyrbaLqdIGm8joUsEy9v/5yQatMMqFirjCMFuwjAlFs+4lMvEiXCaGYkIoKoQiWg29F26Ey8QIK3928Ip3R/X0nmtvbd/J75y4douUNDY07q3fu7d+757de2p31dbuqvXYPOMnKE/NUHGqUCos7ClkZIaKO5+x3sHyijSmFoQ5y3K2NZBhJi6pzaGJxEU/9YQZiRPUgmVcYZgrjAihmMjzvKqqAke+Ps5krMGtl/QZMERoyJ9nmJFCZVKYkcSiEL+sgF9W4FEzL4iKqqbF16rYIzKxsCQroqSY/7ovXr3mUZXIh2QxwjIRKUFJiQKJL5SFkCxGlDGGi0dSNuO3w4cuXDrSceRc7zndaa5c/3xk9DL/GT9yacJ/L6WEJi03oyiW3AwJ8dmXD3hXa73UOI0c+cm9ZJlB6Yk/80yc7+khm6blhTJMCu6JP4NcTdAh5142QqOduo6GMHdfR+bI+KXtOinYMj3H8S4nxzyNx11O9mMOx+UYpzCcLEqK0GMK0WtSME3T3lOHWFYWBFUQVJ5XOU5hqxSWldm4zDASUyYRm4lEhHARl8PspEuX5RPHOg+1ddTV1tfW1jU1Nrc0t+yt33v8RFfGmYndXd33796fuj514+qNyfHJiUsT3V3dZOrMyRMnjx0+1tbS1tbSNtg3+EHiA7dKxOPi9cnr4xfHR4dHhwaHzp4+e+LoCXIT+EDfQH9P/9T1qbrausujlz/5+BPXLkqIqqrK04pI5v+GjY8sxgrytCLLiiDKTJUYcpka7GcO19WbdyZkY7np2HA4LseqMs94vSJ/Tnr19Jk+vdBjFnAObaPiVKgjFBJCFEO1DeYyO5jlFVFSC5ZxluVsa9DSM7zCcHKsSo6UCX7qCTMSy6sRVgnHlTAjhxiZYZhINEJRVIQRL07m2EtcUiQzYFRV5UgqRVZkRRXG1FCEIVNqwjHR8dYnPaxC8zX5H4tCbEboUbKa8i/yIbmHk0RO6uDEDlZMsjzHsExEkRi2zO+E4qs37wxKF450HBkdGeU/43v6zutOk0MvvbzhhPbgGS5tsEmUlHSbkcJxcSV7wrvatOuMNgqUtdDwkSzzJnyEisT1ISetcn9Cg9GnhwBy7iV2tHiH26Rgyx/FHH0dWSLjl3bWz6GxzwW25Gw8nkNjP+YQI4cZOValROJSqChmiZxvRmfjkpDUbCYSZYyIMbEyNmUzQjjs/ABA7xviu7rOHGo/tLd+7ycffyK0tLU0t1yauN7bL33y8ScZG9bd1Z3YkTDH8aPHSXKFiM7Vy1cvjVwa6Bv4YIf1YWJ6HD189Orlq8RmzvWeO3v67NGOo3pu5ua1m5Pjk7t37v7k408+THy4Y/sO5y7iBPVrVeyROV6KsWKhqSvsQpNDLznGv/7+bKRKqdk/4mflk11nGhsak8m9OZwAftpGMVRICFFl1IFzx3I7zZiELPSoBSHWspxtDVyHlpuJVcmRuBQuE/zUo6XBGClcJoViYigqFEb4wiK+IMwVhLmCZc4Pd8nYS5EYG4mxoiTrw7XhKBOJMdKYEiqKhRmJF1VeJDd1uz41jk+KiqrySYHnBeVrleMFLmEEL8pZ/XWTaTQklGlOGWNJzkYWQkxZxGclA+dHiM189OFHA0MXJ29MD49O1NXWPbj3oKe7J9teentnT4S1Cg2ZBRxJT8+EGfG3CYf63Z5Dw0fIWFN2QpO1zSgKHzFGmww5gdAsGci5t31bk3f4fA7NHH0dWSLjl7YhNBl+xNIlQ2N3GrLgWEnmY751d1Z+cpOJS3puJhJlKIoKhcPSmCLJSizOhouIzfDhsHM7Sc+6VX6o/dDIpStDFy9/8vEnlyautzS3jIxeOXmqZ8f2HTk09fDBw189+ErPzZDo7+n/YMcHbpsc6ThyZezK0ODQ+XPne8/0kttQ78/c1zM03V3dF4cvdnd1d3d1c5s5x0rsQqO/ZReaHHrJEv0Xb/PtkxFWiVYO+e+chn3799bv7TzZPTJ6Jate9dM2iqEohmrpPZL7aZaQeVGhQqxlOdsaWF5iOCnGipEyIRzjQ1HeZz0SXyjxhQKn/SvyhUJVoZgo5NkCoaqAjxfwbAHHFHDxAo6h/PdSOMJEYmyM4QytUZRwhAkVxchgsdIRIULj1jAiNI65GV6U+Q45VBTz30u60Gg20xORO0IsE5H5AiYW8VkJsZnqrdVDA8YZOHRhvK627v7M/Z7unqzOpbZTY8+/ecBiM2QCjZ6bibBiJC4++/IBoXPMu1rbtSYrock8/uNlH85bOwpNmgLBZ4IOOfe2bmkgYZmfqpfrQrNQX0fmyPilbQjN5WtakISS/pKEx5OCLX5DFiyb65HVMbtVkjEYRuITKhlpikSZUDjMxDlZVuRphWG5UJgPh/lQmA8vYx03Jz3rVnl7a/vwxYkzPQMff/Tx5WtTHYeO1NXW1Wyref/9DTk0taWp5cG9B4N9gySIkfR099Rsr3HbpONgx/D5Yf2GJvG4KDQJem5m4tIE+V2FkfMjRGgcK7ELDSkfHr9OhEbskbmkRG50yqGXLHGo+2akSgkzUm3bef+dM3pZbtzftLd+79newax61U/bqDJK6Duc8zl2+dpU5ccyFWKpEGtZzqqGcEwIxYSQbvbLOP/1SHyhKrECp//LCFWFqhjj2QK1I8LHC9RkmGMKFD4Uizj8NXn0UjgaC0eYcJRhWF7XGjKFXP/dA4+GpTI0Is8L8rRiydBwghwqivnvJSI0yjSvjLFKT0zuCMvJQpaJSHwBE4v4rKR/YPj9997vHxyx9uHIeF1t3e2bt7M9l/700dkIK5pzM/K0Ik8rZpsJM+JvdpzNWK3tWpON0FhnDjvaifOmPfFnXMTEJUOj7ws2E3zIubd5U1IPy5WdFOpCo5+6joYwp19HemT80jaEZmzyFgl9hEwvGZu8ZbmVyQOypnlbc2R1zG6VZAymTOI4hWXlwiKhMBQWOkShQxRFSeyRIpFIKMyHwnxoGR9exjhuTnrWrXJiMJ98/Eki8eHY5K0zPQOJmsT2bduPi6dzaOr+ffv125o+/vDjD3Z88MGOD2q212zftt1tk/MjY4faDyXrkvxnfGJHgtvMNe1vIo/pswe3mXOspPK9/bE4H45x4SgXjnL/7/PvnBuZJG+9/M6BWOWHEYYPR7lQhHv02coceskS+8Tp9/eND1yQc+ii7rP9Z3sHs9rET9uazxzOoTGLKkS+UJXYVDBqD6OKMVWMqR0RVYioybDChxQ+pCRCkbDDX1PGXgpHGE1rOEGU5BjLhyOM+XcP3DbkkqJbboYTZC4ph4pi2RxmSFF4RWYViZHFsJwMSXwBy0SYWGQeOtmtl04PTv66+lSEFR1HmojN/HrTqa6ByYzV2q41ZqHJXyJcbgB3fGiNfh83lOVhh5x7G97b4x260OinrqMhzMPX0ZiPL21DaC5duaEHURNzSVa/TEmxlHlbc2R1zG6VZIyDh67EysRIVIhEeC2KuDCJMBteRoIJLWPcarAcvjm6e87V7UnuqEkcO9GVcwtnN5J1SW4z5xZ5Vj54cTKHXlrwWMxtm60QE4UcU8CWFbBlBWyMYmIUE6WYKBWLULEIFSuiYkVUJKxFzr2kaU2ECUdi4SLm0pUb+u8euG3C8aJ9SpwlsjjMJMsnGK4qxsVjLBNhyyJMLMLEIvPWz2691DUwEf+w+zu/bg3HxQgrapNm4mKYEb/zcmt8e3fXuQk/1S70pQ0sRci59+6fd5OwDDnp5brQWE5d+x9Fnl9HRGjy/FM1hObixHWPyMpmWJZ1qyerY/ZuEgKBmLcIRxjzS54pWPAmLZJoOHFh7Yfd0d8f+87Lrd95uTX6+2Nrt3c3HLvgv4aFvrSBpQg59955m9dDtxniK6RQF5p5+FNSVTXPGgyhuTAuIxAIBGKeY6EvbWApQs69P67/xBy6zeglutAs+J+JnzCEZnjsKgKBQCDmORb60gaWIuTc+8PvPrSEqqrml7rQLPifiZ8whGZkVB68MDE0OolAIBAIBOKhj3W/2eEdxpOCb95Z/IZgmhR8aWpkVD5/8QoCgUAgEIiHOAYvTOyqPfTW2m1uUVm+te3AaV1oiNMseLO9I01oLl2aWrduGwKBQCAQiIc4dtUeqizf6hEWmyGx4M32DqpzYAKBcAz7sCsPAAAALEogNEsi/DwR0cwrr7zS6SI0rwAAAACLDwjNkghVVW/6hlhLp7vQzP6EewAAACA/iNA0vf7TF77vHK+t79Auivs2vfb9n762ftP69BXW1yz01dorOhJR0yEs2SBC4/OcgNAAAAAIHPYMTdPrLyX2pRfWxF/4/k9f+H68qXNgonP3+uim06m3Tq9/yZfQ1MRfMG010bl7/fdfSuxLF6nXd5s3Ob3+pdQezSWpldNqm7U4vf4lSzMekphPoVnAAVQAAABLFl9C0zkw0dmRiOYhNCmD0V7WxIk3NL2up086ElFzsqcjEX3ptfTkyun1L+kvm163CtCsxJIQGvLbc1axNRXyeQvNwg2hAgAAWKL4ERpzaiTnISeTuww0va5tZSrcvd6cjyEZnX2bXkuXJ8NvtJRPRyL60/Wvx1PN6EhErfkefV8TnbtTLTcO0EgRRTc1GYeZlhl6GMIuNGansZTMitBkOw0ZAAAAyAe/GZp9m17L8zJvjDoZ7mIecjInY1Kik5a2sWRo9BVS7mKeLmMsp4SmIxFNHVfKk+xpniWRobEYjN1v5lpoyO70BQvzdOIDAAB4uPApNE2v//SF77/02uubTmvzaX7qMp3FyJHYpuKmRp1S400TtiEnbdkkT2bDSJtDY5IYUwImPceTGtVaX6PNaDY1O95kGQVbUkJj9hj7CNTcCY1FZTwKzW+5Ya8WAADAksWX0Ozb9Fo0vj76UmK92UUcp9p4BdEX0xhQ2jiULhNp4mIaIUobcjL5k2+hsWSYlrbQOOZm5lRoPLTDLT3j6D2OVcFpAABgieNvDk08sS81Kdia6shmcm5N/IXoS2axcMrQ7F6fPi9HHxjKJDQZh5yM+TqJ1FuGn63fdHpJCc08Z2g8fMVn6sVbaNwKAQAALBGyv8vJezXv2L0+XYAcbtu23uBtJFcyCc2AadqvwwRkk4rpB2IMkKWv81BPClYWYg6NXUfWrVunF1IU9ZOf/ES1SYmb8UBoAAAAWKA69cfMuAW5uhOhMd1GZBsSWpxhHuFauqEu9F1OdlPRhQYZGgAAAPnzsP/0gcNEmaUY6rw/h8Z6nrkLjZopQ+O97LYLAAAAS4qHV2i0ZBJ+92Cic96fFDy7GZqMqznuAgAAwJLi4RUahCnURSw0KjI0AAAA8gZCsyRCVdWsfhFjzJWJpgAAF55JREFUrm/bdhQatwyN97JbCQAAgCUFhGZJRA4/itE5xw/WW7duXeaz05/QwGYAAABAaBCuMetCo51zFNXa2ppxfozHuBIMBgAAgAXr3S4AeIAfpwQAALA4oS5dmpqtGBvzH597x/j4rMXly3rczjMmJnKIace4cmXWYnLSHndyi6tX0wJCAwAAICikCc34lc8nZMTDH/0Dl48cHjzQ2uMW585dgdAAAAAIEFSAbEZtWJ5/LPhRLJLoH7jcIpxxiyOHB8+du5Kz0NwEAAAA5hdDaK5cv73IQ21Yrp7fmlc0LF/wo1g80dx02jtyE5qFdnQAAABLkaAJzcCmvAJCY4rG/V3ekZvQAAAAAPNP0ISm/928AkJjioZ9onfYTxcIDQAAgMWJITSTN6ZnPfp7+vt7+nvP9HZ3dZ88cfLE0RPHDh87fOhwW0tbc2NzY0OjHsm6pGMNN27d1pfVhuVq79t5RcPyuTjMgEayvtM77KcLEZqsHjoMAAAAzANeQsMlFT3YpMLyCpNQmIQc4+RYlRxh5XBcDsflMCN7CM3F4Yt6jJwfGRoYGuwfPNd7rvdM7+mTp0+fPH3yxMnOY50eQqOqqiE0Z1n1LPt/Tq8Tkpw57na+Td7KEBAaU9TtOe4dHkKTw6OHAQAAgLnDEJqrN+9YgksqvKiS4DpUrkPlBJVNqmxSZXiF4RUmocQSSqhMsm9LwjFDc6j9kGOGxrEGIjRkWW1Yrnb/Vu3+rZDklGlBVQRVERRFUGRO4LlLB39H3vWKhuVuTV2CUbv7qHd4C01eiUE85xcAAMCskkFo0tMzcoyTI3puhtEiFPMSmgf3Hpjj/t379+/evzd9b2ZqZmZqZur61NT1qa8efJXYkfAlNKcq1VOVAs9Zguc5PsHxCdYSF/evIZtoAaExxa6dh70DQgMAACAoGEJz7daMJfgOSZ6WGU6wb6Z8rSqKKiuqNK2GimL2bUkQoek81nn44OHmxub6PfX3794fHhzu6uw6cujIobZDrc2tn33y2e2btxM7Eo41EKEhy2rDcvXkavXkaoHnVEU0haAqgjrNq9OcKnPqGKtKjNLDKGKMZWJkEy0alrs1dQkG/9kh74DQAAAACAqZhEbWhEapYhQ2psQjSllY+VpVysJKWVieVqUxOaPQWHIzZ0+f1V/ev3t/x/YdN6/d9Cs0nW+onW/wmtBoQ06qklIZmVUlRpFiihhROiJSopBlYmQTLSA0pvj0k3bvgNBkhf6bmgvdEAAAWIoYQiNP3bWEJjRV6Rmar1Xla1VWVHlalWRVkuRQUcy+LQlHoTly6Ej9nvoPdnxAYvOmzROXJhI7Eo41EKEhy2rDcvX4K+rxV/gE65CYkVl1jFGkmNITUzoicjIkcgVMLEI20aJhuVtTl2B8/FGbdyy40FAUq4fHCpkqMX6a2+1nuu2/4J3tb3pbtvW5FQAAgNnCLDQzluAFSRqTmSpeVVVBEPmkyPGi8rXKcgJTJTBVgjSmij1EaKzbktCFRreZu5/fnZmauX3zNpk9c/PaTfmKPDo8mtiRcKwhJTQz8tSMRWhSuRnebjOKEJaTIbGqIBaxC41zU5dgLHKhMZuKh7VkFBrVZBje+7W/61u8ctwQAADAbOE1KZgXRFGSGZbX19amzpDcjKyIY4ogyqGimPekYPMcmpmpGfscmqHBIb+Tgo/+p3r0P3mONdIzhs0wSk9MESOKEFaSIZkvFNiCSDhMNtECk4JNkdjR4h2LR2jyXA1CAwAADz1ez6HhBVHskWMsr6oqSc+wCUGeVrWZNGVhUdKExuM5NPY7m+xzaAb7BhM7Er6eQ3PkV+qRX/Ecq0zrg03pNtNBbCYkJwoFtiC8LEQ20QLPoTHF9m1N3rGwQqPaRpT0l+Zy7zGp1DqUfQjJPqLkx0scx6EgNAAAsOAYQmP/QWY+KQqiHIvzKsnNmKbOiGOKKCmCpPAdcqgo5vqTzj399sEm+xyas6fPJnYkHGsgQmP82nbHL9WOX3JVRGhcbCYZkhOFElfAxwtDzxSSTbTAr22bYuuWBhJ0Onr5gguNdo46jT15LDjVYM3QOOZsMnqJW6YHQgMAAAuOITSXr1mDT4p8hxyLc2RoSRBlvsMhQkUx+7YkSIbm5rWbN6/dnByfnLg0MTo8Ojo8OjQ4NNhnPC+4q7MrsSPhWAMRGrKsNixXD/1CPfQLropRZF6RGLkjIgshORmS+EIxUShyhQJLooCPF3JMYWFhAdlEi4blbk1dgrF5U1IPy2lBCheJ0Kj+PCZboXHM2bht6FaPzw0BAADMNYbQjE3esgSXFENFMT9h35ZEf09/YkfCZzjWQISGLKsNy9X2ErW9hKti2DjDMLFYLBKJhMPLQqFnCgsLCwoLHIJsokXDcremLsHY8N4e71hYock2MZNbhsZxNbcSCA0AACxaDKG5dOXGIgwiNGRZbViutr2QVzQsX/AjWjzx7p93k7AMOenlCy40jvNjLOUZ59C43bZtztBQ6TiW2Guw7MVxGQAAwPxgCM3FieuLM1RV1RYalqutkbyiYfmCH87iiXfe5vXQbYacFqRwYYUmcOgmtNANAQCApYghNBfG5UUeasNyteUneUXD8gU/isUTf1z/iTl0m9FLIDQAAACCgiE0w2NXF3moDcvV5ufzioblC34Uiyf+8LsPLaGqqvklhAYAAEBQMIRmZFQevDAxNDq5aENtWJ5/LPhRLJ5Y95sd3gGhAQAAEBRMk4IvTY2MyucvXkE89DF4YWJX7aG31m5zi8ryrfv2noDQAAAACAppQnPp0tS6ddsQD33sqj1UWb7VI/btPXH16h0IDQAAgKBA5XNZAksNCA0AAIDFCfUfALgAoQEAABAUKB4AJ1RVhdAAAAAIChS5OAFg5ubNmyqEBgAAQHDQhGZu9+HytHiwaIHQAAAACBZzLjQURVEqRalwmiABoQEAABAsZkdoPHIw9p/3A7lBUdSGDRsydrXby6yA0AAAAAgWsyc0NneByrjh9pPObr/wrG/lR2gIra2tGSt0bBIBQgMAACBYOAjNG+641pK6HlJpvzlMqZlGmszXWj/XdUuJ/wu2N/MpXm778m6Ddy9ZVtBtxq3ajIUQGgAAAMHCWWgcV/UWGtUlQ6O/67Gt/dLrdj32UJz5lBLHBuS5sh+hsciK9+befei4L70cQgMAACBYzLbQOGmNSnk5TQ5C46g4D7HQ2LvUTUf0MSlHMu5rUQkNRbHm8LOyn6py2BwAAMDiZ9aExnzZ1AeeVN9C4yYulsJ169ZlXJMsl5WVeVTr2AD/hZZ9ufmB28Fm9RZly8pQ6ThuUl9fr7/rdiAebVgMQqOqqi4ZfmzDQ1YyruNzFwAAABYtrkJjv2qScvu/WkWma6QoiuQly7Kq51Vc9RQay7aUu9C41WkvdNzE594dN/c+OseGZfuWW0u8V7B/ghn3pZcvKqHxqRp+hCaHzQEAAASCWcjQkKsgkZi0wtRbRGu8GuFbaOxXaLere1lZmeNeHDdx3LufHXmUexxptm+pPoRGTT/AhyZDYx4Mchs5yjgsZXlXf+lYuZ+GAQAAWGzkKzREZfRlApEbURT14SfKU2s8rriWC/m6devshXMkNBkb6V3uyCwKjRn7mo74P5bFIzT6v+YS7wXv2vKvBwAAwCIkX6FhWdZ8dRRFUR9vMvaRyWkcL7eWyzBZNguN99Xa8ZrtXe64pp+a3ar1c7AZy+3vZtwXRVH19fVuK3sfBVleVELjWJKbiPjZHEIDAABBZBaeQ8OyrKPWaDugKIqiyDpzeiT54F9H5m53+QuN4zo+D82y2mITmnxEJNvEDIQGAACCyKz9lpNdaxa/yrjlKuZ/725YVrYvO65g30W2bVsMQmO/bdu+bF/Tux6PcsyhAQCAQDPLP05p1prFrDLAm8UgNAAAAIB/5vzXtkEQgdAAAAAIFnMlNB5P4QOLHwgNAACAYIEMDXAAQgMAACBYLIoMDZvOrDcGmHGcO2wpgdAAAAAIFgufobEbDJxmTqHcH0uj3xIFoQEAABAsZlNosn2AjZpyF5ZlVZUy/WvN2dgVR7/02m9vnpVj8UlW90W73ZI9Fzv12Jd3d0FoAAAABJFZFpqsylUjGUPZncZpNQM3oZlP/IzduK2Qf5v912DuKLPi2HMzOhAaAAAAwWJRCI3NZqz/PmRCMysNzlZoHF+6LUNoAAAABIuFFBr7uJIjjjkbR6FxlBt7TsK+puPLbNexb2LHcROPyt32rmYSGjdTsb/lCIQGAABAsJh9obFcGvVy+78ZJ/+Shw67ZWgs/5rL7S89pMdxHcfdee/LscSj2d4lGRuW7b68j85SCKEBAAAQLBY4Q6OqqiiKqkq5/TtbQuOnxCMjMrtC413oJhxuTfLeV0Z5cjQeCA0AAIBgsSjm0Hg4jZ6ksbZ7joXG7a3ZEhrLQg7V+nECx97wyNDoCxAaAAAAwWJRCI1HhkYURf9CY09jWAodV1BNF3LLJt45G4/dOR4slY7qZBJuB+J4FB77sneOpdzeWnP9EBoAAADBYoGfQ6P6cBo8Zy83zKbiWG4usdgPhAYAAECwWBRPCvZxoxPIDksaRl+wp2TsGRoVQgMAACBoLIrfcgKLDQgNAACAYLHwGRqwCIHQAAAACBaLLkOD1M5iAEIDAAAgWAQ7Q4NpN3MEhAYAAECwCHaGxk1cyNNrcmsAUCE0AAAAgkYgMzSUJ2pKdBb/VXP+W+hzjxAaAAAAwSKQGRr7E1YsC97PnbO86/14umzxX5X99un5aY+fyiE0AAAAgsXDmaEhkKcM27e1L+d8fbVs6N9FHHc9b+3JWD+EBgAAQLB4ODM0hIxC413oh9zyH2omd5nr9kBoAAAAPGQsuQyN6pS3sG/rsVrGrXwewgK2B0IDAADgIWORZmi8/80nQ6PjPdbjcxf5Z2gWpD0QGgAAAA8ZSzFDY67HY8FSoeMuZlFo5rM9EBoAAAAPGYs0Q+NNPhmabBMhjht6FGYrNAvSHggNAACAh4wll6HxSHXoy/Zyt5KMm3gfxYK0x0/zIDQAAACCRSAzNDreP3GQcchpwZn/5vncI4QGAABAsAhkhkaHZVnRE1w4cwNCAwAAIFgEPkPjNvCU1egPsAChAQAAECyCnaEBcwSEBgAAQLAIdoYGzBEQGgAAAMEi2Bka1p2FblqwgdAAAAAIFsHO0LiJC5lbk1sDgAqhAQAAEDQCmaHJOAuYiM7iv2ritm0AAABgVghkhsb84DjHBe+7nCzvzuLNUFndWmV//N38tMdP5RAaAAAAweLhzNAQcvjpgxxaknHZe8MFaU/G+iE0AAAAgsXDmaEhZBQa70I/zK7QzFt7IDQAAAAeMpZchkbf3LFCP6t5b6X60xF7PfPZHggNAACAh4xFmqHx/jefDI2O91iPz13kZjMZN5zr9kBoAAAAPGQsxQyNuR6PBUuFjruwp0z8H8ICtgdCAwAA4CFjkWZovMknQ5NtIsRxQ+/a/OCdX5nr9kBoAAAAPGQsuQyNR6pDX7aXu5WYN3FrhsdRLEh7/LQNQgMAACBYBDJDo+P9EwcZh5wWnPlvns89QmgAAAAEi0BmaHRYlhU9wYUzNyA0AAAAgkXgMzRUJnJrxhIHQgMAACBYBDtDA+YICA0AAIBgEewMDZgjIDQAAACCRbAzNKw7C920YAOhAQAAECyCnaFxExcytya3BgAVQgMAACBoBDJDk3EWMBGdxX/VxG3bAAAAwKwQyAyN+VlzjgvedzlZ3p3Fm6GyurXK3Ob5bI+fyiE0AAAAgsXDmaEh5PDTBzm0JOOy94YL0p6M9UNoAAAABIuHM0NDyCg03oV+cNswN6GZt/ZAaAAAADxkLLkMjb65Y4V+Vst2K7dDWMD2QGgAAAA8ZCzSDI33v/lkaHS8x3p87iL/DM2CtAdCAwAA4CFjKWZozPV4LFgqdNzFLArNfLYHQgMAAOAhY5FmaLzJJ0OTbSLEcUPv2txW9j6E+WwPhAYAAMBDxpLL0HikOvRle7lbScZNvI9iQdrjp3kQGgAAAMEikBkaHe+fOMg45LTgzH/zfO4RQgMAACBYBDJDo8OyrOgJLpy5AaEBAAAQLAKfoXEbeMpq9AdYgNAAAAAIFsHO0IA5AkIDAAAgWAQ4Q4OszNwBoQEAABAsApyhcbsowmnyB0IDAAAgWAQ7Q+NRjktmPkBoAAAABIuHNkODPE0+QGgAAAAEi+BlaFiWpViK3N+kqqq2zGZ4bK650GI8burjfdE154H8X54dH3OXw9V9rnUNQgMAACBYBC9DQ9xF9xj9X4c13TXFIiK5KYW9Hv8bZmxnDvXMIhAaAAAAwSJ4GRrVyWmcV3O/atrTJFk2E0IDoQEAALCICF6GhuCYp7Guk43QWAZx3MaGzOWOM3XsK9gLLdtmrMexxGPb/IHQAAAACBaLNEPj/a/ZYDzyNDlkaOzG4FGbPT1jr8fRS/xs5XNhjswAQgMAACBYBC9DY8/KZDWHxvEtP0KjuudIPOpxq2RWhGYucjMECA0AAIBgsegyNBmxzAX2cJpZFxrHlXMQmjlamEUgNAAAAIJF8DI0OuSimMMcGktuwz6dxb6OucR70Met5qz2ZanHu+a5yNNAaAAAAASL4GVodDJeFHHVzBkIDQAAgGAR+AxNPisANyA0AAAAgkWwMzQZmes2PKxAaAAAAASLAGdowNwBoQEAABAsApyhAXMHhAYAAECwQIYGOAChAQAAECwWRYaGTcf/hpY7olWnm6g9XgI3IDQAAACCxcJnaOwG499pLM9xcXtUjGV9kBEIDQAAgGAxm0LzhjtumxB3YVlWVSnTv9acjZ/f0/bO0OAGqKyA0AAAAAgWsyw0WZWrRjKGsjuN02oGFjVxS89Y3MUtcwMsQGgAAAAEi0UhNDabsf6bMUPjaC2qZ8LG1yEtVSA0AAAAgsVCCo19XMkRx5yN6vLbRm4pGctLXFC9gdAAAAAIFrMvNHa3IOX2fzNO/mVZlqJcMzSWISdzuWXZadIwptF4AaEBAAAQLBY4Q6OqqiiKqkq5/esmNBaPyTZDA7yB0AAAAAgWi2IOjYfT6Eka59Zn8hXLsJTjOsAOhAYAAECwWBRC45GhEUUxo9C4DSc5ZmtwKfUDhAYAAECwWODn0Kg+nMZjqo1/X/EYhwJ2IDQAAACCxaJ4UrCPG52cccvEZDUUBexAaAAAAASLhRcasAiB0AAAAAgWEBrgAIQGAABAsFh0QpPVz3RnRT4XYP/MUePnGQgNAACAYLHohCZnMk77zecC7J95POI5BEIDAAAgWCw6ocktQ0NRFJnpqy1TDk5juaBals0lGV96MAtdsAiA0AAAAAgWi05ockC3mbSbnmxOYxcUxwfYOBoMhIYAoQEAALA4WXRCk0OGJqUy1gxNRqExL7sZjJvx2OshzFpHLCgQGgAAAMFi0QlNtlhsRi90y9BY1MQtPWNxF8fMjd1vIDQQGgAAAAvCohOarDI0+nXRyM24PzLYckF1FBTHZbf17S8VCI0/IDQAAABml0UnNH5wUxa3QoL5auo2ouRmKhAaAoQGAADA4mTRCQ3J0Hj8axlO0l1EzfRzTuarqXnIydFOHAekMnoPhAZCAwAAYEFYdEKTEU1fKP2+JuNf8zr2DS2mYpEbnxka+4XZUjKPPTGHQGgAAAAEi0AKjfkmJrvTmHM2ZjxExO4llmEpx3UcCxegR+YACA0AAIBgETyhUW03MVlGnSjTv+at7CLiNpzkmK1xkx5L+QJ0xxwAoQEAABAsAik0qufkXzensQuNt6+4renNvBz9nAOhAQAAECyCKjTeOI462TXFnonJaijKkYU65NkFQgMAACBYPJxC40g+F2D/LPRRzg4QGgAAAMECQjPLLPRRzg4QGgAAAMFiCQkN8A+EBgAAQLCA0AAHIDQAAACCBYQGOAChAQAAECwgNMABCA0AAIBgAaEBDkBoAAAABAsIDXAAQgMAACBYQGiAAxAaAAAAwQJCAxyA0AAAAAgWEBrgAIQGAABAsIDQAAcgNAAAAIIFhAY4AKEBAAAQLCA0wAEIDQAAgGABoQEOQGgAAAAEi/8LNb1TUscyOEYAAAAASUVORK5CYII=" alt="" />
4.Visual Basic 编辑器包含下列代码。
- Sub Hello()
- MsgBox ("Hello, world!")
- End Sub
5. 然后点击上面的运行按钮,运行结果
aaarticlea/png;base64,iVBORw0KGgoAAAANSUhEUgAAAJAAAACgCAIAAABsXnJCAAAKVklEQVR4nO2a/W9T1xnHz2/+B64qpN6g5IpErrTfYkTSCGZyJ22xC7gYHFhVwouxFCTiGAi4VUc2ojRqw1sUXOKkAY/QZCwI4S0pSRygCDOc0gFJ2CpSsrwZCFW7WtAKaWLKfrhv515fm9TE4Gd+PvoqPTl+zovvh3OcFMgchQnJMFiWXbRoEe2IyKpKS0v7+/tnZmbmkIzh2bNn3zz67nXewrz2mtBD5ubmTCbTkSNHotFoS89tTAZmJPb0zD8nBWdk7N54aWlpNBr19wxjMjZX/v0Tu+6dsXvjxGQyzczMtH4+gsnw/PnRTyzLEpPJ9PTp07YLo5iUE+gcfHf5Kp7hFjbvLl8V6ByUV+l8+KPJZCImk2lubq697w4m5awpWDrQ2vbj6FcLm4HWtjUFS+VV/viAEnai/w4m5fAM92T4y0dnPl3YPBn+kmc4eZVP71PCTl+6+7NzYufrZMnaEz9/YIrpXZtLCCHLal/Ock3LyG92zq+YZ7jHNyMPO/2zXf7ZLv9spxih56HQkNqzqrSKozpblYFS4/HNCM9w8ioNk5Swzy6PqfO5PZcQssR+UtPftIwQkrvzo8tjn53cyeoUpCsfbV5CzE1Ja4Q9y5RVvdCKTcvmPQPPcLEb4QenfEo6fA86xPbx9z+wO1xCjr//gW5PfO6f8sVuhHmGk1ep+xclrOuLe+pcWJdL2Nx8dvMFur9xcz4hhORWNWrr0x63mUibubAulxT9Pr4mUX9qaS4iZe75FfMM90PkSvTE0Wj70Wj70RmpIcTucMm/CNsdrk/2vafpmWk/OkPVR08cFab6IXKFZzh5ld+NU8L+dGVcnb51uaRoi5sllmpVZ/66LRaS6z6orU97qs2E3dKn7O0P8TWJ+lNLc5HqvScLz3Dfhy9OtzRO+Run/I1TLQelRuOUv9FXs8/ucP1XQtP21eyb9jdO+RuFr1P+xin/QaH9ffgiz3DyKu/do4SduTquTt/6PFJ0YNyzkrBb+8TOAxaS5z4kfL06fuaUmyUWj1jfXCTdROzWPml4cxEhYjFVQJRR44e25sd16lR6VhIdxJm1e6bfyKGt+apJVjbr7TZRj7LP5BGETfgaJo41TPgaJn0NEz6lMXms4dieGrvD9R81dofr2J4aseyYMmpCGiUIk1fZ/c0TRVh3eEKdAUceKa6b6K6zEGLZpenJqz4cnujuqM4RX/IVE5KzdUAzXBoYVyDPqcwgJ0FleGLXSrlf2onenhVW+rrpgfK2dXbrKyb5jg71Gw/7irV7Sxie4e62Hu7jf5EkB1ZZ7Q7XIwm7w3VglTX5kLuth3mGk1epGqOEnb02qU7IkUeK68RGzrbQ2Toryas+cm1SaZyuziHW3XSPzvDJszoF8qu+YkIIyXecfm7l5O5SkrMtpDN5okWVqFeJ322dVXN0c7aFzl7zFQvvbh4RhIXKCgcshSGL+DVkKQxZTKEyU8hSWPf2arvDNa3G7nDVvb06VGYKlRUOlBUOlBWGLKaQxRQqKxQiCJNXqbxLCTt3fUqdUHkeebN+6tz1qXP1VpLnKS8lOc6Q/G3T9alznZ4cYt1D9+gO1ykIlecVlHeqigkpKO9MVrlH3oBm8kSLKvnkTSLNr7tbnf0Lo6x7tJ364RlurL3psn1FXJZftq+oX2+3O1z3JDTt+vV2vYErLttXjLU38Qwnr+L8mhJ2PjKtzuCGPFJSL7SPlxBCiLVGeKneSvI8zZHp812eHLHzeAlRijc4B9XDxYIc5+D5uBk21GuWS1AZma7h5X7N5Lp7ViIMbHYWSFPF75buma7h5TclveXnhWe48Y6W8CbL1U3Wq5us4QpLeJMSu8P1tYTd4Wr47UZNT1geUmEJV1jCm6zCwPGOFp7h5FUq/kEJCw5F1bm0kSMlH4rfNm8vIHyL+NKHbxFuV/NQNNi1azF5a6/Q2bVrsXidCD2q4cGhaHCopUS5cqRRQ9G9vNQnz5+4cvH2S8p+CBG3od4zRcHGruheXi67tJGTVtHulu6Rt91SQq2ePDzDTXYHhnaUD+3YIKVc+rb844oK+beujysqhnZsiOspp4aUD1WK80x2B3iGk1d5hxb2lxv3MSmHZ7hoT/fNGucCZbvQiPZ08wwnr+K481gR9tevHmBSDs9wsxd7R2rdI/vdo7Xu0f3uETm1VSO17pFa98j+qlGxXTVSWzWyX2rvFyOPkhuzF3t5hpNXWTtKCev5+wNMyrG9UTTY2vbd375Y2Ay2ttneKJJXWT1CCeu9+RCTctpO9q4pWLrgfx+2pmBp28leeRXLMPUZduHWLCbD8+vb1Anru/0Ik+H51S1KWP/wt5gMT6kgjBAiCEvfP65DXpz+4W9/efOx+KviHArLeFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFAYMFIW5mGJwRycZyXrUTVeDgmWm//GMxIUBgwUBgwUBowXE2ZmxZHKk/FIXfJj0RWmlBG9x0o9VQ8rVyi9usODZgNhPR5WXDvRciRrhUnPKmg2iM+A/tMrPL45PWEeln5olBEZefCchzUYDOrZEw0Pmg20P9VyKnXZKox2Iz9JEvdHOU6Y9lJS7MT3eViDOehhDeYgvYr+cM08CZbL6isxXpjOs5iPsPhhQielymM2xB9j1XAUlgw9YdrLJ/4mTHAl6j3BoNlgMChnR74YEw9PIEy1q6DZgFcifUSEzxHVDwOp/NAhTyW+pnxMJhmeSJj6JyFzlp4w5NWAwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoCBwoChIyyGZDAoDBgoDBgoDBgoDBgoDBgoDBgoDBgoDBgoDBgoDBgoDBgZJ8yJOJ1OpzPR88lEYa/if4JnEJWVlfCEzWQrgUAAqrBXu41XBXhhhJCs+gpbmPAesgrYwrIKPGEggS0sq8ATNl8CNmILJHk94jUmL1jQzYAWlg4iXiORsAVisYCNUIhi6CIdjN7Iwm8MT1gSIl6jLUD9NxZTH7SI15hYSsCWFmHi5KCFpYuI1+aNxGIBm9FmiztKabSRFDxhCZFvQVtAOkrUkTN6I8+5EdMpFbawtBCwCZ9VAZsgbB4y6JszbeAJ0yXiNdpsNlqYzglTSgOaVtqBLSxNBGzzOWGUO01Vei5EPGEJUYR5JSnxJ0y6OWMxPGFJeTknTDwqRkmPVljARozeSMAmHCf8DEvCSzthqoMT8RptXuHik25LpViHtPmDLSyrwBMGEtjCsgo8YSCBLSyr+P85YdnzNQZdWBYCVVggi4EnrDLrASYMcQIShiQHhQEDhQEDhQEDhQEDhQEDhQEDhQEDhQEDhQEDhQEDhQEDhQFDRxgmw2O8FRWFGW9FMSBCEHD8D8N/5FrVnhqiAAAAAElFTkSuQmCC" alt="" />
注意:如果当您打开一个包含宏的工作簿时,在功能区和工作表之间出现“安全警告: 宏已被禁用”条,则可单击“启用内容”按钮来启用宏。
此外,作为一种安全措施,您不能以默认的 Excel 文件格式 (.xlsx) 保存宏;而必须将宏保存在具有一个特殊扩展名 .xlsm 的文件中。
三. 语法说明
3.1 数据类型
VBA共有12种数据类型,具体见下表,此外用户还可以根据以下类型用Type自定义数据类型。
aaarticlea/png;base64,iVBORw0KGgoAAAANSUhEUgAAAjkAAAEgCAIAAADZuPX0AAAdV0lEQVR4nO3dXbKjOrOE4W9Oa/5j41zsEw5aUpZSEpSxeJ+LDhsL0LILJfIP/b/jOI7j+B8AAM/z/yH1yaoDqFAYUKgNJCCrYKEwoFAbSEBWwUJhQKE2kGA4q/7+/rpL1MKuubVWVoTJH4+uehHN7QztzqxeDDFrw3mqeYGguFn1qZjghmpfa7YMbje30+0DLhSPR3e8iBMl5LQslgeNYbrwPKZuwIuC/wzMq84jSzAeFQud4qsbm9skq9L4E+6rXkT/NTWLLShd6mdFcILrGGqJ1xqYV6nSCcru6CXTUIH+kVXfsz4efdo7N5rrdsXFViz8m41GFLpvxgS6rwKvC/4z9nmVM/TUy4ORq2jfHETURs6boqDv5rzPc+2LOPGaOiNdUH6YQ1Yhwep7gE5W1QubWw621m1GQd/tW+8BxgnXPWUhqxKYJ7jNExTAtPTdiuA82s8q1SAYZTj5ynfJdysO+0Vsjmj+uY5apaheBtBLjH5nXY0DsYs6i181/B6gWlgPCp/lqvK6JTgxAuIm8edVwYpzL+K5SJr/NlfsjnGqq9TPiqGscp5qDnDU5r9bcX7oaI0X50fr22ov5nK1O9xk/XvJ/otYZ1JdY84e6935wQnf5b+9I6tQm5xXBeNIt+X5riPuCXJc9T3AYt1gj3UJrWSVX6UYdXlt1At5gTD23Qp/sCha+iNX8OjEaIirDF2b4JIXsS62P3Hec96paqOWxMvhYF6FBDPXWHIqqRg44hHEadDdI27lf2e9vu20V4/G+fS5bZ5FkVV3uDWrOBPFf2Z+X3XY7wE6WaXCzxnIkMYsjO7CosHQo92kmT4NopxWJMyrgLHvVhRLDhFa9Vs6zbd6nLGs3mZg8G/HgJXvAc69iM36iXfUXV63oXjWmXNu/3nm5UCN/xMEFgoDCrWBBGQVLBQGFGoDCcgqWCgMKNQGEpBVsFAYUKgNJGhkFQAAT1NmVX5g4vkoDCjUBhKQVbBQGFCoDSQgq2ChMKBQG0gwmVXdH+s1f3S5vtnLV4SJ8QjKVwaN5kNzvxbHT5ifVzlXKzj/Ut25xkRcmvUWzhs3u405ZBWUrwwa950NP3kweXLf7uZmVfNyOM38OMKrjtYF52xQbYSsStMdj3gJXit50GguVOU3NMIE27nc9I5ee6ANZFV3W6ragqqKC+7arAoK1PTaKjm8a9e++fl5s+RBo14S7EgNEUG2FXfNqm6mrx+Kqs0X0/Rprs+qeJXpcIpPi7rd8wMSTUFWnQcXnswXSh40ioXxXoKho06CYPzx/wpnrWLXzVWC7bzzKBv7vMp5vc+NuwvnKim4EfR84iF8kFVQkgeNYGHQLI6leqHTPn4oXh53zAzRV1n9znr3dVqv1OY2h1YM1iq6VN8uWhbrFs3qzXZ79Suc8SitM3iUzEFDPaSGl2Cbccfqg1pt5K8aOuo9NvsT7yh4xt55rC1lVfCUdcvxGCy7oIzinhTNnHWdUi6adUvw1znfrdjsT4Ypc9CoF8ZVN1ST3axSa8Vp1FxIVo265Tvr6sULbsdLgpb1mctoz/3kC1Ykq9Qrhe1lDhp+g/ND8Xmws00/YoPediOt2XKoMxu7/jvr8XM9l1XN/hh/XdutWXVsOsPg8yoomYNG/WjQJthId5vrWaWSqfm3Fy3jvb/zKLvxt8Dd5X4pO4393nZfeKfzapu7lhFZBSVz0AgW+vFjBo95UA9llb+joZR9gy9nVXetofKN+xOk2me5yr96eff2ZiXF76ugfDGr4nG8OZ6MBo9T1eqoV8eFGmGc3r72KPtmVo0+OtcyWVF/X+zJtbhuBZRvZVV3uQqDOIGeXMlP7tvdZrLKOYl2TiWctYp1Y92e53hafy7B9QChfGXQ6B5f3WTa7yDdG/8nCCwUBhRqAwnIKlgoDCjUBhKQVbBQGFCoDSQgq2ChMKBQG0jQyCoAAJ6mzKr8wMTzURhQqA0kIKtgoTCgUBtIQFbBQmFAoTaQYDKrnN/QrV8dhF/qPQfjERRqAwnm51X+78bjJfW1J5qXSMF3BYXxK9cTwU3IKiRws8q/ypHf8rPl7g183YUnMdgMWYUEA1nV3VbRpl6luZHprOLkPRNZBaVbG5QE1n0zq7qzru5Om/Mzv4fwkVVQnPeHM/uDLY19XtV9Q2/CynuAZFUasgoK8yokWP3OunpbL9bcgvmeodpRsUTdLjrAeZ9p/YNM7IqsQoKlrJqbyqjJ0FxW1beDbQZ3OZxiQz9m4Ml8FbIKCW78zrpq5kykzPPxOPa64ce5v4+sgkJWIcH131mvV+wucR7qtp/LqqHdvZmTVcFZCDZGViHBN+dVx/LPSP23+7ptOJxiQ+MRT+arkFVIkJpV3fgZquk41dSmisa8AWjqfkHUv4vN+Nc0yewVNvOFedVVjRO2g494PIqX8HLsjetWIMFMVg2dJcWfTjmcvcz1Db7RH4lzQv0eZBUS8H+CwEJhQKE2kICsgoXCgEJtIAFZBQuFAYXaQAKyChYKAwq1gQSNrAIA4GnKrMoPTDwfhQGF2kACsgoWCgMKtYEEZBUsFAYUagMJJrOq++vOS37+yW9In4PxCAq1gQRfzqrmVSo+65JVzxEUxrVXHsHPIauQwM2q0eshDbXs3sDX+eMRr9rbkFVIMDOvWp9UXZJV6yfvnPj7yCoocW1wlOESS1ml6q9Yru52Z11zmTeKo8hBVkGJ3x9u3gZGDWdVt/jqhd3pUffGdGccHEIOsgoKWYUEY1llfgRVrxVvUzVzsqq5d3+h2m939c/t+G/fxlUfZGI/V30hCwgMZNVnaC6W1LeLJWYazWVVsLvuwu7d7jaDP20zQ+PR9s8Gzi75kBuIDXwPsLgR3L5kFed8/KasUhOCemoV/C2bIaugDH1wAMy57PMqZ3bSvGs+5HfmwnlVczlZpbxnlomz7gcHaT3Bxm7Jqu7oX8+flInOZL4HGPyNm1n/0g12xXcrkOCCrAreGfOXxMtVY/PNOrVQbSFevV7LTNafNnTuHN/FZvxrmmT2CptZunatWXx+jVLNj2WeOzeX8LLujetWIMG9WRWfT6mZCudiD9T90k29nBfxJcgqJOD/BIGFwoBCbSABWQULhQGF2kACsgoWCgMKtYEEZBUsFAYUagMJGlkFAMDTlFmVH5h4PgoDCrWBBGQVLBQGFGoDCcgqWCgMKNQGEgxnlX9Jgu7lDLr4DelzMB5BoTaQwM2q4FJ4dcvujWCzcXt8C+MRFGoDCS6YV9WX0jlHzrl9M3uGsg3fwngEhdpAgoGsiidV54BR1/RrXiBuJauae8Ed4sJo3sZLxFnF4YlLjGXV+V81efo0djJJKVrG/MOAA2Za8ObwocsAb8B5DBIszas+y+uWRzV+qQRamVcNNRtqiQJZBYWsQoKxz6tUUDnzp2bjZvv6oVix92LmV/RcLW/+mUHL8916C/vpZtX2zwAU8/MqKgQr5t8DPERInBsHW6ibXZJVRU9ULgZ7b64b3H7JEThUGHgVJ6soDCwa+M56cUP5qxQbcSZSzelOsEd1t5tVdT9VVgV/0Rs4XxAlrt5p9MvDwIT5z6uCTDrC2UlQuHM1vZJVaoN+y6Gu/q7um8OH8fpiS05tAIvmr7EUR46aPMUzmzj/zJ7MZZXqcLzN9xyHZBUUvluBBPO/Be6GSnN5XK+j1Vz3Qd1WvarbqD+qWDiRqT+N8QjKxJeHgVFLWRU3q8+yu+fdT6hmRt4mrk0AhdpAgqXrAdaO1nQqCC1zm8k4DawxHkGhNpCA/xMEFgoDCrWBBGQVLBQGFGoDCcgqWCgMKNQGEpBVsFAYUKgNJGhkFQAAT1NmVX5g4vkoDCjUBhKQVbBQGFCoDSQgq2ChMKBQG0gwnFXNX8g6C4cuVzH6O1x+t3s3xiMo1AYSXJBVdSap61moFYMbwWbj9rgW4xEUagMJVrPKny01r5x0jpz6Ikxqg0624VqMR1Cc2uAIxaKlrFL1F0+qzgGjrv5XLzkWsqreFEbFhcFz+2ZkFRLMZ1V3RvX5V02ePo2dTFK6nTEbIBYUhnpl8RLOoEF5YNE1362o28QTo2JJMdipBJqeV5ndRoCsguLMuSkPLHKzKpjZqFhqBpUzf2o2bravH1JUg3p+9tl1vff6j3qPOKve+ZzgP93zmIOswrKM9wCPKqLiyZZaK1hlLqtUcK5M4HYVnMSc/33t8/NmZBUSXP/dCr8642lZvKkiWq7NqmDhaw85M6tS+4RniGujvg1MuOU763UIqUw6wpDoTt18i1n1+aOGdrqT7nj08ufnzbrvD5snlEDg+t8CO6ucH1JTlvqun39xH8wplFr4Tk5WFTfwEnxnHQkms8qcXX1uxKHSXB4X91DpB8FWLDnfbd5+7SHHuTMU8zvr1AZWzGSVmTfmifY5D4p1gxWT67452XoVrlsBhdpAgut/X1VPYpoOHW/N0DK3eZ+XnxsyHkGhNpCA/xMEFgoDCrWBBGQVLBQGFGoDCcgqWCgMKNQGEpBVsFAYUKgNJGhkFQAAT1NmVX5g4vkoDCjUBhKQVbBQGFCoDSQgq2ChMKBQG0gwnFX1j2HVZSycZhNtrl0RJsYjKNQGEszMq5wLDhVt/AtMBBtsXvkiXgtXYTyCQm0gwVhWOdc3OqeImWrmlZPqZCKr0kxMuPESoye4wIThrOrePvTFy5vzKpU3dXEvZlW3A6OaW9sVWQWFrEKCW7LKXPJZ3p1XdWdd3SMh7u2KlxyEZBUUpzYoDyy65T1AJ2bO7YsbzbvNlnNZda2XHIRkFRTnBJfywKK8eVV3m0Ge1S0ndtdcqxm0R+tMUHXM2ewGyCooQW34Z5NA7EGfV8UuicY4Aus2zgQu+HN2Oj7JKihkFRJc/x7g8e/s5AhH83ObYLNBQkxMYpz+1Hvp9qToz2ivHo7vJUNRtbHreRu+Yv66Far46nwy51VxhJh7d0xk1aE/Hx7q9u8iq6DE86otT92QLymrghXjecz5oZjf20v6M7T6BpwJd1pn8Ch8Zx0J3KzqRkUxWtUzkm6zc+Nuv0dLX+29WN69Ha9eLB/q4cORVVDM76xTIVhx/byqfvTPm3mcq7lb2cl1H+frG/AeIBRqAwlSs6o4veomU3NaEzB7Pufl54aMR1CoDSTg/wSBhcKAQm0gAVkFC4UBhdpAArIKFgoDCrWBBGQVLBQGFGoDCRpZBQDA05RZlR+YeD4KAwq1gQRkFSwUBhRqAwnIKlgoDCjUBhLclVX1b2adX9FO/9L2tT/RTcN4BIXaQAI3q5oXiQguG1FfPMm8wIR6VHUgXgtXYTyCQm0gweS8qoiKo4qNoEG9KfPKSXUykVVpGI+gUBtIcH1WHa3r/jkzsGBmplqaWWVO6eLVg81ObPPnxIVR1wPeI6iNxUMP+BjIqjqZgmlTkDT18u68Kn402Hi99+m4mnhoJ2QVlOCDg+AuMGRsXlUMSc2sMmOmuWK9r+aS4Ebcc7NxvLr/0E6GPsjEq5BVSLCUVc0l5+WOZsg1R70gmaazqp6fBbfjXqlt7oF5FRTnzRhqA4uGP69qnivVC9VAXw/iZhHHE6O5rFpc2L270/HJeASFz6uQYDWr1JJzhjmDe51nRdqpnZpHQmZWbXl8drNqpz8WQ3gPEAlW3wNUd4vB3ZlXDVX2aN1/ZV61Ez6vgkJWIcH1n1epJc7deCIVC//MfurckVU7HZzMq6CQVUgw85314Ebd+AhPvVUmdfs9VPdBpDWX171VnY+X+z18PrIKCp9XIcHk76uG7poPnQu6W9yUfjKuTQCF2kCCgesBBnfrhc3bxRlWN5ma05pA/8/FLMYjKNQGEvB/gsBCYUChNpCArIKFwoBCbSABWQULhQGF2kACsgoWCgMKtYEEjawCAOBpyqzKD0w8H4UBhdpAArIKFgoDCrWBBGQVLBQGFGoDCQayyv8pbnDRiiH8vPc5GI+grNcGRzq6xrIq2JB/0Yr6WkrF8vrCFvi6S05isKXprHKO9K/Ulb/xtPJe3NEGh+H1WaWqygkzdQNf549HvGpvs55Vx5PKhqB6ptR5ldnAzCrO3DORVVDMOXf9UHB3TnMv5sKJjk38Cc0npDuUdXfkr26+HA/0zaxqzsDOz2P36RudgT3/9XgssgqKqo14hL12uGwOwfGJcndk754K+y2be/wMg0EbZ0dq7G2uPt35r7srq5rBUy88Ws/jRFY5jc02aCKroExkVTcnjqn/XSHYhRkMzpLRlnd3KX5i1aNORj5K3vcAhxqoJUGDZpWrzgct0RSMR6MDCjbjnOCaI2ZzSXcVp9lVwWC2bB4Cd3fJX31isP261HlV3XiiaoOddrcZ3H3+S/Vd5ryqefhhb0OfV3WH5ubCnKwyOzO0MOhe3aU6RYZ2tJJqzz9mv/md9eCZLep7dKdqC6qNs6+XI6ugzH1e1Vyi7JFVx7/jUnO4S+sSWSVvO9U2+nwN7bR7FwEnq9TTjr2tZ5U/tsSNV7JqfbKyMnzd0aW42c8Nhl/+fVWzcbGiudNmP/2sev5L9V3drOLJfK1Lvgd4yQxAtZw4kQ2WT2fV6Em8uSNz9Jvb13PcMq/qPnrJiUkQaUHgFUvMUEScVdPDEDYw8fuqZkmYC52z3qIDzV45O1LbNFsGzeKFQzvy+3m0Rjyz81+X9D3AP2/wevIz9XJDJzHmy409jF63whxGjoV3yUb520kr5sUd7XfQ3fIeYLDiuSK74ffwnH8V832e83JexJe48LrGZg5RWi/E/wkCC4UBhdpAArIKFgoDCrWBBGQVLBQGFGoDCcgqWCgMKNQGEjSyCgCApymzKj8w8XwUBhRqAwnIKlgoDCjUBhKQVbBQGFCoDSQYzqqJH41P/8KXH/o9B+MRFGoDCa7JqnP8DCVTs+WfvgQGvoXxCAq1gQRjWfVXXa3LmSTFDepkIqseiPEICrWBBANZdZ73NFMquDRc0IPFrOLKYDm6JzG8BK/VHTSoDaxzs6p4d+68sL7bfBuwrlqnQdz7v9YbkrhDPB41b+Ml4kFD3QWGLL0HeOj/TyVYK0g4dcPpDEfCrbrj0acAeCHehqxCglu+s76YVaql82g9bztOgdpdeF5RbafeXbDNbY5PZ8JNVr2TM+emKrBoeF6lFM3Mu+q2WuI8Gmy/uQune0V0xS3N/v8WsgoKn1chwep7gM3l5t0gnJz6nsgqZyPNDO7GUr3NzQ5OsgoK7wEiwXxWBTEwdNd8yG+8nlXmNsmq4/THbvlXw0FWIcGXs+qvJ+790LtwE1nlz6u2PyzN7wHWd7E9sgoJJr9bUZxNNx+t73YTaKKam9t08i8IRdUyfmjxD3k4/4PMtC7hIfi8CglmrrHUHNnjVcze7FHQe/wVBa5NAIXaQIKB3wJPT4nUQ/Hs5xdPx36xzybGIyjUBhLwf4LAQmFAoTaQgKyChcKAQm0gAVkFC4UBhdpAArIKFgoDCrWBBI2sAgDgacqsyg9MPB+FAYXaQAKyChYKAwq1gQRkFSwUBhRqAwnms6r7i9fRKw+t/IR2y5/fPgrjERRqAwmuz6rztfLUjaENfh6tr2dhbhnrgsLY6cojmEBWIcEt86pzkJybjabRX3Xhwe4N3OTCCTc2M51VlAp8t8yrVOTE59r+m4oTM7ZLzvGnV99ghkFWQenWRjBW3NAd7Gk4q8ycqEfnbq7EE7X4/aWJnMv300cmWQXFeX9YPXRnv7CVC7LqqIanv9Z7gCotujkU7Hoiq5zGN/npI5OsgjIxryoGB6BrLKu6+aRuNNOruZ1geZBM01nVzMXmvK1oFsRqN2t/kSqM4FQjOO3ATkazyj/FBD4GsqqbMd25y0pWxRufyyp/YXC3+KP81X+LOa9qvsTYG1mFBG5WOfHwGafUOfV0VgV7N8/cVSzV/Qw25WRV0KufPjLJKihDWdU9owWa7votcDDPUMP60BtHo1XenUI5WzazSm3/p49MpzA4X36niXmVeZgDH3f9vury8TqINKfig+w0G6i7RVb5q/+W6XNnbI/vrCPBvddYqtuo4dsZ64f2XvdE9adeXi+sc/F84/j3j1WNzVh9Jv9LN9272Ix/TZPmQ/d3EDu48T3AYsJxnIb15kaG4ooST+Z/6aZewou1N66xhAQzWRWfEDVPoI5eaB1hVv15uj3HNP9LN5/lvDQvQVYhAf8nCCwUBhRqAwnIKlgoDCjUBhKQVbBQGFCoDSQgq2ChMKBQG0jQyCoAAJ6mzKr8wMTzURhQqA0kIKtgoTCgUBtIQFbBQmFAoTaQYDKrnF93rl+8gN+QPgfjEZRubXSvbOKsMtpgZZXpkSdzyHrb8Dg/rxotpmb75rUnmhewwHcFhcH1RF5O1UZ9ARp1N17XbFDX21Blqt7Wza4dsrqdDA6iVx1cblZNPKHx3Xp5cANfd+FJDDbjZNURBkB3XdWgO5o3NzUxFpnNLi/+4kmbTrUNzMyrnJo7v3jxEzr9wp83tfI6bfzqXoisgpKfVX78OLsezYDpIWtCd4C9Y6fPNJZVn2AIlpyXd5fEZTFU0N96wd5WKF0veULwYWaV+ZDTYHF4aSbQeTvBsLY4ZAV/kblBfxDezDVZVS8snjhVGc0tkFUPRFZBuSmrVKgEGbPIHIJWhqzurrsbNAfh/QxklYql4nYz5IeyqrnxuFfx7s531fLu6sW652bqT9vJhR9kYjOZ86rm8R63N2vyLxzWmi39bnTVI5i/PO7tNga+W9HdVvz0NYvMrInuTp1XTg2aTpeK6Brt5AaGfszwkucE//nWe4BODsWZ97nt7C6+7XTb3MXx78gztPGND73h9wCnT1LiUCmWqM02u6Q2NVG1avVgOxsXxxlZBaWbVROHjB8ecXt/yDK3ppb4Q5azZfXUHbN/0QaGvwdoVkn9XAfPfrwppz/OKz1Xf93tbF8i/xn6guhLnhP8J84qdXzNpYV6dOhM9KiOaMdEPz8bj9s0+xBs3//zd3Lvd9Y//xavwfmVmKiPoD9B98xqa64SbOcNVXIMnsS85DnBf+LPMuuFzdtBM+fR4OgeHVuKMcrfoPp7ncPBHJ2ay19yuM1fY8l5veMlzlpmZ1T34mIyl58bNP9wsxx/mvMFUfMuNuN/XuUXRlwz5vDy92/qOHsfzYD7hrXuut1BeDMz7wHWw3qzWXeJsxYewvmCqFrCy7o3880Yc6CIl6tHnayqG3eHsm4YdGt7sfjV3+UMwpsZvsaS+ahTTGr6Upj4q3C50e968SK+h/OFrODRY3wo+DuFjWr2V43mqk23RD8Npvs5obm1oKvxoxvg/wSBhcKAQm0gAVkFC4UBhdpAArIKFgoDCrWBBGQVLBQGFGoDCRpZBQDA05RZlR+YeD4KAwq1gQRkFSwUBhRqAwnIKlgoDCjUBhJck1XNH6Ct/ypt49+1/RzGIyjUBhLclVXdX3SrZse/P0qf6AzuEBSG/zN+bImsQoKBrAoGoPhusPBoJRNZ9UD+eMSr9jZObVAVWDQ5r/oTV8dqLoxPtBezqthg90SeY2YOWQWFrEKCpaxavNsNs259N1ved1S8+Xgjq6B0a4O3grFu7D3A4kb90Oduwryqu53Lvfl4I6ugxLXxJ/5jDmDI2LyqKDsnHubmRs66znStaDC6UE0B479oS6owuuclr33G3mPuBBcYMvweYDMhmoX4GaTOj6qAaW5kfV4Vb7N52+zt24x+kHlzd/AgZBUSzGRVPZoXS4oZSbNZfff4t7K75+OXZFVzCmXu8VXIKijBnLt5G5iw9B5gsbxe+GlvvhE0VNDXzqucPrz5eBv6rtebn6gXmvuhCzBkJqsOnROfu8686qhKuRb3vptPflY5Uffmg23ozeE3P1EvxHfWkWDme4CHN4g331gbelvPUUdaHHWqcXeh2t1LmCcxzl1sxvzggDLACjer/IxRo3/RYGIvl+CAmWOexDSX8JzvjWssIcHq9QC7Z0xxMjmG+jPdT8RGT2LueBHxTGQVEvB/gsBCYUChNpCArIKFwoBCbSABWQULhQGF2kACsgoWCgMKtYEEjawCAOBp/skqAAAe6/8AsSe8JWaaExgAAAAASUVORK5CYII=" alt="" />
3.2 变量和常量的定义
- VBA允许使用未定义的变量,默认是变体变量。
- 在模块通用说明部份,加入 Option Explicit 语句可以强迫用户进行变量定义。
- 变量定义语句及变量作用域
Dim 变量 as 类型 '定义为局部变量,如 Dim xyz as integer
Private 变量 as 类型 '定义为私有变量,如 Private xyz as byte
Public 变量 as 类型 '定义为公有变量,如 Public xyz as single
Global 变量 as 类型 '定义为全局变量,如 Globlal xyz as date
Static 变量 as 类型 '定义为静态变量,如 Static xyz as double
一般变量作用域的原则是,那部份定义就在那部份起作用,模块中定义则在该模块那作用。
4. 常量为变量的一种特例,用Const定义,且定义时赋值,程序中不能改变值,作用域也如同变量作用域。
如下定义:Const Pi=3.1415926 as single
注意:其中dim是dimension的缩写,表示为该变量在内存中需要分配的空间
3.3 数组
数组是包含相同数据类型的一组变量的集合,对数组中的单个变量引用通过数组索引下标进行。在内存中表现为一个连续的内存块,必须用Global或Dim语句来定义。定义规则如下:
- Dim 数组名([lower to ]upper [, [lower to ]upper, ….]) as type ;
除了以上固定数组外,VBA还有一种功能强大的动态数组,定义时无大小维数声明;在程序中再利用Redim语句来重新改变数组大小,原来数组内容可以通过加preserve关键字来保留。如下例:
- Dim array1() as double
- Redim array1()
- array1()=
- Redim preserve array1(,)
3.4 过程语句
过程分为判断和循环两种
3.4.1 判断语句:
1. If…Then…Else语句
或者,可以使用块形式的语法:
- If condition Then
- [statements]
- [ElseIf condition-n Then
- [elseifstatements] ...
- [Else
- [elsestatements]]
- End If
2)Select Case…Case…End Case语句
- Select Case Pid
- Case “A101”
- Price=
- Case “A102”
- Price=
- Case Else
- Price=
- End Case
3)Choose 函数
choose(index, choce-1,choice-2,…,choice-n),可以用来选择自变量串列中的一个值,并将其返回,index 必要参数,数值表达式或字段,它的运算结果是一个数值,且界于 1 和可选择的项目数之间。choice 必要参数,Variant表达式,包含可选择项目的其中之一。如:
- GetChoice = Choose(Ind, "Speedy", "United", "Federal")
4)Switch函数
switch函数和Choose函数类似,但它是以两个一组的方式返回所要的值,在串列中,最先为TRUE的值会被返回。 expr 必要参数,要加以计算的 Variant 表达式。value 必要参数。如果相关的表达式为 True,则返回此部分的数值或表达式,没有一个表达式为 True,Switch 会返回一个 Null值。
- Switch(expr-, value-[, expr-, value- _ [, expr-n,value-n]])
3.4.2. 循环语句
1)For Next语句 以指定次数来重复执行一组语句
- For counter = start To end [Step step] ' step 缺省值为1
- [statements]Next [counter]
2)For Each…Next语句 主要功能是对一个数组或集合对象进行,让所有元素重复执行一次语句
- For Each element In group
- Statements
- Next [element]
如1:
- For Each rang2 In range1
- With range2.interior
- .colorindex=
- .pattern=xlSolid
- End with
- Next
3)Do…loop语句 在条件为true时,重复执行区块命令
- Do {while |until} condition' while 为当型循环,until为直到型循环,顾名思义,不多说啦
- Statements
- Exit do
- Statements
- Loop
3.5 过程和函数
过程是构成程序的一个模块,往往用来完成一个相对独立的功能。过程可以使程序更清晰、更具结构性。VBA具有四种过程:Sub 过程、Function函数、Property属性过程和Event事件过程。
Sub过程:
Sub 过程的参数有两种传递方式:按值传递(ByVal)和按地址传递(ByRef)。如下例:
- Sub password (ByVal x as integer, ByRef y as integer)
- If y= then y=x+y else y=x-y
- x=x+
- End sub
- Sub call_password ()
Dim x1 as integer- Dim y1 as integer
- x1=
- y1=
- Call password (x1,y1) ‘调用过程方式:. Call 过程名(参数1, 参数2…) ; . 过程名参数1, 参数2…
- debug.print x1,y1 ‘结果是12、,y1按地址传递改变了值,而x1按值传递,未改变原值
- End sub
Function函数:
函数实际是实现一种映射,它通过一定的映射规则,完成运算并返回结果。参数传递也两种:按值传递(ByVal)和按地址传递(ByRef)。如下例:
- Function password(ByVal x as integer, byref y as integer) as boolean
- If y= then y=x+y else y=x-y
- x=x+
- if y= then password=true else password=false
- End Function
- Sub call_password ()
- Dim x1 as integer
- Dim y1 as integer
- x1=
- y1=
- if password then ‘调用函数:. 作为一个表达式放在=右端 ; . 作为参数使用
- debug.print x1
end if- End sub
3.6 补充
在上面一例中用到了 With…End With 语句,目的是省去对象多次调用,加快速度;语法为:
- With object
- [statements]
- End With
四. 具体实例
aaarticlea/png;base64,iVBORw0KGgoAAAANSUhEUgAAATEAAAC1CAIAAAC4UV9FAAAbmklEQVR4nO2da5AUVZbH70Tsh4nYXSdmY3X2mxML9COZ2ZgPG2usG7MbseOsgP1g2iyFdXzsqOMMCmI38hCtwhkDGxV7xFADURCYxsxdRpGXaNtDN3TTgDyri26afkO/6tHvbvqVleyHfN1782ZWVsOQVVnnHyek6ua5596b3F+dzCzqiCQvajL22Xjv22Ndm0c6Ng23lQ63bhps3jjQ9PtY44bIpVeiTW+O9B11e44gEFvI7Qn8JTQz3rt55voX8ZnwWGRrf/vrLWfXTY9/E58+ptjU2OG+S6+7PUkQiC1PMimN926emTg4M3Hwxg3pxg2p49vfXjoRuD7wmTR1dGaiYnrsy66zxW7PEQRiy+NMzkwcvHHjRuvJpy5Wre0Ovjo99uXUyBcTg3uvnlnp9hxBILY8ymQPzqR0pebxC39ede38KxODe8dj5aPh7Z2nV9j1D/o5pIoX9FaBV9s4fxBzFnjSDfdkNFt4kjFBGSxvMjna/YYC5NT4Pjk+1lj13+e+WdF5ZvVoePtI9wdDV//QfupZ694CrwMS9HMqREE/p3Ej8AhrRBzPczhpQT+nvjMcLT3NMUGZrrRnsrKysrS0lGocuVaqADkx/L/SdF+o8qGzX/2m49TKoat/GGjbFLvyu6tnno+0lDsIH/RznD+IwylRb0xvMQk8mf9IT7uYoMxVejNZUVHBcVxWVhbVPtTxmgLkWGz39eETwa+Lvj38P20nfhu78rtI40t99SU9F5a31D7tYASBV0jR/tRbMdYscaKRpDztYoIyV2nMpALkkiVLzEwOtL2qADnUuy3WueXClwWn9j/ScuxJhcaus7+OxWLNx59MOITOCYVdAia121ETqHaZEZgEKUpXJnUgly5damYy1vyKDmRf86ZzBxed/Jy/cvSXXWd/fe30E511j8RisSvHfmU/BHGLN9s8aXftCnkSxFJaMokDyWQyfHmdDmRXaMOZ/fef2FvQ9M1DnXWPdNQ+1H68KBaLNVU/YTME/cyFIMbx/SQNmolJy5igzFVaMllaWpqFaePGjZRDb+hFHciOc2tO7/t5jbjw8tdF7ceL2qoL2qoLHv2q9XLVYxbhscehZKPxONX+yY32xhTIGmbIkiBNaclkQnVdXKkD2Xrq+dOf31cj/LzxSIECZFt1wcLy+sajj7I7618ZUt8cGl9aEreEuLBvSBx5smKCMl3eZLLz3HM6kFdqnjn9+X3H9/wMZ7K1enFLXYnb0wSBGPImkz0Nbzcdf7yh6tGGo481HH3i9Of3Ve95IHTkocaqxxqPPtrw51+21BVHOw66PU0QiCFvMilJ0uR4JNp55MpJ/5kD+TX7nmw+v/f6SLfbkwKBEsuzTIJAaSpgEgRKLQGTIFBqCZgEgVJLSJKk6RmpsXemunnmSAMYGJjLhiRJCnbNNPRKo5NxKS6DgYG5a0iSpIrLM1Mz8vRMHAwMzHVDkiQdaZiR4vLUTDxDbMK20mTk8pvDfVWuTxIsY01jUsocJqWElSZ7Q6+7PUmwzDWVyRlJnpyOZ4g5qTTp+iTBMtZUJqcleWI6niHmpNKk65MEy1jDmJyKZ4g5qTRpF+F8IFf7yVXRHr1dLNJ+2/Xyecx5D0+64Z58+ZRDz4QxLRrB0tBUJqckeXwq7hk7drwmOjBiddRJpUnr4GIRFzijvD4fyEX87qn4+FT9eg7lvlI/PhUf38MjrBFxfBGHivbo3evXc8rR+O4HEXpQHLfzdB7T3AiWrqYyOTkjj0/GPWM7d5fv+uOn13oizKNOKk32Xil3MFD9+lxu/XkNTqMRFZXjPvhbzMp5lBs4M2nhmXRM64HA0so0Jqfl0cm4Z+yT3eXtXX3vffBhU9tV81GHlSYdDCT+AvG7JuOj5Tx6UNTbdz2Icl+u197Wv5SLflHO6E66mTyTjmk5EFh6mcrkxLQ8OhH3jH2yq3x0It7ZHXnjrbIL9Zepow4rTSYcZVcRyn25fnQifvplDhWJ5vbRifjohIaK3vGcejtKNJo8k4tp2QiWfmYwOTwR94zt2FWuvLjS0f3SKxs6e2P4UYeVJu2H2FmEUJGovi3njdcT8Z1FKOfleu1t/bpctLjcIkJu4JTRQnomHdNyILD0MpXJ69Py8PW4Z2zHrvLh6/GO7uimN8vOBS9TRx1WmrSJrwKpt/yRR7mBU+rb+nW5aPEfdWfqLW7iYsStO2vhmXRMm4HA0slUJsen5MHxuGds+87y1qvhLe9/2NB81XzUYaVJi+D1a3NRzvp6c+Pi3fHB8fjgbh7lBuqYh8bjg2cCOUWi8rpuPWfn6TymXSNY+plnmdyx69PWaxHmUYeVJtnBd9OVJteeiQ+OxwfPBHK0bx13qM71a3MJVwWYuvVGpUl7T8cxLbqDpaepTI5NygPjcc9Y1bGaruiI1VEnlSavnChxfRVgmWkGk/1j8Qyxq6EElSabaouvtRxyfZ5gmWkqk6OTcmwsnjkWGYh2tnx16YT/2/351Z8/FTz9p75oj+uzAgOL6UyOTMrR0TgYGJjrhiRJ+nPTzMC4HBtzfzZgYGBIkqRQ90yoRxqakEfAwMDcNiRJ0tS0dLFrpuKy+xW7wMDAoL4rCJRaAiZBoNQSMAkCpZYykclJ21qS0aY3R/qOuj1HUOYqA5mcSVhLsu/S625PEpS5ykAmJSe1JN2eIyhzldFM2tSSdHuOoMxVRjLpoJakXf+g3/i1laC3CtqPuDh/EHMWeNIN92Q0W3gmismeEigt5U0ma2pqhoeHrY46qSVpHVvgdUCCfk5FIOjnNG4EHmGNiON5Duck6OfUd4ajpafDmMwpgdJV3mSyvLx8z5494XCYedRJLclIS7mDcYJ+jvMHKRIoLKwpEXgy/5Ges4upTwmUtvIsk729vVu3bu3s7DQfdVhL0sE4Aq+gof2pt2JYWPJDI0l5ziom3Q2UhvIsk5IkhcPht99+u7GxkTrqsJZkwlF0TihEEvCj3fuZ0LHLjLPlHJR+8jKTkiR1dXVt2LAhGo3iRx3WkrQfArsbnH2etLt2TT4mMSVQ2srLTEYiEWaedFhL0iY+vfsJYpzf+1FZzcRkMjEBSM/Is0z29fVZ3U86rCVpERt7HEo2Go9T7Z/caG9MgazBs4/JnhIoXeVZJm2euzqsJckOLdC1JFUWjG8IiVtCXNi3GY48nca0mhIoPeVNJu2/n3RSS7KlruR2ThgE0uVNJu3V05CglmRLXXG046Db0wRlqDKRSUmSJscj0c4jV076zxzIr9n3ZPP5vddHut2eFAgkSRnLJAiUsgImQaDUEjAJAqWWgEkQKLUETIJAqSVgEgRKLQGTIFBqKROZhFqSoFRWBjIJtSRBKa0MZBJqSYJSWhnNJNSSBKWgMpJJ79WStIoJSkNlIpOeqyXJjAlKV3mcycrKytLSUqrRy7UkoUhW+svLTFZUVHAcl5WVRbV7uJYkIOkBeZZJBcglS5aYmfRgLUnLmKD0kzeZ1IFcunSpmUmv1pJkxQSlnzzIJA4kk0lP1pK0iAlKP3mQydLS0ixMGzdupBy8VkvSLiYo/eRBJhPKa7Uk4X915y1lIpNQSxKUyspEJqGWJCiVlYlMSlBLEpTCylAmQaCUFTAJAqWWgEkQKLUETIJAqSVgEgRKLQGTIFBqCZgEgVJLwCQtqDQJclfAJCWoNAlyWcAkLag0CXJXwCStW1JpEvv5FFFVyxD5k2X85x56hR9rmeOR4RiDkb/MZDgrP3ghfxVK/bqTGpa5LvtD2K9qeMHqJzbYiOp8zKuj+5JK7x/HAJO0bqbSpP1OUXcL4cT5BT+HeL/GsLb7CKgdyIJJe7QR5w/qLjoROk+zZ9LyE0I9oKyO7G+Khv9oNJlfaid76lJOwCStm6s0qcppntT2mupvdFNemTgwg0GESyRLioi42g+jDW88vfmZmPNCAvz1zyMDRts8SVNILNDms48XgEnP6dZVmmSKuXWVPImDoW8srHKATcUP28xkJSUs6YB/JMwyT9p9PAg8cU1gmSdZedFprgQmPadbUmlS32BE5qNr+FDlO4JBP49M/SQDmwR3jNZJxzQtRnejvLORHVlMsiBnlYNnegg8lsismLQs9IVXNmF8thGXGGksYJLWzVeaxGlTNwi5zcj9pN7U6WmRcT+pbHS7LMFOTo6uJyUDJD1zqvTRFbzUDsQBfKZKlXabB1DqKyUA+9qVTIeWlYho8owxgEnP6SYrTQo8YuBH7jJElKEkmGTeWWKPYpO+dpXI55daqqMzIMdx/iC1m/FkT+ZeAgCilX23iSgmsWc82JjmNVjePgOTGaWbqTRJPMLAMwspmzxJ71qyv0UekqyYTPwcmPMLfk79T9Cio74a8pMFe0SltKgLSZAnDUbxHqyCe0Ysxp00XLtmkG6u0qQkKXtNUJMasUFYF6ZGnuR5kgBeEATW3goGk3qwYv0tiZY7jQe8+kZn3O/RtLHv+qyulslPHHzpVtfl5kRIX8RaLBiY9JxuqtKkJEnk7mF+KWKXJ1n9HMiWSQuRCZiV3iyYVObPyOOWgSyY1Gk0XZfrjuS5cnJOgEnP6eYrTdJP9emrQIs8STNphRJC5n96YMNcojypvbNj0rgKZ1w9E2CavugkWaIef5ke3+jPb+hTxjiz5gUx+6SfgElaUGkS5K6ASYag0iTIRQGTIFBqCZgEgVJLwCQIlFoCJkGg1BKSJGlqeqbiQvTdwx2v7W0FAwNz15AkSQe+DR86F+samBmekMHAwNw1JEnSG/va+sfjsXE5OgYGBuayIUmSXtvbOjQhR0bB5MioPBr53KaWZF/jm+GuKtcnCeZh05i8LodHwOTwSDxhLcnu+tfdniSYl01lcvC63DcCJveNyE5qSbo+STAPm8pk/7jcMwwm9wzLTmpJWncX8+3+VThXckrx4UpOyT07fWyvnEDVcKgkJ2EcuedUIGuxSE8gJ1CFtzjxGZZ7huWqdRxCKH+nxdKsZsvsstOXtS5kHyR/J32u6C6nAlnIt1U9q8oLh+eZck4z05gck7uHwOTuIdlJLUmHoY6u5bLWhuj2k6GjQ2Ie4kpOmrp84tP8QyU5vq2J4m9dTMO8dS2HFotJ+qj8a0OLedT+1uZGRdbXmPcJY2LmRiyIsjoxLydwlLF2I4jegr9OZI5OXSqbymRsTL42CCZfG5Sd1JJ0GKpyLZe1NpTE6Dt8mn+oOMf3wWCoOIcrrsMc6gJZOYFKzRktFskIJE45gUonPupYcuVaLm+H5qOOoh5Sh7OQ0qtybaLaP4tFdc7qMin4EXGudviQvlJ12tpMBuUPFrNHQAjl7cDmnJ6mMhkZlTsHwOTOAdlJLcn2hj1OQr1fiLLWhMyNqFDsHJA7B0IvGBeo3Asn5M4dPs0/9EKO733NR208EchCSqMSh8sirm+5F9b41DgDoRdyuBdOOPLBxhIfUOKfCGSpMxQfyAlUKCPu8GnTJqxiDffADnqBVIthO3yoMGAMpwcfwNeuzESZG9kX97c0fTnpaiqT4RG5vR9Mbu+XHdaSZPZ9rzBBqkCFoupWKLb3h1bm+N7rl9v7QytzuJW1cvt237w1oXa1RTmEhzVa2o1e4iLEraw1IizaLrf3i4sQHjmhj2/lGg4h33u1gUVrxJU5irMx4fZ+uX27ZZ5ctB2blYWb6rPdhwrFr9dw6gRyAl9jHbW1i4sQ0l4T9vUaDmldvl5jSsvqVIlTl46mMtk3IrfGwOTWmOywlqSDUKHns9G81SFbB9+76gvu+Vq59WOf5q8fkltjcuvHPoQQyg4cIYOb5Hu3NjCvUGxV/uvIR26tDcxDCBuXe75Wbq0V3601Tbg2MA9hszIbEcqwdwvRoo+1hRSKrTFxUXbgSExcRM5M6fhuIR5BXIS457GZHFnNoUJReaHGjOGRTacuDU1lsmdYbo6Cyc1R2WEtycShagLzCsQtBb4tzEPZgcPR0Ips5WhoRTa3okZu/tg3b3WoWW1ROx5ezaHswGHlBcKjiQuzA4drAvOQb0tUXIj0UL4VqzktjhMfuTkqLmSnQG5FjTbcx5Z5Uplec1RciHwrVrPvKhd+rAUpELXVaXMrEJUhthRobpodJiZJHyKc1cjEqUtTU5nsHpKbImByU0R2WEsyUZzQ8mxu+XG56XhgboFIH/3IN/fFUFMktNzIY9zy43q70t33TkRcgBDCuh96kVM9I3JTRFxgHBIXIN87ho/62pkPcYixhIj8TgFCWF9lku8UoAUfyU0RcUF24FBEfqeAW37cOIqb5ik3faSBXSBqHZVRQsuzEd3xeGBuduCQOhMtAnEqSKkrVU6d+xtp1qYyeW1IbgyDyY1h2WEtSdsgoeey0dwXQ+rbbT7jdVhuDMtlBWjBNsXNV4Z3NDxDz2X7yraJZazgB47JjWG58VhgrilfHQjLZQUIIS2sE5+w3BgWF+hviTlwzx3DhxYXIG1d23yoQFQbswMHNJ8DZlQQQkhZL95L7yguQAghaiDGySkrIHwOvMipMRkn38c6b2ljGpODckMfmNzQJzusJWkZYZsPIXT/NqJx/yoOIV+Z+la833hN9527KtTQJzf0hZ7NtvBhWnVgbnZgf1/o2WyE8sWGbT5kHsLOx5hSWT7C5sA9W631RQhhPig7sF8Pmy/iK9W6G1aWr52QbT5kOIv3I4QQ92y1Gh8/aXqX/atwyJ2ckyRPXeqZyuTVATnUCyaHemUntSQbakqYfTfnI5Qd+IIdWbwfIZQvhj70oXyRPBRapl3E3v8h3cKU5iZ/oW3ZOavEZdlozqqQGhMbxYmPPsM5q0K6vz6KYVWBOUp7VWCOaTLKWEZ8w8e32TxiVWAOca5Cy7KRcvQLjEMjWq8c+tBHvLU4h9Z/BelhKpOd/XJ9D5hc3yM3XyizryXZcLz4UuiQ6/O8ZbZVf3jj20we2pyPEOKWVbk9wwwzlcn2fvliN5hqwc7YxfqvzlYHTu/Pr/i/p44d+9PFtl7XZwWWIaYy2dYvX+gGAwNz35AkSZv3t1/uk4Ld8vkuMDAwlw1JknT4bGTft/3NkXhbvwwGBuauIUmSrk9O7z8dfmNfm+sVu8DAwKC+KwiUWgImQaDUEjAJAqWWgElak7HPbGpJRpveHOk76vYcQV4WMElpJmEtyb5Lr7s9SZCXBUzSclJL0u05grwsYJKWk1qSCUIIPOcPEu8R7/dzvGDZI+jX/tW16mQ0sESG1zqwW+3+KTvihYQ+nD8oSQKvv/PzZh9iZUo8y8UKjP6MKOwzyQjCC3REukvQz6mxBZ4exHo2FjO6DQImaTmpJZkgBItJQZIEXvk7ZkBg2nlBW4QZYjOZYGIJe2rHlI7mLU0742uhtrvW0yIIc8GWA6oHlE7kqkxrFHjj9OKvEynpv4JbJWCSlpNakpadyX1o/gg3bzELIpQNYTpozY/VkaCfw3lg7M6gn+P8AitZcn4BZzLRJlWPY276eESbfVZKlNoR4gWVSTW8bZ6kKSQwt8mSvABMuqHKysrS0lKq0UktyUhLuV1cY+srr8i/XfvLJXVL6V2Cfg6DB9tPjvYuNqSSqdV0h8hA2K5lvxN4zi/4OV6wGpWAUdv3xrrJDwNnedIuKxN3AzZ5kpUXneZKYPK2q6KiguO4rKwsqt1hLUlmTAo3zu/njTRD77Ggn0OI43nOSEfEQfPHud0WEXjmbSbtZHntyvqk4AWKSeuMo83Zr6TloJ9X/TWIdVeH95MWbjrjWCKzYtLylGCfc6yPNuOWHpi8jVKAXLJkiZlJh7UkbcPr+0J9EfRzHKfuaOxxSVAyMhG2N6gLQL2PHXICr9AdpFqt9r/xsRFkZEY/b1xIYveTBgT69SOWu5XPGGOrK8sSBOaFuf3jEyIUsRycSSLvk2uS6HRIJ0d9CjR5xhjA5G2UDuTSpUvNTDqsJWkRm3rqoGwXbesaf8usS0B6z2CuBrXsXaISkOAZjKNnPCYKsXdS0M8bw5B/aANYop/IxfBSL0yZLiST2Nkm71ip02DzGAuYdF84kEwmHdaStAiv7RJiF2lkUkhgf+mshzlaR2xjsPOH0TlRArJmkvUNB0K8n2SSuAan/5QkFg7E/PD16K1GHMaHATV9jEmDUbwHflnq6PzAtav7Ki0tzcK0ceNGysFhLUmL8MrTFGzv69uA5gvfvwbDGKS8IAisPREMUvASm9D2CcbNfBfCcUom06dtfkG9pK9jiaXjSdH0HMj6CRaZJ/GRrK7vzYnQ6oMxQcfbpoxjMqEc1pJkdxZ4xPM8c2+YHJnfixBMJpqqkTbx61qLmzFl1OT/XQGeJwm+WNARmYzBpDoWlu3wDy/yisDB/aTejBjngXQkV+kENmAyZeSklmRLXQmzL3Ufyf6cNyVMRppMBIoahnoOary1uPe8yX8zgLXa7mx1avoaGH76BKlnW8xJGT6sW0Z6/sba8ZNoeaqYM2P0uX0CJmn1NLxtX0uypa442nHQ7WmmnhifLPgRlzZ4GgqYZGhyPBLtPHLlpP/MgfyafU82n997faTb7UmBMkXAJAiUWgImQaDUEjAJAqWWgEkQKLUETIJAqSVgEgRKLQGTIFBqCZhMQvPz7pj/wA/6B8caLvc+E9jw/TnLYsMj7e2DVXXtj911b6QnEhseqaprf/UfebdnCkpjAZNJSGGy/PCnI4M3dv5p308fWQJYgm65gMkkpDCZk3fHp19+Go1NvCfsvOdhHrAE3VoBk0loft4dZYee++G9d879+d/e+9Q/PLzpnoDw0PfnLEN3v3rnf77zy7eqHrvr3tfmPfz7uQ8d/NVblkxCpckMqTTJ+i2nEwGTSWh+3h0Pb7qn7NBzuQvuGjmQN9bwG4VJ5bXC5MWX/1p5mxSTgiRBpUm12VkFLWtfVhUC6zX+BStNApO3QU//5LvzH/jBw5vuyV1w12zyJFSahEqTDgRMJqHCu7/z9E+++y///jezZFIRVJqESpO2AiaT0Py8OxQs/+Nn35sFk1Bp0sOVJmlP5ToGy+74ZZE9zcBkElKeuxbe/Z1X/+vvt5X86P2X/vn8tiUd1WWKnd+2BDfr565QaVJflhcrTerBSCaJe2bbBQKTSUhhct4//VXxT7+385F5ux//8dbHf9RRXfbh49wbC//ui2Ju929zdWMxST11gEqTprWle6VJ/AOFzpNMJ4aAySSkMPnDe+/MXXDXo0/cXfzij18p+dctz/xk56r7dhX/m5IeHTFJ7CKoNIl/RBlbXk9o+CVoaleaJPMtMHkbhDM5q2c8UGnS/IzXPEBaVZo0zrCJNOraFU+fcO16qzQ5OXlTTEKlSe9VmtSYpC+6zc94eIePeIDJJDU0NDRrJqHSpL4eLrMqTSZ8bEUImExaHR0dN/X9ZGYqoytNApN/YQ0ND0Yikfl5dygWDke+P2eZYl3Xuh67617F3J4mKHUETIJA6SxgEgRKLQGTIFBqCZgEgVJL/w8Uy+fICCtMMwAAAABJRU5ErkJggg==" alt="" />
- Option Explicit
- ''''''''''''''''''''''''''''''''''''''''''''''
- 'this is created by luquanhong@gmail.com
- 'if you have any problem, please contact me
- ''''''''''''''''''''''''''''''''''''''''''''''
- '调用系统中安装的解压缩工具来解压当前目录及子目录下的所有压缩文件
- Private Function discompressFiles(Path As String, filetype As String)
- Dim result
- Dim rarString As String
- Dim rarStringRAR As String
- Dim Files() As String '文件路径
- Dim Folder() As String '文件夹路径
- '请在这里修改WinRAR安装路径!!!!!!
- rarString = "C:\Program Files (X86)\WinRAR\WinRAR.exe"
- If Len(Dir(rarString)) = Then
- MsgBox "请确认你安装了WinRAR程序,或者设置了正确的路径", , "退出"
- Exit Function
- End If
- Dim a, b, c As Long
- Dim sPath As String
- If Right(Path, ) <> "\" Then Path = Path & "\"
- sPath = Dir(Path & filetype) '查找第一个文件
- Do While Len(sPath) '循环到没有文件为止
- a = a +
- ReDim Preserve Files( To a)
- Files(a) = Path & sPath '将文件目录和文件名组合,并存放到数组中
- '解压所有的该类型文件
- rarStringRAR = rarString & " x " & "-Y " & Path & sPath & " " & Path
- 'Debug.Print "rar rarString " & rarStringRAR
- result = Shell(rarStringRAR, vbHide)
- sPath = Dir '查找下一个文件
- 'DoEvents '让出控制权
- Loop
- sPath = Dir(Path & "\", vbDirectory) '查找第一个文件夹
- Do While Len(sPath) '循环到没有文件夹为止
- If Left(sPath, ) <> "." Then '为了防止重复查找
- If GetAttr(Path & "\" & sPath) And vbDirectory Then '如果是文件夹则。。。。。。
- b = b +
- ReDim Preserve Folder( To b)
- Folder(b) = Path & sPath & "\" '将目录和文件夹名称组合形成新的目录,并存放到数组中
- End If
- End If
- sPath = Dir '查找下一个文件夹
- DoEvents '让出控制权
- Loop
- For c = To b '使用递归方法,遍历所有目录
- discompressFiles Folder(c), filetype
- Next
- End Function
- '将查找到的所有文件,过滤掉压缩类型文件后,存入对于的Excel表格中
- Private Sub GetFolderFile(ByVal nPath As String, ByRef iCount As Long, count As Integer)
- Dim iFileSys
- Dim filetype As String
- Dim iFile As Files, gFile As File
- Dim iFolder As Folder, sFolder As Folders, nFolder As Folder
- Set iFileSys = CreateObject("Scripting.FileSystemObject")
- Set iFolder = iFileSys.GetFolder(nPath)
- Set sFolder = iFolder.SubFolders
- Set iFile = iFolder.Files
- With ActiveSheet
- For Each gFile In iFile
- ' .Hyperlinks.Add anchor:=.Cells(iCount, 1), Address:=gFile.path, TextToDisplay:=gFile.Name
- '过滤掉所有压缩文件
- filetype = Mid(gFile.Name, InStr(gFile.Name, ".") + )
- If filetype = "zip" Or filetype = "rar" Then
- Debug.Print "filter"
- GoTo step1
- End If
- .Cells(count, iCount) = gFile.Name
- iCount = iCount +
- step1:
- Next
- End With
- '递归遍历所有子文件夹
- For Each nFolder In sFolder
- Call GetFolderFile(nFolder.Path, iCount, count)
- Next
- End Sub
- '主程序
- Sub DealWithExcel()
- Dim i, j, count As Integer
- Dim myDir As String
- Dim strTargetDir As String
- Dim strTargetDir1 As String
- Dim strSubDirs As String
- Dim strDay() As String
- Dim strCompany() As String
- '清除Excel表
- Columns("A:CA").Clear
- count =
- '选择需要执行宏的文件夹,获得文件夹名strDir
- With Application.FileDialog(msoFileDialogFolderPicker)
- .Show
- If .SelectedItems.count = Then Exit Sub
- strTargetDir = .SelectedItems()
- End With
- myDir = Mid(strTargetDir, InStrRev(strTargetDir, "\") + )
- '如果可以的话,这里可以做一个目标文件夹的检查,缺省不作处理
- If Len(myDir) <> Or VBA.IsNumeric(myDir) = False Then
- MsgBox "这里只针对固定格式文件夹,比如:201310", , "退出"
- Exit Sub
- End If
- If Right(strTargetDir, ) <> "\" Then strTargetDir = strTargetDir & "\"
- '处理zip格式的压缩文件
- '解压两次,防止压缩文件中还包含有压缩文件的情况出现
- For i = To
- discompressFiles strTargetDir, "*.zip"
- Next i
- '处理rar格式的压缩文件
- '解压两次,防止压缩文件中还包含有压缩文件的情况出现
- For i = To
- discompressFiles strTargetDir, "*.rar"
- Next i
- Debug.Print strTargetDir
- '开始读取文件
- strSubDirs = Dir(strTargetDir, vbDirectory)
- 'Debug.Print strSubDirs
- i =
- '读取目标目录下的所有目录
- '根据规则,这里将读取到的将是每天的文件夹
- Do While strSubDirs <> ""
- On Error Resume Next
- If strSubDirs <> ThisWorkbook.Name And strSubDirs <> "." And strSubDirs <> ".." Then '忽略哪些隐藏系统文件夹
- If (GetAttr(strTargetDir & strSubDirs) And vbDirectory) = vbDirectory Then 'if foler
- 'Debug.Print "it is directory " & strSubDirs & " i " & i
- ReDim Preserve strDay(i) As String
- strDay(i) = strSubDirs
- 'Debug.Print "strDay" & i & " "; strDay(i)
- i = i +
- Else 'if file
- Debug.Print "it not a directory"
- End If
- End If
- strSubDirs = Dir
- Loop
- 'Debug.Print "UBound(strDay):" & UBound(strDay)
- '遍历日目录下的所有单位目录
- For i = To UBound(strDay) +
- '处理每天的文件时,需要清空这个变量和数组
- j =
- Erase strCompany
- ReDim Preserve strCompany() As String
- 'Debug.Print strDay(i - 1)
- strTargetDir1 = strTargetDir & strDay(i - ) & "\"
- strSubDirs = Dir(strTargetDir1, vbDirectory)
- '读取目标目录下的所有目录,日期目录下为各公司名称
- Do While strSubDirs <> ""
- On Error Resume Next
- If strSubDirs <> ThisWorkbook.Name And strSubDirs <> "." And strSubDirs <> ".." Then '忽略哪些隐藏系统文件夹
- If (GetAttr(strTargetDir1 & strSubDirs) And vbDirectory) = vbDirectory Then 'if foler
- 'Debug.Print "it is directory " & strSubDirs & " i " & i
- ReDim Preserve strCompany(j) As String
- strCompany(j) = strSubDirs
- Debug.Print strCompany(j)
- j = j +
- Else 'if file
- Debug.Print "it not a directory"
- End If
- End If
- strSubDirs = Dir
- Loop
- '将公司名对于的日期存入Excel表中
- Dim k As Integer
- For k = To UBound(strCompany) +
- count = count +
- Cells(count, ) = strDay(i - )
- Cells(count, ) = strCompany(k - )
- 'Debug.Print "comp path is " & strTargetDir1 & strCompany(k - 1) & "\"
- Dim x As Long
- Dim iPath As String
- iPath = strTargetDir1 & strCompany(k - )
- x =
- Call GetFolderFile(iPath, x, count)
- '结束遍历单位目录下的所有文件
- Next k
- '结束遍历日目录下的所有单位目录
- Next i
- End Sub
附件: readfile_v1
VBA学习笔记的更多相关文章
- VBA 学习笔记 - 变量与常量
学习资料:https://www.yiibai.com/vba/vba_variables.html 变量和常量命名规则 必须以字母开头 不能包含空格.句点(.).感叹号(!)或字符@,&,$ ...
- VBA 学习笔记 - 输入框
学习资料 https://www.yiibai.com/vba/vba_input_box.html 输入框 InputBox 函数说明 提示用户输入值.当输入值后,如果用户单击确定 按钮或按下键盘上 ...
- VBA 学习笔记 - 日期
date() 返回当前的系统日期 返回格式为 YYYY/MM/DD CDate() 学习资料:https://www.yiibai.com/vba/vba_cdate_function.html 将有 ...
- VBA 学习笔记 - 运算符
学习资料:https://www.yiibai.com/vba/vba_operators.html 算术运算符 加减乘除模指,这个没啥特别的. 比较运算符 和 Lua 相比,判断相等变成了一个等于号 ...
- VBA 学习笔记 - 消息框
学习资料:https://www.yiibai.com/vba/vba_macro_comments.html 注释 单引号或 REM 开头 丸子:多行注释咋办? 消息框(MsgBox) 函数功能:显 ...
- VBA学习笔记(8)--遍历所有文件夹和文件
说明(2017.3.26): 1. 采用的是兰色幻想教学视频中的“父子转换法” 2. 这种VBA的遍历文件夹方法非常难理解,主要是因为dir这个函数,第一次带参数调用,返回的是此目录下的第一个文件,第 ...
- VBA学习笔记(4)--数组和单元格互相转换
说明(2017.3.23): 1. VBA的数组还是很难用的,其实就是非常难用! 2. 要先定义一个数组,可以是空的,也可以里面写个数字作为数组长度. 3. 如果是空数组,可以后面redim重新定义数 ...
- VBA学习笔记(2)--新建word文档并插入文字
说明(2017.3.20): 1. Dim As声明变量类型,Set赋值/初始化 2. With使后面的省略对象,直接点就行,后面要End With 3. Application.StatusBar ...
- VBA学习笔记(1)----VBA对象属性方法
'VBA对象 'VBA中的对象其实就是我们操作的具有方法.属性的excel中支持的对象 'Excel中的几个常用对象表示方法 '1.工作簿 ' Workbooks 代表工作簿集合,所有的工作簿,Wor ...
随机推荐
- 一些有意思的面试题(持续更新) .C语言编程技巧札记
一些有意思的面试题(持续更新) http://blog.csdn.net/wangyuling1234567890/article/details/38565239 C语言编程技巧札记 http:// ...
- Python基础-内置函数总结
内置函数 int('123') float() string() tuple() set() dict(name='zdd',age=18) type()#查看类型 len()#看长度,其实是元素的个 ...
- Java微信小程序开发_00_资源帖
1.微信小程序开发:http://blog.csdn.net/column/details/13721.html?&page=1 2.微信小程序栏目:http://blog.csdn.net/ ...
- Android之SharedPreferences权限
import android.app.Activity; import android.content.SharedPreferences; import android.os.Bundle; pub ...
- 机器学习 Support Vector Machines 3
Optimal margin classifiers 前面我们讲过,对如下的原始的优化问题我们希望找到一个优化的边界分类器. minγ,w,bs.t.12∥w∥2y(i)(wTx(i)+b)⩾1,i= ...
- 8个Javascript小技巧,让你写的代码有腔调
如果你想确保你的JavaScript在大多数浏览器和移动设备中都可以工作,那么我从大漠等大神指导,原来可以使用f2etest,也可以使用Endtest,browserstack等 1. 使用 + 字符 ...
- 牛客网字节跳动冬令营网络赛J Sortable Path on Tree —— 点分治
题目:https://ac.nowcoder.com/acm/contest/296/J 用点分治: 记录了值起伏的形态,二元组 (x,y) 表示有 x 个小于号,y 个大于号: 因为小于号和大于号都 ...
- JAVA 编程思想三
1:JAVA可变参数? 参数个数不确定,但是类型确定: 可变参数位于最后一项,只支持一个可变参数: public void funciton1(int a, String ...args) { for ...
- MD5 校验文件
https://blog.csdn.net/wudishine/article/details/42466831 MD5.h #ifndef MD5_H #define MD5_H #include ...
- VisualGDB系列4:概述-Linux程序与VS
根据VisualGDB官网(https://visualgdb.com)的帮助文档大致翻译而成.主要是作为个人学习记录.有错误的地方,Robin欢迎大家指正. 本文将会阐述如何使用VisualGDB来 ...