毕业论文参考文献自动排列脚本(杭电)
毕业论文的参考文献部分个人觉得是最麻烦的,因为要按在正文中出现的顺序来,所以一旦文本有顺序变动,很有可能导致得重新排列文献。身为程序员,我们必须厌恶这种重复劳动~
今天下午写了个VBA脚本解决这个问题。虽然没什么技术含量,不过感觉还是能解决问题节省不少气力的~尤其是如果在写作一开始就用的话~这里简单介绍一下使用方法,觉得好的童鞋就拿去用吧~
![](data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAj4AAAC1CAIAAADQuGLJAAAgAElEQVR4nOy963fb1p336/+hb8/qWn0x66ysc9Z60nlmTqeDzpxM5+l5Uiczk2bamSTTpnZDuokzTt24SZPGaZQ0NSk3TZXYjmHHdpQ4MinIF/kiW5Yom7apiyVRomXrLoo0db9RvIAEcdnY58UmtyAQAAEQuiX4rt/SgjY3gI3NvX8f/PbeALdBW7a2jp588sltpfTkk0/mcrlcLvfSSy8lEgkIIUmSJEnmcrnnn39+cHAwkUgQBIE+2r17t3SvMou3e/fuH/7wh7t371ZMJ0kSQjg4OPhXf/VXg4ODZZ5Lv2RnJElS8WJbWlq++c1vompB/27btg1fSy6Xe/LJJ9ElmJDs4LZslaltG10AW7YMq6WlpRgPJEm2tLTAgpOVkiyRSDz//PO9vb0IXfv375eRo6WlxSp0ud3uRx99VHr8wcHBRx999JlnnjHt98uUDBtq6BocHPzGN76B6hAWcItzlklcG122rJWNLltbT4lE4qWXXpI6X2mMhfPg0ArnQegqPqCF6CJJEv3FiSjmw4nFMRBCLPLsiLvnzp375je/KU2R5sFlRomywEiWEx8f5cRRpnRH6e6okGj70KFDuKjSKlI8UXHJE4nEN7/5TZTttddes9Fly0LZ6LK1JbV7924cH0ClOIwkyW984xvf+c53kDMtHleU0sVadKEwC7npRCKBgjBFdO3evRs79MHBwfb2dgQAGQ/wpZEkiT6SHqS9vX1wcFAtJ9QddUk/QpcwOzv75JNPonpG2NMokmLJpSC00WXLQtnosrUlpYgH/Gkikfj5z3/+4x//+NChQ9/4xjeKIy0UCeF/rUWX1GujeAtC+NJLL8nQpTgEl8vlnnjiCVw2GXVQHNPS0iIb3NPIWfwRSZJPPPGE4sXinC0tLS+99BIqNgpwn3jiCcWj4RNpl9weMLRlrWx02dqqQlRAnJA6cfRRQ0MDGkKUTX2Zi7qkY18aLhiHVuiAiURCGrXI0KXozWWXI4uQpFDEA4aYkRo5dUZdmEOyC+nt7cU3Cmon0i65jS5b1spGl60tLDSRI1v+kMvlKisr0XyYmq9c06gLFhjw2muv4cMWo0st6pICQCOWQsLhl6GoS+NiZStNUER76NAhvItG1KVRchtdtqyVjS5bW1Uo7HjttdeK6QWVFm5ItdbogkVYLUYX8vXSJXx4rgsDAIFBOrGE8iNWQQnq1HJCgxRpaWn5zne+g2MsdHy8sl+jSIoll4LcRpctC2Wjy9bWE1omJ12XgVLQ9AwSRpd0iV3xgKF0xZ32YKDOgkldvHSJY/FcF05Hp0bzT9JZJXwcPFaJ56hQNpSIr1oxJ1SJk2TVhYXCOOlHqAJ1Fqk4IkS1ihbL2OiyZZVsdNnaSkKzVrKZLSwUhxU/klwsWdRly5atrSUbXbZs2bJla4vJRpctW7Zs2dpistFly5YtW7a2mGx02bJly5atLSYbXbZs2bJla4vJRpctW7Zs2dpiMoMuURTv9w9dbbq5Sex+/5AoipZXjS1btmzZ2pwyjC5RFPv6h6423VyDwpjU1aabfTa9bNmyZetrI8PoAgBsKm4hXW26CQDY6FLYsmXLlq31kGF08Ty/OdHF8/xGl8KWLVu2bK2HDKOLZdnNiS6WZTe6FLZs2bJlaz1kGF25XG5zoqv8137bsmXLlq0tIcPoYhhmc6KLYZiNLoUtW7Zs2VoPGUZXNpvdnOjKZrMbXQpbtmzZsrUe2kYQRG9vr/4dDKHrus/f92AAQkhnMo7drz757z/FduBPH/E8Pzk181+/2C1Nl9p//WL35NSMnhPZ6LJly5atr4+2HT58OBQK6d/BELroTOb4qdM8z+MNWfrk1Iyn7gKEkOf5A3/6CHEOief5Q0dP2OiyZcuWLVsyrSG6DvzpIxxgLS8nEKs8dRcmp2aK0XX81GlZvBWJPrTRZcuWLVsGtG2bln2FtO3QoUNrN2AIIbzu8x8/dRqzqhhdn9dQCHJoCBHtct3nt6MuW7Zs2VKVNqX029bU2g4Y9j0YcOx+lc5kNNCFoi4IIZ73On7qNLQHDG3ZsmVLJqtwtfUxtobokqLIUNTV92DgyX//6e//cPBPVUdsdNmyZevrrrUm1hZk2Bqiy1N3oaMz6Km70Pdg4MKlq8dPnV5eTjh2vyqd+pIt00ATXShQs6MuW7Zsfa21/sTaOgzb9uGHH67dXBcmEwqzgr33frv/D4eOnihGl1TLywme52102bJl62uqDSfWpgfY2s51ScmEHu1q7+yWrpJHGfBTX2iWC8lGly1btr522nBKbRGAbfv8888nJib072AOXWje67rPL3vSKxJ9KI260CwXYpiNLlu2bH2NtA50+QoBbNt//ud/0jStfwcT6MLrDOHqOa3jp07bb9OwZcvW110bi5CtCbANfoeh4lwXkh112bJl6yuuzQaMzVYejZIa3cF+/a4tW7ZsWaDNTIjNXDZUQKM72OiyZcuWrXK1ucGw+Qtpo8uWLVu21lGbmAfK2pQFttFly5YtW+ulzccAvdpkJbfRZcuWLVvros3k+k1q01yCjS5btmzZWnttGqdfrjbHhRg+Te+9B5sTXb33Hmx0KWzZsmWrSJtsqM0CbYIr2na16aZRW+symZOJC7HNNttsW2vTdvEbXrwtel1bjfa2lAQAyDI5AIBoy5atzSRt/662lyAI2WxOEISNdi1yYVeT/3/jAi8bXV8FAQAyWcZGly1bm0rmuCWKIgAgm2VWCLFphF3NStIG0ctG11dBNrps2dpsMs0tcWuhC24MvWx0fRUEAKCzWYQuoE/r0nlt2fqayjS0kAAAdCa7OdGFXI3CZ+tLLxtdXwUBANJ01gaSLVubQeXEW0iCIKTp7Oac60KuRuGz9Y29LDvi/MLi7ba7p8/UVX54+K0KV+WfP64+7blxKzA9PbvWX8Bxr++413fc23zM03z0TNMnNU1Hvrx++HTjx180fvT5tarqqx9+1vDnUw0fnGyYmJhgWfYnL7k4jlP7uwmbS0kBAFLpjCXoqr0cKGlnLt46ff7GZ2dbTtY2HfdcJ2uuMQzD83z5Z7dla6urfG6JoqhFiA0VdjXKH68jvaw5XEdXz8kzl2qudt3ojfWE4wOTdG946fa9hzWXW49/Tt28FeA4bu2+hmNeH94W8YYIRVEEoiiIogBEHohHzzQd97aEQvdoms6qi+O4NSrn2kkUxWSKRtdbptVeDgyMzQ2OzQ2Mzj4Yme0bng4NTvf0T3Y/iN2997C9NxroGb/dHb7ZOXajY9TXPtzUNkTWXFtYXMwyTPlnV7TnDo4/d3D8P11hRfvJH8NPvz+G7Efvjv7rO6Pb3x55/HfDP3hj+J9fH35s3+A/vjr4vb2Df//KQJZhOJ5fo0LaZhsyDd9t6DjJNC2KYunOv77CrkY1xxZCV4s/cPzs7b/UD17sWugZT47MZMZm6LEZemgq/SCWqm8bP+5tvHjlWi6XWyN66UfXyFTmNwdO3L17l6Zprkg/ecllowuha2BsbmBs9sHI7P2hmdDgVE//ZNf9ibt9sfbeSKBn/FZ3+GbnWEvHqK9jpKltmKy5NjU9TWcya+QLXjg4/j7FvOvNKto7nuz+mgyy331J//YLel91+tenUntOpl7+NPniscQuMuE4mvjunoE15atttgHruAW2LrrgOtGr3GN1dPUcP3v7D7VDB86GrwTn+h6mwrP0w4VMeJYenaYHJ1P9seS51oefnmlo8t1cI3od86xCVz7iRgZEAYiCIPICOHqmCUJ4+/78s3sq7t69m8vlZMfhOE4nuur9UW2r9oeq6kMVZL21V6omAMByMm1o9YVah9EeKjx3tU1xwHAD0fV7T3b/mQyyN7/MvP4F/Zvq9K9PpV45kXz5ePLF48ldZMJ5dPm7ewbWtJC2fWXsiD4dPHgwk83KEtVcNsqsP+jnBSGZymzCyQvsakrk2+TomptfPHnm0scXBw+cG3OfH70anLv/MDU2k47M0ZHZzNhMengy2R9b7h5dPO/vP0RWj46G1yKmOeZphhCi+wA02gxEuAItAHgBcHweXVNJeLVzQpFeOqOuen/UH4pGZxPRaCIaTYSQDSVCQ9HQUNQfKlhHtN4feurFKsuvt1gAgEQipXNtofYKw4ZLbcXHF0UIABQA5AXI8ZDlIcPCLAszOZjOwhde2jc9PZ3JZHRz05isGjC0qpBWlceeINycOnLkSFdnV3d3d2dXZ3t7eyDQeuvWrRs3WpqbmhsbrzU0NFy+fPny5csHDx6cnZ2VZlbz1zhzNpvVWQYAQEIPIdZd2NWUzrrG9CrrQLdbO46fC1ReCH9QP/bnS2MNwdkHD5ODk6mu0cWbfXPXglOX7sbq2x9evhu71hU75b186XIDTdOW30oc8zSLUMyPEAIRgDy3eCDygsjxgONFjK6BKaEzzHv9kWf3VITu3eN5Hh9HZ9RV749GZxMIXYUwK1TvD9U3hqrrQ9Vef5XX7++I+juiVdX+x3ZUyHav7IAdlYQ0hajsgB2VaNtJTRKamqScxUUCAMSXk4XF8WWZIrqACAUABQA5HrIczHEwy8IMA2kGprLwhZf2TU1N03SmzFOr2QenGrS/EVHMmxZf3zxsVSEtG8BcWMxmGdPFGHwwONA3MNA30N/Xf7/3fqg7FF+Mi6JqusQtigCIvrAYpEgA4viApC8Cwj78ry8sxoN1aDsYF4NUXRzEfVQPABHF8kjzYwsDkSR9pIp8JKl2tA00/VFXNPqwZMglzZxO07qLAZYTKXHzDRhiV6Mr96ZF1xc1dSev9n94ebzq8vihy+ErndN3BuavdE1daI/57892DS/cjy4NxuL90XjH4Oylm91VH3+SSCQsD7zIM815z4XC7cIIIS8AThBZHrAcyHHg6Jmm1/5IPrunQmrpdBrTS3/UhbgViibq/aHiDI8+vsPfEa1H6Hpmb3EGorID04uo7FCkEYRwEkKnk4KTVMkaAAAsxpOFWAqWY8XoEgvo4gXI8jDHQYaF2RykJeianp7JZLJlnlrNLEHX9p2WFdKqAczi8hjysOMj40yKwXbHf8fX5MtmGbV0RdhgeJC+iAw8UhT1xGFPXV1cXPbV9YpiBJXWF4FqTEKK99TJqq7OFxHjvWvUTqyyI0eO5HI5hmEYhslms5lMJpPJ0DSdTqczEh08ePDhwxjOrBZkSDPTdEZnGXhBiOsMbtZX2NXoyr2WgVdZR6n888fHGkcPXx3/5Gr42LWw93bsbOtDX+90b3hxdCoxNp0YmVwenogPxeJ94wu3e8fe+N07i4uLxZNMZeromSYUaQEgAgAFQeQRunjA8SCPLlZgWCGTEzI5gc4JaYZPZ/ln91TMz8/j8hiIuqKr0IViLBR4QYwuf7Sq2v/oU6vQpRFUYZhVdkC1PDg4k0kUxYWlZYMhl7IQukSpFbjFCYWQKwczuTy3khkUdU3RNG1oxFK/SqILiHnTCA2377SskFYNGJYZBcoQ1d/X33i18UFfv1q6lEnayPGF4yTVk9/2oeiIDFJkHKykh32ktCFRvrAvGAwGqbDPJ62rOAAkFdSMusLlfyPW6siRI8XcQuiiJTp48GA0GkWZ1Xy0LHM6ndZfjKWELkLsOxb99dHorz6J7Dky/vLh8Zc+Cv/yo/Cuv4Rf+PPYzj+NPX9w9GfukecODP/n+0M/+cPQv1cMPfXO4L++PfDE/v4fvtn/v9948IPXH3z/tft/v/fed18J/fUvexiG0R4Vw66mZMHyWjN6lXWI373zx+obD49fHz/ZHK5uGT99M9LcO/0gGh+aiI9MLI9MxEdi8ZGJpZGJpf7IfGh05qX//vX8/LzlP6yF0SUbJGS5fLyFuKWIrpmZGVweA1FXYYqrulEedSVy8NHHd9SvoGuH9FMnNSkdG8TxlnQUsXhEsXhfmUygy9zzWyjkQjxIZ2EqC5P0BqNLXI0utdDQQnR9cKoBiBm5gYwAMjzI8oDhQZYXsrzAcDzD8QzL53JcLsexDMcxLJtluWyO1zmACSFkOAFChYBMhqjW263kUfLkiZNq6cVHoHwREO9B28G4GPapRl0aA4akL0ySJAj7fGEQD1K+MCiAbZUQw0DYV1yfaypJBerVlkPXh1f4Dy/zf77E/+ki96eL3MF6rvIC6zrPHjjH/vFs7g91uT9QuXcppsLLvOPNvu3J7q/J7v8y8+bpzBtf0L/9gn79c/q16vRvPkv/9S975ubmGIbR6m5fDXQdOPhR3e3w5zcip29GPLciZwPRwIPZwYfxodjSyER8dHJpbHJpbHIpPLk0MD7bOxh5/Y235+bmMplM+eWW6pOaJgFxS8DcAnlusQBBK5tD3OJpRqCzfDrLpzJydOmPuvDSDLWoC82BVVX7H31cji49UZd0G+NNA10AgLnFZQCAIXQNjs31j849GJm9Pzxzb2iqZ2Cy+8FE5/1Y+72Hbb3RQHD8dlf45t3Rlo4RX/twc9swWXMN8SDDwHQWpjMwmYEJep3mukQ1KwRb2qHh9p2WFVKOLpARxKwAMgLIInRxeW7lWGQcm+NYhmMZls3muGyOy+S47Tt1rW2BBc9b/NHY0JgUUcvzyx2tHZSXUksvPkKdLyLGe9B2T1yM+Oqkn/oios9XhxJ74mJPXV1cjPvqekQxgjKQvoh29Bb2kSXzyObbLDeozn41QzRCT3lKuaWErocaqwqLMxua61qIJ/Sg65UjkQ+v8H++zH9wifvTJe7gRa7yAus+j9CVQ+h6j8pV1DLv1DK/9zBvn8nur8n8ribz5mn6zS/o336Rfr06jdEVi8W0/TN2NSULtqK1oVdZ+5/6vObcjXvnWh+eDUTr2x5e6YzdCE09iC6OTCyNTiyFp5bCk4vR6aXwxEJ4YuF2W/dfPjq8sLBgedR1pOa6UIAWWkzI8iDHAYZbHWwxwgq3slwyw5mOugroiqpGXeroMhR16UfX7PxSHl36Vt/WXg4MhvFzxzP3hqZ7BiaD/ROdfQ877j1s643cCY7f6h67eXfsxl306PEwWXMN8SBd4EGShon0eqFLZVYAiFAQ8sZJQi5ZaLgJ0aVnsT6EMMPyUCloGB0clSKKSTHh4bDnjEctvfgIlC8M4kG0HYyDsI/C542LIlnXE6wjw2I8P2BYR8bFOFmXHzAEER8QxbAoBut8QIxLyxwXRV9dDxAj0pRwT89KHiACIFLBuHRVyNqhq1CBWwldggAWlxJ6VrTtqhr/82WELr4QcnHu85zrHPvHc+z7Z9n365j3KObd2uw7Hub3nuz+M9n9NZm3cNT1Of16Nf1adXrfZymd6EKupmTBVrQJ0dXiv336fHNTz8SVzlhjV6yld/JW31RobG44thCeWopOL8Vm47GZpdjM0vRCosZ7tr7+8tLSkuVzXUdqrhdmtsTCCOGqYCvLCDTDF6DFpzJ8kuYSNP/TX71nPuoaioaGotX1IQhhdT1aWxiqqvZHEwV0NVoQdclQp4Gu6blFo+gyMWCIhuDSWZhC3FovdKElGIqGgi1kaJZLMTQsF12SqpOiS1gxNEiY5QWGE/LjhCyHhwpZhkXQ4lHor4yuIkEI0wwLldDV39e/ElotLM9PzY8OjtacrlFLR3tpTz7lRfl8FOULBuNBqgA2MViIuqRMCovKCwh9JCnNRvXEFc+D+CdDmuXoKlSgAXRhbuEFGul0OpVKpSVCNFLzy4qZjURd4ry+4ObnB8eerxz7mXvsp+7R51wjzx4YeeaPI//xh+Efvzf87+8O/eidoX99e/Bf9g8+8buBH77Z/7/f6P/B6/f/+TcP/mlf3//7at8/7L1HvBL6+z2h//li71//skcnupCrKVmwVVoDepW189T0DHmqprl9sK1/+s6D6faB6a6h2d7RueHY0vjU0sRsfHI2Pj2/PB9PDo6EPz50dHh4ZC1WGB758jrHA3ZlcktgOCGby1uG4WmGTzMCCrYK3OISaU6GLgNR1xBGlx+nJ3IwmoChWYyuUDG6pJJGXVJhdE1CSDgpneiamplH6NK5hMnc81uIW+ksTNH5kGt5vdAlqJkAOT5vLA+ZwlChLDQsE13SqlsVdYGMALL5eEtAIRea4sqtnuLisiyXZflMjs8wBXTpm+tK0Fmo5Hn77+URRS/Ti7OLMxMz/X39tZ5atXTZ7nEgUlRPmXNdYSD21LWI4rK0fuIilC5E7InDurqWiI+UrzbsWRYjLaYXWOo0jQpUM4Qu2SyXFF07Pxj9+cHRn7pGnv3jsKJH/oe9fcQr9773yj3T6BIEMLegK7jB7xIqjJ+v3Afkx6IEwAqiZAIFIMdIMzyd94p8Is0tp7ln91ToQRdyNSULJtemQpcgCDf8t6vPXAgOT98fn78/vjAQWRiOLUam49GZpan55ZnFxHKKTtPZL770NjY2x+PxTMb6R8QPf9nI5VfACzlWYFiQZYUsm1+RQWf5NJMPtlI0l6Q59D0tF6HLQNRVePq42uuHEFZV+6uq/RWkv6LKH4rCRx/fUd8Yql6NLsQh7We2KCcB4SQ+kZOa7KgkiMoOtce5sAAAsen5/N24vqjL3PNb2GaaHlm+/xyTPsGkG+Dg0zNXH1lebmCWa5jB7TM3HinncaViy6MLKBsnQZd0dYYsNNSLLh1Vt4IukBHEDI/RBRheyHJoqDAfb+VyKN5iuWw+3uJpRkgzvP65rniKhkpzXRhRqaXU/NT8RGRChi5Zumx3NH0linGNua54T11dIWDqWT1g2FNHimI8UirqQuGaL6Iv6tKwMtCFKtAQuopXZyB0oZSdfxp9z5uoOJN4+8uEokd+8cjiL48s/cMr98qZ65qeWxJ1rIYgvT5YmPRFf4EoAgB5QeSByOUnUMQcB3IcGosC2fwECk/nR6G4eIqLp1id6EKupmTB5NpU6IIQchxXf6mhuubs3dDQ+HR8cj4xs5hcWE7Hk5lkOkNnmLHxyOka77nz9YlEIpVKrcXbNA6dbsxzC01urdxT8HRWSGf5dIZPZvhkhkvQXIJG3GLjKRaj6/s/egHqjrqqG0MYXVVePwq2ULwVikKEruoidBVLLeqCEFKTkCCc0nWGCGAaUVf56NLz/FYkEp2YmJyaml6+/8L48UdgZDvkz8GJ58apR5h0Axz9/sAnjzBd311YWLQWXUBcGRWUGZrfQpZjYZaFiqGh5egSQAaI0pCL4QSGEwrzWzyb43I5Nj9OmM1xWYanmXzIlWYE/ehaiCegOrroZXp5fnlmYkaGruJ0GbfqyDq8RkMDXVLOyZZpaAvVlc8XAWLEFxHDPlJWjVRPfH3QhSrQELoOaurnB0d/6lYNuf7xV33fe+Xe9/bc+8df3ZPutVbo8vgghKIImzqi2BrbIldbw7wALvpHzt8Yqmse8Dber2m49/mlnkxOOF539xNv28c1gQ8/v3Xw1A3X8eZ4io0n1xhd0GJ6lYsuAEAul2tqvnH46Mka77nWjmAkNp1I0dMzc8GekLf27MeHjjY2NiFurdE7DD/+opFhBYYDWbYwSJgT6Gz+niKd4VMZPpnh0SBhPM3FU9xSiltKsj/91Xvf/9EL2P50+DM96Kqq9uMXPlVV1z/6+I5iM40uhChZ+IUkGz+UCgDwcHLG0ApDc89vTU5OLi8vZzIZJl0DF14eP/UtCA/D9D6m69sQnhg//i04+n1m4f3p6Wk93k2nLH8RlAUoBVnELTROyK3mViHYYhmWZQrrMgohF59mhFRWZa6ryCCEswtxCGHxR0MDQ5HRyB3/ndbbrci6OrooL6WWjncMxkWKrAPxHunR8gOGoggKazSkUZHiXJeeFYZ5gEWUnyQrf5lGSeEK1N/estns7OzsQ3V9cPIKGmpT9MXo/jhBc7t+VzU8PDw+Po72MvQiKEEQpmcX9AxQHfU0i9Kn8kX81laR4/MvZGA5IVcYJ8zPoaya9efiKXZJN7qQqylZMAVtKnTBAr3GxsKXLjd8dOiT1998+5e7977+xttVHx2+cuXqjl+8MDk5mUgk1u7N8R9/fg0FW5mckEE3tllB+t0kaT5Bc8t0Pi6Op9ilFLuYNBl17XVX1/tDaJBQ23a8UaWBLgsFAIjEpvMhlyF0FS3VQ0FMMS0QITAbmHQL5FsgbIBwAPItcOEDCHsgrGGYhuWFc1NTU8XLCkzLqhcvSZ7rKstdbt+5TxAz23fuE0B2+859PGC279zH8bntO/exPLN9574cx27fuY9h2e0792Vz3Pad+zI5fvvOfTTDb9+5L50F23fu04+uqdkFqISuG803yKOkzE6eOKmWvnIJOgOdtbPy6l8WnWhrpQJ1q+QroD44eQWt+VL0xcuF+Ygnd74eDocXFhbQdFcmk0G//aRTkzPzop6o60yzCCEQRWm8deXO2EX/CMcDabx18kL38bq7GUaQxlt/OHr9ncNXl5LsUkIvupCrMeOnNhu6IIQAAI7jMplMIpGIx+OLi4sLCwt+/50jh4/v/fVvTn/5ZTKZXLu3IH/0+TV8N5Fh+PTKSkIuiSa3aG6ZZjG0lpLsYpJdSLDm5roghI/tqHjsmYpHn9r76FN7FaMubGt0yTIBAMIPJwEAom730XCpTbZsb2V1BqfwriNECMwGpvfpmaZHYORpCBsgnIFwBsJzcHT7zNXvztz47tTUtIXuaVO8OX511JUfJxQKSzN4hhOY1SEXly08fZxheDrH0wyfzgrprJDKgFQG6F+m8XByBmqMd20wOSy1NaBj6QosspKv39WPLqOrCrEJApiYmdNDiKP4NXj4tQyCyK1+B15+aQYjZPJPBwn5OZTC3H88xS4m2Z+/+v7ExAQexNZ2NWb81CZEF5IgCBzH5XI5tD4nmUwdI099+ulnP9/5i8nJSZZlLTyXVFXVV/PfiuRx41RhhDDfkgrx1mKSXUjmFpPsQiJnboXhJhQAYDQyYSieQOgqXqqHFukV0wIRArMBLrwFZ56G/AeQb4CwB8IZyNfA9D448zSMPDc1PW2hGyutmWMAACAASURBVNokL17ChtCFoMULDM/jt2aweJwQcQsPEtJZIc0I6SxIZUAqC5Jq6Cq6dgjh+MNJaCRoKEtbjnalKLhSgbrbm86oS5tbeXQ9fJimaVPoBbGpWT1R19EzTWgXabyF5rdYXpDGW5942w6dCaSz/F++uPVh9c0/V9/84FTLwZO+yk+b0BzKy29/ODU1hUc1tV2NSVdlHb0s/uVKqQAA9ReunDt7cdeLL53+8kv0EpS1OFFV9TW8IiOV4VMZLpnhExm0IoNFKzKWUtxikl1M5hYS7EIih8x01LXZBAAYDj80g66ipXpodUbpAcPlBsg3QP4EhANw5i3I1EDYA/nDELZAOGBt1LUGb44vSx+cahCElaUZK+sy+PwUVza/pJDLMByNhgGYQryVFVIZkMyIKi+mkl87hHAkHIXrhi7Vb2HTqkTjkVSg3vZW8vW7H5y8ks4ooyue4rCVE3UBAKITuqaUjtY0AfQDT5IpLjTLlWNBjgUMnv7P30Xx6SyXLsRe6cLo1DLN/f7DE7OzswzDaKMLuRqjPiqvLYEuCOHoyNjxY58dO3YCzXitUeBVVX2VRl8D4haN5h7Z5TSLgi00s7WYzC0k2YUEu7Ccm1/OzS9/paIuE+iSLdvLv4qChVlW+WXtUjYwyzUwsn38i29BeG75xiMw/Rbkz42f+haceWE5fW4Tomt1lFOWPjjVsHpJofQthSzDcvmlGUxhXUZWSDNCKoMMJDMgQRtA1+DIOLTRparS6CpUoAF0ab/D8IOTV1JZTgVdLLb1QdeRArqk8Raa38qxAMdbH9cE/vLFrQ8/96ez/KEvbx+rbf3sQkfN5U5vQ3fttSCaYTl6+sLCwkIul7PRBXM59tDHx9paO37hcNbUnFmjwOsvn11NSQcJ0ThhfoSQW0qybx04rMf2vXd466JraBSjS5ekD2kVmyItpE99Lfc+PXD8W3DmZQh7Zs5/G868wDBtMPL0wPFHlgdfnpyaEgCwytbgzfHlojT/6LHAFLjFMuhtT4Wl8PjR4/w4IbIMSGbEZEZMGkFX/9AYNOJ5sanVpzlPqiZLz2JlwZAkFVhCuOR60KXoghcT7FJqxZ7c+XokGk2l0ybaPAAgGtOJrusr8ZZkVeHKFFf+HXg8neXpDFoKIMxOhy9/ue/mubc6r7zaXv+rjkuvtp7778C5V25RL3/2wX/c67ymgS7kakoWTFUW0Wtt0QUAOPPl2foLlz/66PCOX7wwMzOzFoHXh59dTWZXlhEup9l4Or/cczHJInSt2oGHDDIGMgxcZuByGi6n4S/2ubcuugZGIgXfp0uZbHZ+YWFyakrRimkhe+prpumR5d7tTLoN8gPLd74NF96CcBzyA0zk/ZlLj6wnuky9Ob5cdOVfmSHkWC6Xyz/CxeWnuNBSePwI1wq08uhK0GIh6tK1TKOvfxhCqOrjjC/H0PSYlsHD6rOYRxeqwJI5ZejSeIehBrriSQ5bmegafzgFdBDi8Jd5dMme3zp5oZvJAenzW5UnfAdPtqSzwnGq1V+/f3KYSi50pJfupGcbU1MXEg+ph6FPaj/6lxvHv79v1z9poAu5Gn2eSUlbAl0QwvHx6Id/OXznduvPd77g8XqR77D2FB9+1pDI8EkaT5DmJ7cKKwlzGF1PP/sC5OHh4zXbf/LCWwcO9wyOv//hiW//4Lm3DpyY2eLo6h8aB0b8AprYo1Wk8LL2Uk99bd+5LxKJTExMTE1NLSwslPQU6lJAhbww5b053pwrwfrgVAPH5+MtHHIxLH5rBpfJcYXJVyGdFfLoosUkDZK0mKDFZbV3Kiot0wg9GIIaqwy0KtL6BXtryhtT30uJc61UoO7imUbXkztfl5nRHzqRKhzVh67T1wUBrPzSU+G9QvitGfk34WX4VIZPZbl0VqAZ/uKXr3tP7W8686tzx39x6oP/OPLu9o9/949/3Pv/BKr/YfDCY284/lYDXcjVmPdWWwVdLMt+XHXs6tXrH310eOcLjrUIvP58qiGR5pbT7HKKRU9uIWgtJnOLiRV0Pf3sC08/+wLDw+0/eYFh4Pf/5bme++Pf/sFzy2n4yPeenlne2ui6PzhmqGPoCXTUnvpSezV7bGJiKR5P03QmmzUdYxXLujfHWxd1IWihKS62sDQjx2UZPv+EBoO4BVL5YAskaBFxK0GL+l9MBSEM3uuHGlGX8fKvT9RlNe2Mnj0vXIH6u4ae1+8q+t9INCqz6ZkZOpMx0xEEEH44qWeF4eHTjWhphuz5rU+8bZmcIH1+690j1/5wtDGZ4UnvnbPXe6gLlw+5nLdObg/WPNHr/bf+c08PX/q34fp/fnjpf/3+pe9qoAu5GvPeaqugCwBw/tylQ4eOtvhuPr9j51oEXghd8XR+ZgvZyooMHHXxcPuzLzA8/P6PXmAY+N0fPtd2f/yRf3p6Jg2/9Xc2uuTo0njqS+3V7JNTU2maNg0tDXRZ9OZ4y9CVn+Li2Ty3pK/MyKFxQkEyv4VCrjy3lo28mApC2NV7H9roKgNdqAL1d42Sr99VQ1cqnZYZncmwHLem6Dp0ujG/pJAT8c/BrzzFxeTXXaPXCSVpLpnhU1k+kxM6Wps8x37DJJpyiUvM1ElmyEV3vjLn33Gi4p9Of/IbG10QQjg/v/DH9w+ePXvhzd+97dz1y8XFRWvx8MGpK6/9kXx2T4WavXXgMJrfwvHWMgO//YPn2nrHUbz1rb/ZvtXR1dc/UvAXuqQHXWpPfam9mn1N0WXFm+NLo0uPT//gVAPL5XLcylNcGbykMIfjLSGdQU8fi4hbSVpMpMVEWlymVdFVfF4IYWdPH1Qf77KWQ1YibZ0m4UpIUoF6VfL1uzRNK/rfMlu+DF2j4zGggxCHvmhE44TSeAvNb9EMj9+Xsf+jK29VXfr9x1eSNH/Uc/vc9eDRqrcWIqeZ1FVm+jMm/GG265VEqyN8+ccVL/9djslooAu5GvPeaguhSxCED/708f63K97+fcXLe16ZnJy09tcmf/KSa25ubmpqakZFbx04jLj1/R+98PTPXsbzW2294/veO/ytv9n+8nuHx7c4ukIr6LLgdrX4Ze3Sp77UX81evGROTQacoFVvjsdkNeNwV1fOC28eRi9zKsd0oqu9qxeqR10m3L2FhzJ7NLVGYRntcAZcgfrbW8nX7x48eFDR/+pr+Xo1Oh7TE3V9/MW1wo895X9cN5tD8VbhvUKFkGuZ5hI0l6T5VJYfHx87dehVJnWdmf2CCX+Yufty4vaOyevP/mXfd7q9PxMBr4Gu0NcHXRDCRCJ57tyFEyc/Gx4eRk+9WXjwXC6HXu+bVRFCl2w94UwaziznbXwZji8YQFf+V06QkfUrVlW/F5m7fq+7eq+72sLL1BBuT5Y4I6D0snbpU19lvZrduL9bgzfHG5a0PLLFmeqaVrcptJglm82uPo+8oiCEbZ090CS6Sl+L7lahIcO7GEaambPLK1B/26MzmemZmeKJK2wq3DJwN6bDwIi+qOujz6/h39fN5kCBWyj0z3MrmUFLr7nlNJeguVSGr6eOPbxPMnNfMtFD2eCvl2/veNjwtP/kk5/8jogNtrAss4bogtbQa53QxfM8TdNLS0uLi4s0TfM8b+HB0aPEP3nJxXGc4t+3Dhz+xT63HkOvt9c+XVW1v94fis4motFENJoIISv8+CR6o7w/FPV3ROv9oR0V60EvURRDD0ZEUdR2TIbQZSKwWDt0WR3llOWIixZnZlSshNB9krZPhxC23g1CraBBVQIA83Pz58+e1//VrxdU1meXPLpkFViyvbEcR2cyxRNX2NYFXeJIWFfUVfXZVY25Eqn9dO97zt9W/ub9w+5Pvvzojy+mZr5Mhg8lu/bG/T8bv/hvbdXb39r5f7Z++eMDr37vnZf/Tu3U2NWU5bC2ELpg4RW9HMdZ/h5e5ErKF03TetBVUe2PziYQujS45e+IVlX7pehCP2iC5CQIZ2Wl9HcmKwkCwg4nNan9c5SKP/EFAOh9MIwdVvmm/dSXms0vLBStLRTLt0yWmV9Y1AxitIIbLBzlmCb6WjtiRXTdae+CWlM1Whw6f/b8hXMXak7XSI8ZBkDx9yHxr0QKICwrRjAOghQFQFx64mAcUCSFf2cZADEMRIr0FVJURQXj+PeXdZpxpq6gq1CBJU+h11QmumTZyuuDgjCi76UVDMPMzc3FdGhiYmJycnJ6enpubu79//7bB63v9Zz993ue/6+3+u87jv3tbfLvL1T+z8Ov/839Sz8/8v5/aURdyNWULJiWtha61k7otb9WqSRZEbpQUFXdGKqu91eR9Xl0rU6UoQtrEsJKJ9UBOyhnJfpdLpQCYYcsm9NJwUmqZA0Aq9HFclwmm03TtCHLZLNF66ksQBfL8Zksox7caJhylLO10HW7rRMqoWt4YHjw/uCDew/wRrAz2BfqY5gcOsv5s+fPnz1f66mtOV1z8cJFKbqClE/GIaQwAD7Sh9FF+sJC2KeGLgBAHACS6gmHfYosjAepOAAkFcQpQYoEIL7O6CpU4FcTXYIgMAyT0a1sNsswzMTD8Kk/7/zLm//r3Rf/7zd+8T9eff5/vPJf/9evn/urn/3w//j9r54YvH/XRtdXUBWkPxpN1PtDOOXRx3egkEuWKEMX/m3JDggpZ+UknMS4QikIY5UdUC3k0viV5N77Q6jHWkILq8wUCYw5LxO2ac+i+Ejyrda7UMnzjo+MMymGSTF4g16mbzTf6LzbJQVkU1NTEZ/EArrkxwyLoo/0SX9MEv3aZDAOSJKSEkgAcdll+sIiAhIVjId9pOIFyo5DkuRSkCqnMkvuiCuwnO9LZnoGDMvuOGBkLFruuNwaCLuaso5io2tDVEHWI3TVN4aqvaFEDj76+A40TojQlchBlFhV7d/xxgq6cBRFTcKOSqc0qEIpKFtlB+yoJIrP66QmNdDVs3HospBP5qBieBfBsGmWTVnWeEkIbwUQuuQaHhhGxMIbqaVUsDPY0twyNDiEI4/W1jY5nwAIUj4qGC6Ok4LBOh/pAyCCcpK+CPoh42BcDFJ1MtqRvkg8WIeuiArGgxRJBcMIWqQvjAIsxZrBUZcs/DLxvZSsYUkFlrpvsBRd6m1SL7qGx6LlEmINhF1NWUex0bUhqiDrQ9FEdWMIISqRWEFXdWPI3xGtbwyhRPRDydJ9qUlYSTidFIXCL0wjKZak6KrsgHhySxtdwb5BAEo62fWGigmzsACq+a1zkRog1Cqz7iXgEEL/nQ6oFDQgYt1tu4s3xkfGL9VfOvnpyRPHT2icHaELh01SCwMRoYv0RdQmw5DCPhKFZfFgnS8shn1kMC6GfXVxIFJUD4j3UMG4EPb5wkC2oxD2UcE4CrbwhuW3FNKoS1aB5Tewch7q0n1SMDS6SdGFXE1ZR7HRtSHKo6s+VFXtTyRgdLaAro5odX0okYA4sRhdEEInNekkCGmwJZvoMomue19xdJnhinUcMuU9DcepxeWBEN680w6VBgzv9dxDwRbeSC2lpmPTQ/1DNadrcNTV1NRUhK78gCEVjK+emqoLr57rwobgpHGZKCwTQFwA4lKBXjgPFYyj6A1ZfgpNKKCrnFuHUvlxBZZzq7ER6BI3L7rubQ50ibYMqqIKocsfTcDoLAxFpejyRxOw2huqIv0IXU/trZLtTk2IBOEU2ytFUZwQRaeTqqSoCcqJM1S2i+2VBNp2UhMop2xbJgBA970BAADPC2ZCCn3GC4JVZubsvKBmJnZRNQGomGXXrmVF5YHY8xZdHSLWrRu38Mb1a9evXLwSuBWoOV0jFEoeaG2VXUtYAEHKJwhxFBihoyGKjPGCj/TxfBidHf/rCwtjPhIVUrpN+sJ82LcgCNK1GHilIi+EeUFYEIRuX3BMWPKRPl4ILwgCRQX5pSAvCFRwaSFISWpArfINf5W4loor0GgrKjZFz2ttpwBAHByJWO+8yhZ2NeUcRLECjR7ERpdh7a2qDw0lqr3+6CwMDcF6f/TRx3eg1fCyxGJ0IVZR7RTldIrihCiK1IRYSThFsR3nweiaEEXCSW0Iurwx4HU4BSFmo2vToquzvRNFWnhj6uHU+Mj4QN/A6c9PC+oY0Imu7gWBJCl+zMfzK7gifWEpkzCEENJ8JNkdDKJPKV8YfeQLC3zYh0DFh33dS0I3RfHCEk7ZcuhaI3p9TdBlCbdENXRVtotqi9xQfIC8qloeykmI4kS7KFLOSuSgRVFsF8VKolLqo7GIynZFp6zhrDdQe6vqQ0PRKrL+0cd3YPN3ROs75InF6MJYQpdGTYhOwumsrMRhllROaqK9kiAq23G1qwkA0BXqB0DVw7paBY+D4IWYNDEgCATh5lvdhLsVfXEeB+Hwtsq+zajXITtaVBAIh7c4nRcEfKhircqv4j4IV6uLIHi+tfgjb0xwEA4h5hUEQVh9oqjXgYqkdmqvgxCEmCAI7lYh5nVI8RwTYm5HrSC06cezJyZ4HA5ZZaICOAiCj3mxJ2oVgJtwC0KbuxW0uonSTC06F/a8xR/dbbvLpJiLFy7ijSsXr6CoC6ELjVBdOHdBNmY1JgjdlI8XlqjgkjROWghSY4KAYqPuJcFHUghC6PuiupdIkhzzkbi0Y7zQTfkEIb4kAJIKUiQpLAXDAqAoH0lSC2Efv7S0IAg+KsgLYdIXRruTvjCOtFDQZtStrzZlaVQglrtVaHUTK7sofSOugBD1ONB2lBccDi8f9fK8oOh/LegXBQMADIyMW+q3rBF2NaaPsOboUvSVaumK0omuCVGsdFKV7e34u3QShDhBiTrQhRArzdMuigRRKT2IWiJCgjSlsl1E0NW+rr3u+lUPIHdEEbfq/QVrjFY3hqobQzJ0yQIsJzVRSRDoX6KyXXpqNKgo5RkqrUbU1dWrjC6HNybtJy6CcLW24m1eaJXmxL0Ie2dXq4ASXa2CWt9D4lvdqIuijWJ2lkSXwxPzOAhXa0xGWdklEAThcRCE24tO5PDGis+YP52aJxIALwBPDHgczqgQczlqeaENJeqZU8EhqTcGCMKJiuQgCCFWK80W5QXC4eUDbuT18LZmzKeALrTKoPij2zdvo9UZeKOnsyfYGezp7Pmi+gtcjAvnLsjcvRRdMnJgdOEUhBySJLspkueXpKXtXhDGfBTVvUSRJL8QpHxhfiGI0imSEpaCggCCS/nV8ELYFxYASfqCFCkIcVQSPOmVN/UpIsPRmI4KdLUKATeh2MDwLYi0IbkCK11A0f9a0C+k6BoeL3NcTuo99PttbWFXY/oIGxx16ZE2unCkRU2I7ZVOWX70qQa6UNhX6SQIZyXOgxJRCSvbRQQGxUQc/VATIhq70wgKZdrrri5+cYaUW/WNIUV0OSvbpeCURVrSGEuRoLLxQ6kAAJ29DxTRFRUEl8OLEIXghHusrAt5HERAiBGEu/hL9ziIaKsb9TGHN4Z3x9uYH+bQhTx7wEUgp+NqFeRYdbeiu90AL7gIN8+3Eq5WPuD2RPOI1birLXgjt8uR33S5CXSZHgcRFWI4XCuuFsmtet69Eu427N28rbXFw6rIYgIgHN6Y14Fv6lsFwUG4C1GjyginErrQ2u7ij2o9tSc/PXnq5Cm8ceL4iWNHjx07euzI4SM8L5w/e/7q5asNlxsuXbx06eKlYnRJj4YjMDQwKPtXsbSFRRaCIAhLhemuIEUKwhL6N+wjpfmXBEBRQWEpiKI0NB8mCGGNyy/fFCpQch+Tb3Lozqlw6xYVBIfD64lJGoaLCPBCwOXGOyr6Xwv6hQRd/cNhq9BVPCthWtjVmD7C1o66pHcBeBvzEnlwbXQhyby59BvCHykm4iPjQqoNWhZrr7u63h9Cb+DVtr3u+qdelC/TWCPd7XkgiqLirAwKoTyxWMDtkN5sYgsIgotw51HBCzwv5JHAx6QDJg5PLO/u+RiOIVAidgGIKNoDL7LwAsVzKx27UACCcEjHalwOb1RodTi86HYY+QKHuxUP0Em9gJ5tVC1RIYbRrtNwSKo4cogyEIQj5nXKfH2rAAjCXZyujS70MgjV8mjGcG2BttOfnz5bd7ZMABiaB1o7DpkwtQqU3uugGMvhiaH2Jh0YLITpgsvdihpJQBA8DrfygGH5/aJgAIgPykCXRuxhNAJRczWmtZFRl/ZEFxLlJCbEdjRMlwdSe2UlUdkuthPESpyEhvLQMZ1OSpygEB3NoUu6Nk8sQFE7EW3I8pTUjorqvL2BrGrHG1VP7V1tL1atG7cAAHd77gMgX1CgOAPkcq+Kq1BEhbcdnqK5Lo8D9T3tbxz1UqPoItytHjehOE3lIgiHxyuNlqQfEW53oNVNEO6Am0BjR65WoFY2KbpcbgdCuCK6VB2x5Fow1xFfi6vL4Wrlo161QxHutsLcm47lAIVX8Jly3GB+fvH8ufPx5YTOJScmEKWnxnSapSDMX6ykAuWXL7uHc3hieHRXhq7i0XL9A4bG+sUKusCD4THTDkHq0CYm5OM3hiIQNVdjumxriy6jkgVYiomIUnh2B8lJTVRWVk5QTic1gUbJEK7MoQuNueFPEaUUE8XC7FElQWB4IdDqme7abFJDFzZ0q4jig5UhfknIspKHj0m9s7Q7oe4n7djYlQdcDtNRl9Qc3phiTy7eBY/AOLyxqNeJ0IU2JNt5D4UHggiHVzouKhsw5FvdOtFFEA4HQXgCXlxL+J4dX6+iI9MIudTQFejoNo0uo6slv5LoKlRgCXThpotCfLRWCH2PUa8DD/2hXqPofy3oFxahC0tjlsGcNhO6ip6FaweAcrpFEJsAwOmsFWO1xSkoZ2UbmKh1Sndx1sZQijQR/1tJuEXQJj0XVdtW2RZrr3VWOmsr29ooJ1HprhVBG+FuE9vcztqY2ObWeGxvAgDCWYvzVLaBdjeBPyXcbRO1TsVE6UHQudBf/K/e5wY3hwEAOoJ9aHE8v1oOT1QWr7gCgYCL4Hne4QrwUQ/KwwdcnigfcDkIV0DmbT0OguOiHMcTrgAXcBUf0BMJBFwOnuN5jidcAT7gQttScwX4qMdRnC4zhyda3JMDvCCdgXMQBB/15E/E8wGeR8RVowVBEDGvIyYIDofX7fXGvA7kq7xRwetwxPiY2+EV+FaUyGsqyvOEw4PqhOejqMZcAQEFiLKSCzzvjfJeh0PgoyjJ4YnGPA7kpJXXxRUJQth2NwghVHX3xk2TH8pSK7DqyjyeN3EWDWnAVrtQShWYlyvAo46AhGJljK4An7+nQe0W9RGe4x2uAB/xBDheO/BS6xfcanMF+IjHwRWlAwAeDI0iVpgwZ6184YlMUpdoztWY212ZW6YOpbwbcvfF6JKSiYoByulEZJJSCrt+bXRRMdDudooS/okS9phGF+Uk0BnxR4qJxVda6axFZZOWZ6sYAKCjuw8AUNw3PBHeRTgCXMDlcLkcLo4LODxR1FscrgAX8aA8HofD4QlwBeqgFJ6LSrlCuAIOhyPgIghXAPVntIE8OOr/mCgy5dGFtZpqah0MlTPA8S7ChVfMIxeDb2MLAWJU63Sr002ha1XUhScCke8L8DxBuBBTpbvI7qklkZleQfwryQZ9tyCYo5oJmeCT4V1MFxhXYPHZ0deHRhECUa+LcHFcALc3tI3QIrtdQ1Ke7vI4eF6zX+i7pQNAfDBoHl3Y5ToJN4o0JmIxa12Nud2tRJfi+zEBAE53WyxW63TWglhtGwC1Tre7LdbmJtCnMQDQR+hflAGAmPQjnIhS2mK1bsINQBvaxd0GYrVO6YbsmAAAZ20MtLnVSoh2IZy1OI/0X3cbqHUS6OzFibjYqEjSPIS7Tfukm1Pt3fcAABzHsxKLcLzD4WEjngDHn3G4Alz0jMPlcHnYiIfleIcrgDZYjidcgQMEEeACaCJJJi7gwlEXIiIKzhBaUBdFnS6fp9AHcUkOBPiIx4H/Lb7NRIaxKjWpK8HEJVwBlytfVDSMqfFcl4sgFD2Rx0FEuCgKpAqxVEzRq8ruBjwOB8dFUWkxljweB0G4FR8Dko0aqYWdip73bndII+rSBISKwzceD2mEyppHUza1b9/ELiUPVVyB0ogHN2+HJxpwEcXtTRYVuQK8w0FwAQ+nFnXhfsGr9AvdUdf9wfyPx5oT8mnItdbGgJNwglhtbW0b9n5luhpzUqw0c4fS2q0YQvgjmX+vjYFapxNnQP/GQJvb6SacbidBoINI0eWsjcnQRbjb0AaWBrrQFyN1TyhnbeFRGzdB4HMpJsqwh/NgPG8ttXWFAADFfQP3Ro/DxXFR7HY5nne4AlzUg7sW8t0cH0W9zuNwoG1shCvg8bjQwgTUDx2eqMdBnIlEAy4HRqB2CJU3FT+YRxcvSE1pwNArnTzgiswVEIqPI0nn8TVG+KjL4eH4gH5HjKKuAB9Dy/RXlzx/IQGel2KMX/1ol34MQAi7e+9rosvEuJxx2BhHl8W0Uz2awrcvNVyBOAUf0+GJoTUUDk/MRRAc34oyoO+X42OyBkO4AqiDEK4ASlR0xOgO7IyhflF0XQCAvoFh095Ayi1pCFHbFmtzO0vursfVmJCF3AKK6MJPrqhJGrjgzDLqAAnqFY+MKYLQJeMWyomYZ/ravlZq61RGV4TLT8+gm0pp5IQHDPNdkZNPjGHhfdWaRMBFsBzHchzhCrABF9pmOY7jBGR5F1D4F3dRjdFC3LG1Bwx5XsDXqCWHC61UxJePKB7hoi6HB4d0JV0kXvTs8MQKdJSjyxXgHQSB6lZaNjxrqB82EMJg6AGE0AQGNOChP+wrSTvV0EfrRGqkUd/F6FkKGVYqUCW2Q1OVPN8a4Hg85BDxOPAXFwm40IZ0OAH1lJLrDIv7hc6oSxCEvn7z6MKhRfEtPlH23TlyNSa05uiytRWlhq51MAyqYlthlcyMOykrvafG5Zi5uzd8FkPoCt0ftNFVDrryFViq8k20CpWoS+A4Qb1H6OpTZaILSRp7SVVyIkZbmwdd1v5mhW0bYBDC1s5eCCHHq1KkajY0bAAAG7pJREFUqAsZls4j6+qo6t3WTIFVPIvqoTSchuopDO+iBQIVKThHCO89GELfrFFA6HOScqoaRJr6tWh9XwYrX30X9a+4uAJxvShLqxmrnF1twJDTvJ/T08IBEO71D4ki2HDfouZqzOyrjC6TJdlm2XMctm2cQQgDd3shhJq9f3VHZS0zzdMom8bR1Fyxlsc1jDsT7LJWes8OIbw/MAIhNBEoGY65rEW3xTJ49kIbwBVYEkQa1aLa8lkVeqm3PZ19CghC6MGQCMCG+xY1V2N4R0VulVESG11fBYMQBjp6NiO6SnkWQ1QzXLD1CTmt8+nFThNCODAc1kCX1tHWA2maV2PZrYa6SrUiXIFr1JBUAi/18upH1/3Niq6Onk2BLs0HQ2xtDUEI73QEIYQsx+XYtTK1bqa1i1qvN+FBNPBhmLWqXtXE2VUPZXzIqNgghEOjEY25Lv1DgSumDilLyqxdLVo1Y/wrK/ld4wos/VWaapOKHhlu22a0E8n6kSAIvffR755vLmFXY2wvlVoqpyQ2ugxrdpGu90fr/aG8Fd4TX13vr673V3v91V5/ldd/+uKNByPR9SkShPB2exBCuHZ80tnl1h+cJgpgCl28mpmBh26oQAjHIhPSVQb6OWSGdpbOm6mjS8WMo6vkd40rsJw7sBKnMEIvnX1KEEBP3yZFF3I1BnZZA24JNrpM6Mqdh1CfHv/Zq9Idi38WSCbpb2QgEe7W4sRi2ej6CqMrEptWRNfgg8GBvoGBvoH+vv77vfdD3aGF+UWOV03HtsDxJNVNqqibIjl+geN50jfGjfk4nl/gV+VvJkmOG5MVBh1zoZsqLifZPKZ2rvluCldj8xg/2kyi2m4e5bopkmUXcP1rl7mLInPsghq6UAXa6LJEmwpdpt6D9jW2en8Iw6miqjpv7qq9FVV736jY8WIF+iiRSDz6+A61g8QE3uHwCDGPLN3dWuI5J6HVVXw0AMDt9m4AQI5lyzQNlX9wXQVQ6c6au5Sc8tB9KDWZGTEzOkGjPGA4MT2nOIs5PjLOpBhsd/x3fE3NNJ0uTm++3pxOp9UK0zzGLXRTxQWb5ziK6mYXuvEGy3GjHNdMNrPcGMtxzWOcGkuQ2LFmluPI5jG0IbPmMW6+m8L/Us1j7Hw3rm+qe76bIll2Hv07x7JNVHeOHcUbIyzbRDaz3Ogox3ZTzSw3L4vTZBWIU4w2PO0Gg0ydXia7niCAnr4BAMCGuzs1V6Mzvzq3yi3JNhPP6H/Nrd4fgjkYnYXV/oRisLWjKhFNwEQi8dgze2X7utWfwBUCLpQBvaEVbwg87/BE0aeEK4A2ZAYAuNXWDQDIlY2OnJZYo2YmhlM7VI5TNcMy7qW0ymz4LPrZBSGcmV/Sg67+vv7Gq433791XS8c7aoRBK4EXu4DLgGIglDLGcs1kM8eOofSFboplOap7AQdMeJvqnmdHm1mWJZtH0YasZppHufluCm2Pslw31dw8Mq9YntEmcp7ltCNFDDmZcAWuJKm0onKasSq6jPWXFQmCELw3AADYcHen5mp05ldFV9kl2WbqmY2vteobQ/5Q4qmKxFNvhHDIVYFCrr0VO3bsfcqdeKoiGoomduytkO0re1k1Vv691EUvei+W4u4QQn9rF4SQybE6Ta3/MLmcuuk9eDmmXjDDu6iaBrstZLAVo7IQwrmlhOICORmiWm+3kkfJkydOqqVL95ViQ3Eb4W20mWwe5ZpJkmXHUAaMEDSgR3UvoPG6OXaBpLpzo805lkOJGGZk8xg72lxcful5EfD0f2VU93xutFnj+8KGK7BkQ9I4iJ52q+ajjTT+lb4mCKD73gAAwHr/VZ6wq9GVWaVOLCmJjS7Dqm8MPfai/6k3Qo89UyUPuHIwkYNPVUQfe7F+R0X93ooq2b5SdEnfbo7RJc2p8alMEEJ/ayeEkMnlGKY8MwEbdR+tvotheJgqgHXDmFqIMryL/gAOQriUSCuia2xoDMHJd93HpJjl+eWO1g7KS+F0JsWEgiGcLl1K1zyqOtY3302hU3fPs6PNlEYEWTJ6G2kmcyxLNo/mMbO6ZjC6RlmOJJtHlTI3jbJdFJlj56lu5YBMdi6Jrcx1oQos3SaN3Ou89/6B994/8Nbb77z6m9d/uftlDXrp7BEyEwTQfa9/s6Krsxx0WVUSG12GVd0YCg0lHnum+rFnqiqqqivc1atCrmf2PrajekdFvb8j9NSLWlGXGpzUXuvnIgieDygWCUJ4M2AQXSZCIkbZ1gddJszM2S1El4k15UpRVyKdVUTX6OAo4tOl+kuIXuHhsOeMB6eHgqGz1FmcLkOXdtTFslz3PDfaTCmO1OE5KjSPJZ0MQ9a9wI00U6geSqKL6l6gKAqhq2ue7aKoHDuP953rzh9nhGW7qGb8ETImx5JNo8xIsxqHcAWW1ZaUvt/fvvnWf//q1zsdu0oGXqt6hEonYpgidIWsQRei7P6339n3m9df3P1ymUfDrqZ0zrUMuXgbXSZUXe9PJKA/FF0VdeVgIgcTCRhNwB0V9aGhRCgUfWqHFrqkuJKhq/i3pqI873J4bHR9DdGVyuQU0dXf13+p/tKl+ks1p2uqT1Wfpc6ODo7WnK7p7+tnUsz1q9cv1V86eeLkiU9PnPj0RM3pGiNR1wq6VjYKazdIqhsvu0DoQiOEWM0k2b0wph9dzc1jzaNjCF1zLEtR3bn5bsSqJrI5x45idJFks2KZtdGFKtBydOVY9qfP75CdtyS91h9dPM//9s239vzq179w7Cr/UDrRtdbc4nl+m8WPbHwNrLreH01AZIWQq2rH3oodL+596pm9Tz21A33k74g+9tQO2b6uABdwETzHRTmOcHj4gAulOzwRvO0KcFGPA20XflyVi3Kcy+HhuYBikSCEN+/chRAyWSabzemxcscV1920EGV8F3VTW6BiHHdWGIQwnUeXXP33+lF0hbg1MzHT39df66lF6aml1Fnq7MkTJ3G6ZNnlKjWPsniQUHrq7jl2tIlqHmHZkWaqa36+i2JzLNk0ijaQkU2jFEWNNpE4HW2gfXEedqS5+NKaR1h8qOYRdrSJRFVNdc3NdVG5XK5pJDdSSMzl2JEc20U153Lzsq+MbBrNjTSrNQlcgSVbhSWtVM1lw23bDB1HEITu3gcAAKu81s+el/sic4ZdjVYe9Uqw0A9rvbPElqKqvf5oAkZnYXRWHm9FZ2FoNr9R7w89+vgOtYM4PBH0c8NE/oesVuQKcCglwHEE4UI/kxjhOJfD44kEPA4Hx0VkR4MQ3rhzF0KYZXJrZ2pBzJqedOXsGrerFkaWaoGadbfqVsV2GF1nqbPzU/MTkQkpujC9cDpm1RzLaqzWw4syuuc5kqRGm0l0djTbhIfviiMqsnkUZ+iaZ0eaKA205HJs0wg710Xh7ZEmElV15xzbSVFMbp5qGmXmuvFXMJwzEHVpgkG5FVnVUDUct0YnkvUjQQBdvQ8AAGvgwMoSdjWqGdQv39qS2OgyrCqvH3ErOgsr3FV736jaKwm5Hnt8B/qovlEZXZ4IRxCOgIvAKQhgXMAlzebwRAiCCARchR9s5bhC0FZ8TABAy+0OAIAVfY9RM7WVh5q8UTZT4FQ1w7to+DWVXcyETMapZmhNB0IUvUwvzy/PTMzI0FWcrjYs2SyZ31JMbx7lSJKkSLKpu1u2IIJsHu3qaiZJiiRJxCeqa76LIrvm5qUDhmqYxCBsGmVHmklphXfO5TopisnN4a9smMl1Uk0MMyf7vsimEWakyUCbNN6MDTVvDd8Nt23TbMYrfY3n+c6e+5sQXdjVKH6qfe3WlmSbod5iG8vm0RUaSvg7ov6OkL8j5PeH/B3R+o5ovT9a3RitLrwainj6RemOxIEAQRBnHATLRmTHjLAc4fCwARfKQxBE5IxDuheSgyDYiKe4SBDCltvtEMJMNleuZRhVU92LUTflXTRGMk2UWdW56Bs7XWUmYr4cp2imJuHUl9Tn5DY0MBQZjdzx32m93Yqsq6OL8lJq6ejUczmtkAsJv5xijuVIqruJJJncKC5k0whLkuRwE4mWSKgdZLiJRPVANo0xI82rKodhGYZtGmZnOym8PdxEkk0jyseimq5T2kUm71JkNjtX8nvMMqYamMG2qu3B9XQ9QRA6e/oAABvu7tRcjcJHmldteUlsdBm2YN/Y9md/++jjO7SNePrF1q6+9SkShNB3yxi66AyjaBbArzwzgTQrYk1srKLpnF3Xs6pFaxcjI5Y3mm+QR0mZnTxxUi1dgj3DTNUyE9eoOmSnYZZ9xetzO2UGXRLjeeFucJOiC7kahY/WkVssy21TfATd1taSBF0aAdAqozNZRdN/hPJMw4MwiqZxNPVBTsv8nYkxRjO7qJuFrzjROJaJgpm5RuuGkdVNtVWotiJ1U2+uWs2yVOyltS/P8wV0bS5J0CVJLBFvrYmMvqrEts1oAADfrTYAgFosVWxpOqtodJZRNd0HL2maTFXZxYSZAaexgUQt2mmFHcZWEFi8FMX4EgZNDJdedKDXzMQ9Kl+x8dZiormWbOfaPl2eX9LXBEG4G7yHXu22qQy7GpyifY1rVxKtaUPbtopBCJv9bRDCdEYZSAqWsczUAjja5NHUHIH6iVRxm1U0iyNIRtksjSE0AGnY1qdgatWSUY97TJjaV6x5B6bWkNTv88roFNqeXW13QRA6uu8BADbct6i5mvy/ZteklG/GnjawbXMahLDpZiuEMJXO6EQXTTOKppd86260hhl0UprTDIZHk9TN8CIRja9YFV3Gd9ECodqhTCx4MV5jmpRS/r6M380waq1o7ZpuCXop7SIIQntXCACw4b5FzdUwJddSrnFJtmkMCtu2VQy3p2SaTtEZfZZVMZ27r7eZufM1HnWp+btMNqtuKrTTiEhUd9EwtaOZaDAa9FLeRaPGjF5jRr0yNXhjNOoy0VrWrulqu3hksl14QWjvCgkAbLhvUXY1Oq5orUtSYrbQti1hUnQl0xl9llUxnbuvt5m54TU8JqlhhocrNWI7E1OAJtBlYiRT7eya80Aq12jpkJ3hoTzjrWWtG3BJXy/NzPNCW1dIEMCG+5ZiV1PyQtanJNu0+qRtW8QghNdvBCCEiRSt09Q6mNYuqYyi6T9pybNba6oBnJYLyxi2dQGkeh82HA5qmHoBrINKxlQlq3xfal/x+jQwo82+pNPHOXmeb+3sFQRhw32L3NWUuoR1K4mNrq+CQQiv37iD0JVM67JEKq1ihjlkCl0mTB1RBs3iyQzjq1dM2Eajy7BpossyM/rVp7RQZLhNmmj5eobaCujq2VTo0lPy9SyPja6vggEAGlvuAAASKTqR1mfrgq71ufk1GnWZmVFT954Wfo8bPhy0DkijNSrTuomojW142gGZHgbAbdta7/bwmwNdOgu8zqVSXt9i29YyCGFjy20I4XKSXk7ps2Raxeh1sISGmaCgykimVVGadqBmamBQZZDN4rOodXvDBbDwGjXOYmUIpdYk1FuF1k2YSlstpwvo5MEGO5ZNXMhtpsadbdtcBiG85kPoSscTukwdXaoWV7GEhqn4Ao2zqIaD6mcxOs6j5Q1NBGqqpsGhr46pX6ZqzZhZp6eKLuOjfKptVdXU26oG7ZTPIu04OsEAt22Al97MZUMmX5Rp21Y0jK64bnSpcUjDllRMC3gqMZ/GWZZTKqZBO51jpAWzdoxRzbTuGY0v3d68phZCWdrCVUMlg199Iq1+26TW8FIabdXwqIas7+gnBLI19ySbrDwats1EkG7bZjMI4TXfLQhhPJGOL+sznYQrN4BTGzAxHPOZGM9RHzWi1Uy1klUfg1P33WlVMzE8stEhlOHL1NpFzdRbuPpXprLq1fiItIk2qTkkqDJ0odSDjAIjjw2rvMeGnt20bdO4A90Mdrwrs2vPfkUbaziUTGfG0pldLp9ankuu/cl0rCOdueTyJtMxdMyOdOb4Hm8yHSo+3a5ToWSXtzj9vYaYYvomMQjh1eZbEMKlRGopkd78pglC4zMHKne+iVRG0cxUMq1qGlQzarKAZjyT3eVqGb92qDi42fVZSK3Nj189ZH4KQXWVhJWmWpnGvxe1r1gzHjJsam3V2k5hDiEyU6uoXadCYw2HLDkFcjUb7vS2ALoQonSmK5pOdI2lM8ddvuNdK07hvT37kxFfcmugyw8h3BgOJel1MK1FH0aXPqYzRs1a362Brk+7s2pMQpburk1nmF2f9aEN2QqIT7uZyLVDhSerTNh6oEvNTHwvJla9qvJpXWx9ALZGJnU1G+70tpl6wmb97HgXrRl16TpIR5ouoCv/7/E93mS6F/2761RvssubTNOXInTHqUOy/OjTAro2vkIUDULY0OQvRF3l2bK6qexiYtosnkypm8E5sJTqlIOZuS61ASvju5iaHst82p0Zv3ooTWfeuxrr+Gw/mpHG2+9djaW7vWk6s+uzENqQGd7dWjMzG2G8Mk3sojqhpbW81tiElmZzNT5hrK/rbTiliqAldzUb7vS2aYz7bwY73kmPNRzSn65oHSn6ksubTMXwv8f3eJOp3mSK3nWqFx8Hbx/vzPOy49T+Xad6k53e9xpiyU7vhteGmq2gSwM8+mxR3UwcTX1gMKVmy4m0YTMxPaa2BF9l7kRz2F1tvsfw8D0G1a49+y+79o/TsV0uH0LUe1cndu3Z3/HZfjxgmO6uLR7x+7Q7iwcMTb1nVgVdZmYjNGb7VPikvqLdeGilPkFlvIGpN1fVce8yux7LcbfbujacWHCbHBAr6Npop7fNaJtYZzvWqRV1jaVojYkuZBdd+8dSvbv2eHFKe6f32B5ve6p31x5votOLTtSeonft8aJjvuvyJcZ9xzrpsYZDu071Jjq97zbEcM5NaLg9aYBHpy2om4mjqQ+MqMdwJpaKGFwAplGTRh8GSqr7aBNjICk6ozGJlb+d+my/TnSZWXNhcIGfiWrRqhnj6DKxhNVEA1NvrqrjfmV2PZbjbrV18byQ7+DrTqySrmbDnd42raU4W9Dak/TFA95EMqaR2J6kd+3xHtuzP5HsxXnevRI7dso7duXQu1diFw/sTyRj716JJe56d53qTdz1ou0Nvzo1gxBeuX4TQrgYTy0sJfXYYjxllS0tp9VMfRf1QE1lSeRyglY16x6I1nqU1aCZCDuQ7ToVSnV5w+nMey5fKuLD6ZcimY5Th6R5ivc93pUJ///tnM1zm0YYxvlruek/4KIcyKGXjnzokAM5Kp3OtNiR3TTGdlPbCooTy5l2epAdJ8o0iS3FfIh8SKgaeiDDEJl3w66w0HaeZ34HSWYRRrvvw7v7wuaXbcLwUy6LlHUVz65KPJOMikGRoh6iFzHKcck8iX9QFBxTkyh6dPhkOv13fqTftGMVDjWVBz1FqCR0SbSD0NKbXtA/DcK6bnvn9vVPki2NTnjaamSb1Fv95JPsh+lbo9b0gm72u6xW1+j0262GodtGp2vpmmHaXtBVza7XadZbfa/TrPyEUKT9aegGg6tCDN1lIJSolZaNCcQ1gas/OoegpzuI6fusLd3afJ1Ntu7UtI1XJ87dtSQNUu+ejJ7eu76klLUuEv4FKtaqA/k/0gtU/Ce5rJpAodRKaPZisYEziaLfD59Mp1PWqC/JrsRCTeVBb6WtywtCoxO2Te26dWWdyToPLb2ROFPWpRLX8b5lXdZ52DYbXsb/0u9Nd7L61nX/wS6XdQ3cfET8ib54pJqUumxGTxjyw+1PQtAO8TEIP6rmya3ba46pJQXNyScvNtfys66vi/TuPP30YmvtSw16edUQAk0EYFoX3+8oMGEo0CcFBgWHdR102NaVHwrYLnVuW61uGgkXCTWVB71Vty4vCOtm9/TczlqX0eknvuIF4Vz6lXUpKldrn9tZ60odK30xt08vCGWxrsGVv2iqxJhjXHghrVDWdfPWtZy5eAHruj4ZqJonak1LEile6yp7YpDPupZzkqmfuFzrWk7Pz441YetKOQ1CVbfn5qJOg9Dq9JMr9QVDTeVBTxFZFV86PT+s67Z7Zh/6oaU3Xb+f/kk1u67TTN9aZ6GlN9INkrc9v2voTVVv1mtashOj1nT9brJNvdXvtRquHxpOmLxQzW7yIqXe6me/ZdWYzWYbD3Zms9ngvV806+KHcjtmk1EuJVralUeuK1CnS2gikbz7VeTGZ2Ydo2qebGzeU2trak1L/OnW5uuN29rGy9eOuZZmZuxb9UtOB0WeZstNmTcL0+uvJfoT1b2H7khgoj672XgS7R10oulUOCakgbHnh6o+X8t2aGoLhprKg57CKFOuHNU8ZldbWbrm+q/mNu61GnP7sc5G9VrDPdvO3bNR01z/2PVHhjPqtRqqeZzdQ7JlvaZlm68aX1vXTUEPOe4m7z1uSpxjFLjEE8q6uNeHsplWfnmhqc3djDjHnaMPmfsdKV/5xmJbnnVxr9uVmEIxoK1LoDadu08yfYhvRMw1GU+ivQMnmk4XjAw9f6Tq29dDYr31ynWai4SayoOeIvAbg1UjjuONX3fiOL4c+pfvC3FBULD5V1yRkAO41NJH3tPFupoj5x7LrPgo6+4lf8RKB0v8FpGydYEUaikLVAIdjOqrjIs2clAUG1PjSbS770TTaeWxhQo1lR+JcnPzS2BppP3p7cBbPu+GPi+UcTK9M6DgnpZkuCB5p84HGv7nY5HGyXiGEBXWBb6FAeeu6GNmPu6I70xe+XRNOf9UHt2RuK/zBHp+wTH1eRzt7juTaFp5bKFCTeVHAuv6PxDH8fqWHcdx8bFRqkV5NALWlR9ZWGfAHeUitNIW5sJaOxGxLgKhRzjSSQz3rrgPmD5mlnVR9zyx4LMoqksM6FUoxrWRkHXxjYi5kTueRDt/PF5N60pCTeVHolwMPSA7s9lsfcuezWZvLt1/LgpyxcvbSzeXNzRUk3cDBl4uF0OfgrpYFhgPIvcGiJSc8FUQsOB3CKH5GYbfCFQ3cJ9k3t+RlUIRvYjqeO8GHtVXqe7NGBSMJtmx9nk82Xn0eDKJKo8tVKip/EgURtwBshDHsbVlJw+CYkyVFEEgIxGCO6yLOAT5kB4SgQfnl5ioSQl/ClXmSSa3X0YHE6LQoPg0nmw/ejyeRJXHFirUVH4kynff/wAAAABIhPLz+hYAAAAgEcr23j4AAAAgEcqB8wwAAACQCOXZ878BAAAAiYB1AQAAkAxYFwAAAMmAdQEAAJAMWBcAAADJgHUBAACQDFgXAAAAyYB1AQAAkAxYFwAAAMmAdQEAAJAM5aj7FwAAACARylH3TwAAAEAiFOfpcwAAAEAilPaTYwAAAEAilP32EQAAACARyt6+AwAAAEiE8nB3HwAAAJAIZevhLgAAACARynrrNwAAAEAilJ9+uQ8AAABIhPKj9QAAAACQCCWGIAiCIKkE64IgCIIkE6wLgiAIkkywLgiCIEgywbogCIIgyQTrgiAIgiQTrAuCIAiSTLAuCIIgSDLBuiAIgiDJBOuCIAiCJBOsC4IgCJJM/wH+lzanIUL+uwAAAABJRU5ErkJggg==)
这个Operation就是用来格式化的宏,不过现在还是没有的。点编辑
![](data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAdoAAAFNCAIAAAAo5TkDAAARw0lEQVR4nO3dvY4byXqA4U19DQJmr2FyXc3qXIVDJ04UeDdwfuKDE81NOBA2FxRYXgknUGA4U9gO5izR6q6fr5tV3UXyeVBYcJrN5s+Q7xZqKPKnCeB2/N9//kt5xC8yTdObv/5x7pjfzp8OeggBWqjm+Pv379+/f1+fbpLj19tQ3tIxx+9evv7y9DR9eWn9qAJsVs3xfHz79u3bt29tZ8evN6NJizfn+Os0Pb17efnlaZq+tH5gAbaJt/gff2q+WDG/PR0XKz5M09PPvz0FfHn5pffjDrAQbPGXP5VXma/M6JUtDuX4ktqXD9N6mWKxD8Bhgjn+/Pnz58+fq3/0G3p2PPe6TGHhGBjHprXjHjl+vRmt5sjzu7bM8buXr5GViqenJ6vJwPGCqf306dOnT5+a5/j1NjRctZjftezs+HVF4sOvT90eVYDNgjn++PHjx48fOy1WNBzzu5bN8fz9bb99mJ6efrZYDJzu9MWKo3P88nV6enr32t/LG91evn55eno3ffj1gEccIOmxcrxYpnj38vXXp6dp+jBN08+/ffCXPeBED5TjxT/6+O3D9MvTz5f+vp57qTPAwR4ox+9evl5a/Lpk4W0VwDgeKMcXry1OZvf1L3sWkQEa8oluAEOQY4AhyDHAEOQYYAhyDDAEOQYYghwDDEGOAYYgxwBDkGOAIcgxwBDkGGAIcgwwhG05fvv2bZN9AFjYPDuu1jaY49xuag48pnqO39ZUd04e87Lz/MT8XICHEspx8nTk3PJFcjnOHQrgjjVbO76Etbr/jhyrM3D3Gi9WTKuFiOQB50dO7qy/wKPZMDsOJrIQ4sVx5hNqOQYe3J4cF6a9kRm0HAOsRXNc/YNesqrJ/eUYYG1zjstz5ODGdYiruQ/eToAbFcpxLsG5aXL1z33Jy5a3A9y3De873rQuXN2YPOD22w9wJ3yEEMAQ5BhgCHIMdPEXflR9xOo5/tvfXwzDMHKjkOM3f/3DeB3NclzdB3hMcizHwBDk+Jwc/+t//e/gI/4cApqQYzmWYxiCHJ+W48u/1zgmr1uvKP4cApo4JsfPz8/N97ztHM/j2KPI1x8z/hwCmjhsdnzp7POPtu5TDXenoMsx0Nc4ixWbMvq6czXrt5Tj+cdNLMJ62XI5vdgt+WNhh9yR51vizyGgiUFyPJ8Xbwp37oLNi3zE7Dh4Yt3r9Yw4Gd/ypRYn4s8hoIkDcjyfwD6nLBpa3ufhcryYtCZXIZLTYTmG23L82nEul8ll4mRVFzmOX/Amc1yuqtkx3I1Tcpyr574cxy84UI4LK7zJteP5knFuFbiwXlw4cu5a4s8hoIlT3lmRi+buHEcONVyOk2sOye2njPhzCGji4BxH1o4fNMe5ma8cw4M4a+243NbgpdZ/JOzU4vY5Blg48l/lVSu5aQk40nc5Bm7GMW90m58OLlbk3jKxOHLuUOPm2DAMIzd65/g+Rpsc/9u//4dhGEZuyPGhOa7uAzwmOT4hx6ffGcMwuo5NFV70Ianfd4DeqOqDKceGYfzxpkOO2Wpzji/bD3uKnP40NYxHGPsKIscNbcvx9GOXezwhTn9SGsZjjn0FkeOG5NgwjD/eyPEArs3xfM/1r3ZxerFb8sfCDrkjJ3czDGPT2BSORR9oosHsOHhiWvW6cMzclsh1GYaxY+wriHdWxFUfzF45vlhfcP3rXx8zt6V8pac/oQ3jdkc1BYU+JEUC9DjOzPH6N53bkjxmbsumKzUMIz5yBXj//n21D0lyPNc+x28yU9rFlsXG5A5vUpPoy8bqkXPXcvpz2jBudCRf/u//VO5DkhzPdclx8rd4+jPJMIwrx/q1//5HhT7sDtDjOCLHl91OfzIZhnHN2FcZOQ5qmWOAtSY5fn5+rm6pnjXfXrh49dxO5Bjoq9XsuBrTy8Yrczw/zlz1mJHtBXIM9HV9jpNf8LFOZDWjkRxvymjyGvcdapJjoLcmOa6enmqz43kuq72OlDS5c+4mRcgx0Ncps+PccSI7J5O94+rKZ63JMdDXAbPjQq/nGY3keJ3d9T7Jo1X3qZJjoK/DZsfB40w/1nPd6B05jm8pkGOgr7bvOy4Hbt3TxQw6ub16FfGZb25BI0KOgb6uzHFwIWJKFTYXx3m1r89x8jYULpgjx0Bfx8yO1yu5haquc1xIavVKc4snW9dS5Bjo68jFiin/V7WpOB3el+PCWVtbPMkx0Nths+PyH/fKO+RyXD3s9OPsuLpzgRwDffkIoSA5BvqS4yA5BvqS4yA5Bvry1aVx1QdTjoH99KEhOQb204eG5BjYTx8akmNgP31oSI6B/fShITkG9vPOirjqgynHwH7edxwkx0Bfchwkx0Bfchwkx0Bfchwkx0Bfchwkx0Bfx+R4xzcqXf8JxW3JMdDXwTlefxh88qPly1//sW/7leQY6OuAHEe+WmlR5+rsuLxbjyLLMdDXYTlOBnSe0XhDqxPqTUcLkmOgr2NyHGlubmq8niCvc5ybdDckx0Bfg6wdL6oaWd9YHLCwTxNyDPR1ytpx8r+LOuemxoUD5vZpQo6Bvo5crEjOhasLwZEcJ6+0yY2/kGOgr4P/GUh5XXj37Hha9VeOgRtzWI4LyxTTagk42ejk0XJZb3jLX8kx0Ncp76woL1YUps+Lw27afiU5Bvo6frFi8WN1VlvIazDcTcgx0JePEAqSY6AvOQ6SY6AvOQ6SY6AvX10aV30w5RjYTx8akmNgP31oSI6B/fShITkG9tOHhuQY2E8fGpJjYD/vrIirPphyDOznfcdBcgz0JcdBcgz0JcdBcgz0JcdBcgz0JcdBcgz0dWSON32ccdcPL95BjoG+TvlypuT23Bfl+TYQ4CEck+PCl43mvg0k952k63N9Vx5wD475rrzklkWOc1Pj9QQ5WercPq3IMdDXYbPjdVuTUZ5fZHEictZ6n1bkGOhrkMWKTWvHcgzcoUFyXNitcDQ5Bu7HgDk2OwYe0ZE5Tr7/IbeCvHV27E95wG07fnY81SbL1XdWLC613qF5iyc5BnobKsfB2XF5hx4tnuQY6O3If5W3nu3O302R3C03O87t3PAGL8gx0JePEAqSY6AvOQ6SY6AvOQ6SY6AvX10aV30w5RjYTx8akmNgP31oSI6B/fShITkG9tOHhuQY2E8fGpJjYD/vrIirPphyDOznfcdBcgz0JcdBcgz0JcdBcgz0JcdBcgz0JcdBcgz0dXqOj/y+u2vIMdDXATmefzb8+nPiq9sLh920/UpyDPR1TI43/XfKfHtT8pi+Kw+4EwPmeB3T4FftFS5yPTkG+honx4vIFr4BT46BO3Tk2nHym0aTOb5cMHfA9Wk5Bm7bOLPj6cc0FybIcgzcoQFzvLhg7oCL03IM3LYxcxz/y54cA3fixBwvzl2HNZfaxaXKqxmtyDHQ1zg5nv+4OJ3Ma2QpoyE5Bvo65h9JLya/69PJ+W81rOW/+LUlx0Bfp39mxa2QY6AvOQ6SY6AvOQ6SY6AvX10aV30w5RjYTx8akmNgP31oSI6B/fShITkG9tOHhuQY2E8fGpJjYD/vrIirPphyDOznfcdBcgz0JcdBcgz0JcdBcgz0JcdBcgz0JcdBcgz0tTvHm76Ao/BtpIstx3x48Q5yDPR1TY5zGV1smYrft7Q4Uf4GkB3bW5FjoK99OQ42NFjh+Ox4vnG9m28DAW7Y7hyXXXYr7J887OJE8tzCnv2KLMdAX1fOjsvnRk7kDrveobqOUb1h15BjoK9r3llRnvMuliAuG+cngrPs5GVzN6l8m3eTY6CvK3Nc3rJpsWIR7sLVrQ9buEmtyDHQV7/Z8RTo9fw4uR/Xly30V46BW9V2dpzbIRfuXHmTZyUrLMfAnWg+Oy7Pc5Pz5XWgqxPkyMEjc/N4vuUY6Kv57HgxI65eZDHPzU17y1da2N6KHAN9dZ0dR3bbNDvOHTB6b68gx0BfPkIoSI6BvuQ4SI6B/d7/KLmPHAfJMXCVcosnX126RfXRlmOgpNDiSR+akmNgP31oSI6B/fShITkG9tOHhuQY2E8fGpJjYD99aEiOgf30oSE5BvbTh4bkGNhPHxoK5dgwDCM3DujUg6jnGIADyDHAEOQYYAhynPDfn//HMIzgOPv1ej/kOMEzjMf0+3ZeLA3JcYJnGI/p999/37q/F0tDcpzgGcZjkuNzbcvx27dv4+cmd55vzO2Qs+mmXiP3DFvfwfWtuv4hWl+keveDD3Xw1u64X5F9dtx3DibH59o8O869iuIv9eClFgWJX295e8TiGbYIYrmPheutPkTrqyj/H6t8pZcHsPA/tuo1bv1/YfXur3+hujwOOT5XPcfJ1/Pi1Zt8tSe3XHN1yZ2Tp+NXl7TOcfmw/R6i4F0IPjiFh6h8RckbnLxfhd/a4rpyN4kTyfG5QjlOnp5vKb/y16/D8uu2cHWFc3ccIWdrjreeVXiI4gec71NIZHKH5D7lq8jdi9ztXJxbqDPjkONztVk7Xr/21ufmmrvYs6xwY5LHj5d0LrdYUahb4cavr7p8X8p3v3zwt6neJTeu96le1/r+5g5b2FI+JueS43M1W6yY7x8/kfyxun197vpmRI6Qk5sdL67l7aqhhRsZeYjit79Q1fXtKfR08Rus/oIKCa7Wed9vmSMtcvxTymJ/OW5ow+y48LIpvOCnfH1yR85Fv3B7zs3xZXvhlm99iAq3v3A311c35UM536FwMyKHKp+1OEj17nCW9ey40OJJjlvbk+Ny9YKtCb6wc1vWR0i+4FvlOJmkTekMPkTra6wWfH0t69u5Pk7yvuSOvKh27v4m70v19sjxOJKLFbkWT3LcWjTHkddh9dxCQXJHy20JHq1VjucnCtdVyOimB3D3Y1i4lvJjmOt4/PiFjeWz5HgcubXjZIsnOW5tc46rr8yGOS7sM9++qN6m0CcF31mxo3fVG1aeYE6pqW75F1H4P0Ty5lXvRfI45RtfOHJhO8fzp7xzhXJcDVDkVbq+eHJLcv+D51yFHBeq2jBk5YbmrqJ6OnK9hd3Kxy/8uDh4/K5xMDk+14b3HSdfSOsXcPlVWj1OWe4Wtn15z59hubtW/XH68e4HH6LCoZI3dfHbWZ+1/hXkfozf08VZ5d9L/C5wOjk+l48QSvAM4zHJ8bnkOMEzjMckx+eS4wTPMB6THJ9LjhM8w3hMvg3kXHKccPqXjxnGDY2zX6/3Q44BhiDHAEOQY4Ah9PpXeW3/XQbA3ev1mRXVf47l32gBzLVZrNia4/IMWpGBB7T5y5mSDU3mOLdYEfk8BEUGHk30y5kupxdnzfdZrB2vd4v8GN8H4J40+1PeYmPbHAPcvY45tlgBELc5x/G14/XFIz8WNgLcsQ05XnR2Edyua8cAdy+a43WFC8ENnptb0CgfDeAu7V87Xs+C1/snfyxsLGwHuG8b3necnLRW58XJfRbnlncDeAQ+QghgCHIMMAQ5BhhCPcd/+/uLYRiGceVok+NQ2AHIkGOAIcgxwBDkGGAIcgwwBDkGGIIcAwxBjgGGIMcAQ5BjgCHIMcAQ5BhgCHIMMAQ5BhiCHAMMQY4BhiDHAEOQY4AhyDHAEOQYYAhyDDAEOQYYghwDDEGOAYYgxwBDkGOAIcgxwBDkGGAIcgwwBDkGGIIcAwxBjgGGIMcAQ5BjgCHIMcAQ5BhgCHIMMAQ5BhiCHAMMQY4BhtAsx4ZhGMaVo0GOATiAHAMMQY4BhiDHAEOQY4AhyDHAEOQYYAhyDDAEOQYYghwDDEGOgfP95QFUHwQ5Bs4XqdVNk2PgNsjxJMfACOR4kmNgBHI8yTEwAjme5BgYwSA5fn5+7nRkOQZuQ9scP6/kdqueaEWOgdvQfHa8CGsuzevdpj5zZDkGbkPvHE+x1FqsAB5djxwvpsOLHM/Lu17csFgBPKhTZseFlWI5Bh7U8bPj3M5mx8BDO3ft2OwY4J+65ri6KGF2DPBPXd93PN++2C25PbnlSnIM3IZ+/yov+M6K3KVakWPgNvTO8ab4WqwAHtcgn1nRjxwDt0GOJzkGRiDHkxwDI+j3haHjqD4IcgwwBDkGGIIcAwxBjgGGIMcAQ5BjgCHIMcAQ5BhgCP8Pu2Ge/SDJhT0AAAAASUVORK5CYII=)
进入VBA编辑器后,在左上角的工程窗口里找到 normal下的newmacros,如果没有的话就自己在模块下建一个模块
![](data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAALYAAADwCAIAAAAikwkiAAASmUlEQVR4nO2dz28b153A+Sfovhcee6RvBZYABejiPaygg4AeBBREsYXtQwTKW2S1bepOCy9XXS8SrpVCrHa1maZJxYZVPYmcSlYSc+zakVyZCu3EkmzK8SSKYlVG4EEOW9/eHh719PR+DzkkH6nvB18Qw+HMmzczH37fmzcjKlGp1mer9aHh/NDwqDAmhkcr1cVKtV6p1vMr9aHh8dnp8aEzc7JlIKwNZMy5c+fI8gm+oLHp1YXpcX4mUWGhWp84M0ecmK3WJ4bzoIj9gRDaNcB13WYUqVAqNKcIzlWzF0bJ27HhfGVlLt6j0KZi+yOwItoU0owiC9U63bI019Dgkzd2ZhyfP1Ck80EUOXXq1KlTp2gt6DnNZ5GJ+frQ8ChJA82dvPz8XP7MeKW6Sp9L0hkaGx6lBRq7kM+fGV2oLuLpoeHRhenxoQuLpBq0u7jOoIi5IsQJ5m3zioxNL04Mj09Mz01Mz/G9WuEqvCKVlbmhC4uV+Tx9LocuLOLVJ+br+TOjWKCh4Tw563gad5Yr8/n8Sn1ieJzOW6SxA0VMFKG1YPxoXpHZaj0/PTcxnJ+tLs5eyKtlUisyW63nz+Rnq6vkLZ1OTGbSn+LcRjIQKGKoCGNJq32RSrU+Mb06uzJHvqnMRTJpIHDgrzvTKtEnb2x6NT893roidNbhV4ToqCL56cXZ6ipz5dJcFqlwXVdhQ2OoCLZwYr4OWSSSIvE3NBXRxW3TitAntSLvrmoVIStOXBiFLGKuSOTuKr5GUAT+pmJFFqqLzBUvDvzt7/pRgFBEbBe9EP0aKK6hM4h+DVAEQhP49JsAipzQOBeFCigCoY2GItqWCTjhJLa29uKK7W3z+FodDx/GFo8ekXjaYtTrTcS+MHZ2YovHj/n4a3Px+efHQqDIw52v6wFE/8d69dHKtY3F99ZkcffujkAR+/1A5Uzr0fW9sCTWq4/e9T6Wxcq1jbt3d1hFdr54anmgcgZ9crmlKGe6vhf2xJU/3lJHbypSfbWlAEWoWPjDTXX0piLrv2wpQBEqyu/46mAVefzlfuyxvra+vrZ+5+M7t2/evnH9xvUPrn947cNrS9euvnv1ysKVhfICidLvSsISvvzqKZlG5Qy6c7GlKGfasZs9GqX5ijr0ihRKIQmnFDpumCuGuWKQLQTZqWDECQYng8HJYDAXKBR5cP8BiU8/+fRe9d7G+sbdO3fvfHzn1o1bt27cunH9RuXDikIRhNCRIqsOWnX+79YrXqlAx7PKRfyRJkARKn739kfqYBX5fPevTBRKoesjHIVlVFhGBQ85JeSUUM4Nc26YK4bZYpg6W+PXxSHMIkvvLwmziLAErAieRuUMuv0TdPsnXqkQ7nso9FDohaEXBgXPLWz96af4U1WUM7KqnsB467cfqMNIkeMpJMgWghGSP3KNSGVVinz7zbd0PH/2/Pmz59/sf3Owd3Cwd7D3xd7eF3t/+/ZvxZmikSJ/fhn9+WXPLTDhugW3WHCLDhMP/vDPeJVGgCJUvPmba+pgFXny1QET7nIt2A9yBY8flA1foDBEQYhq+yh1OsuviwMrUvmwcu1P164sXJl/e/75s+f3N+7frNxcWVpZurr03pX33ph74+nu0+JMUVgCVgRPo3IG3TiPbpz33AIKfSo8FHpo30X7BRQU0LaDarlwLRf6WSeXxas0opyRVfUEhvvGkjrMFAkaioRTudDJhpMj4dnB8AUKzw6GZweDfVTbDrSKMPlj9dYqefv82fOZX83sPtk1VaTyEqq85DYUaTQ0KDyUI3BQLRfWsqE/Ei6P1IpJJ5fFqzQCFKHif+feVwerSLD3jImGIlPHs8gLFL5AQYiCfVQLUK0WpE5n+XVxCBVZWVqZf3v+1zO/xvHaq6/Vt+rFmaKwBKwInkblDProHPronFt0BMkjcNB2Lqxlw7VsuDwSlFJ+YSCXHcGrNKKckVX1BMb//PdVdfCKHDDherXadpCbchFCnue7Jb/g+uEL5BS83JSXm/Jq28hfw4qw6+IgihA/nn397GDv4OnuU9wL2X2yG+wEm/c3izNFYQmHihwEeweMIof5w+X9CL3BoJTypwayI7wi4qqewIisCN+dcT3frwU5x2W7IDh/BKG/HXp+kDqdVXdX6b7Iwd4B3xe5t3HPtLv6wQ/RBz90C85RCjnyIxeuZUN/JPQGw1IqcJOeMzAyOIhXaQR0V6kozryrDv24iOv5/lqQdVyEEE4hTtEL9lGjR3J20K81FFGMi/BXMXxfZOMvG8WZotG4yMoP0MoP3IIT7pMm5rgfy9iPVFBMes7A4HdTeJVGwLgIFb96/Y/qYBXhbwa6Jd/zg+yk28gfVBfE3w79WujVQnc5SJ3OSm8nrq3zTQzfF1m9tVqcKQpLwIoc3eld/j5a/n5hCisi8aOUCorJWmHAnUymvpPEqzQC7vRScfm/yjj+/jhkPqvIoydsuCXfXQ6ykwXcoHh+4C4LInU6y6+LA2eR3Se7u092Hz98XN+qb97f3Ly/eW/j3sZfjsZYb1ZuFmeKwhKwIngalTNoaQwtjRWmcmHghrVcsDwSeKmglKq5Sb+Y9AtJz8Ex4E4mC7lkMjmAV2lEOSOr6gmM114tkWAGNeiZR4psP/6KiULJT53OmgS/Lo71tfXiTNEwhCVgRfA0KmfQ+99D73+vMJVzJnO5XDabHRkZGRz8bir1nWQyOZAcEARepRHljKyqJzD+8z/eVgeryNbOlxYGVgRPo3IGXR1tKcqZru+RPfHLf/8tDqahIfNZRR7Uv7AzEEKNiXIGvTfSUpQzXd8de+LfLrokiB9YCzyTVeSzh4HlgcoZ9O4/thTlTNf3wp74xc/n6CB+kDmsIve3P7c8UDmDrvxDS1HOdH0v7Imf/XSWCYQQ8/aYIp9uBhuf1e9tPrY2Ynm8uet7YU+88uMZdXDd1a29TzeDTx7sQPR9bHxWf/OtpX/9l9dl8fKPLr/z++sCRba29l555XWIvo8331p6+UeXFfHO768f/R0NAgAliX8CAAkNRQx/cAI4aRxlEdd1I/3sBHASoH/MqKFIexuzRCKRgE5PL9FRRRKJRAIlEggs6SXiV0SRJxKHtLgJoJO0RxHOBpCjd9Eo8pIcWYnEBSwKarwmkK59SafT6XT64sWLaYqWd1C6ofaV32foFRGuplYESbII+VQGVgQdnkXTnWgKUMSQdioiEgUlVJbg0+a6LihiD21RJEGpkaAyR9OKMO0Cnj5//jw9P30cvljhTFlNAIKRIvzRx/P510ZBVObwfR+/dRwHKa930GFDIxQCHT+p/FlPp9OXL18mr+rV+beAjJizCDYAa3Fs5uFHWBQZkRQ5f/48s65QESTpn4IihsSpCJaDTNO6+L5/dFUjFyUt6q62qAhkkRaJUxHHcZgmhrQyR9uQW0K+6Io0wLw1aWgQ11DyKA/RSSfmcRHHcYSiNDZwKIe6uQGsoi33aHhRQI7eJYIiigtdIbQoIEfv0umHAYCeo41ZpPUVARuALAJosC6LOMdpbouAEP7y3uSC364s4jiO7/sIJcgrWBIjacmtK/X4ULuySBMPmvB+EEvUqUUxfmpe4daJNBBHKoyaqqdiQ4qzrj44MSgSiSZuERsmDHNFOknUHN6iIoZr0YeFlibSWHMbs4hwZwwUYbMI8wqKmJQvXEaWRdTZpRNZJJIiaj+EvROhIkJd+G8Sv6TwbdRlZN9IWWWEJatrKCtccb5ldWZgCmxvFuG3rXjQpJUsgkTfSNkBUmgkXEa4OfW2hHMU1W6lhtqS1fui0AjTJ1kERVHEZA7/hdMuoy1cUW1ZyYY1NCxZtlPqMvukL4LaqYjsI2sV4T/lt0Xmk49kBVp3RRNXFhG2rPRM4QKIO1hpikjL8Ispqi1cRV1DReEKIRQbEq6CbBsXwdWImkUABlmmUWcRZg7BotFVfohMRrdq2BPIWi5FflJnO+vu0QC2YVEWAewEsgigAbIIoMG6LNJ0z5Tvpqn784oOGkBjVxbhnTC3hBnt4AcPQJHmsG5cxHGcw8GPBJljklrMs4jMIUCIdaOrx/0QDJTJ7vTSo0DCFMLYIMsuAEMn7tEYFiLJIuyrNosIPUDKpGK0SycVW7KI8biqIK8gya0NWdpg3oIiamx5XkTbLXUcR/FXfUxDQ89npoX9WbBEgUVZBOlu88oUYcyImkUANdb1RdSPAah/m0TxFokeogFLTLAliyCzhwG0isgaEWFGAUVMsGhcBBlYouiymBugaH0AHutGVw0uasTIskWkBgjg6cQ9GqCnsSuLABZidRZp3xb/7jdf9lC06SAY0p9ZhPnVV36Brp/1/lSkV7II+SHgxrToJ8W7ftb7U5GegP7vBOhwirek62e9PxXpiSxC/jsBk0WEipBpZr7JCaMnQJGegfGDzFRkEUTpEumEgSICLM8ix/6lieiVRni+QREhPZ9FZBLIZmLUitDL0J+i42bIiuJPrflaikp2ix7IIopXphEh/74CKdVBXENDz0RKOYSv5hOIc0g2AVkkHugLFjxFXull+BXVijCL8W95RWSLCYVQKKLORl3B6iyihblg4S2h8wpNpO8xEiUM4UyTcrSKyKTpFr2dRRB3wcK0NQnqlV6L/94jXT4QvhWuJSuf/kiWM/hCekkRC7MIRtEtlVnCt/c2R0eOopSezyJahG1N1896fypibRZpgq6f9f5UpJ/o+lnvT0ViySLC6wvAZjqaRRqXowgs6SXizyKKPCEbpegztM9Lp9PpyclJ2VvbiD+LHF1nUjb0sRxCIdSWYCfov/HBipi41fmH9WP+P72Iep6HDEVQ71SKxPVHtp08jsyfcqmh1yJOlEolxhj1jnTekjj/23ejFNHIN3N3TYbsj+c6RqTtmpxUXg5emrSooVF8VTp8cNqpiEgU4ZOkhL5XhMwkaUOdbPpWkQSlBj3ybagI8w1Lp9OXLl2SHUHhKYk0k9mW+QmQnX6mQOECwv5pDyvCay57hqNREJU58N9qJw7/XFvdaVUcU+EJFq4iO9DCk2d4VqLW1mR31OsqKmOjIjyy+dgArMWxmYcfqX9qRnbgLl26JFvSUBHmrMRy9NWFyPbl9u3b6eOXMMIaxlXJ1olTESwHmaZ18X3/6KpG+QMQbVLEZEOK+ea1NSkn3X8NDY9wPv6JGLqJIa3M0Tbklii+SYrTbHL6I5UsK1aIumIKgbSKqKtnUre4iHlcBP++Ay9KYwOHcmh/2awVOnwQhedV+JZexeSKRr2tjtGWezS8KB2Qw/Aot3vrJh+ZZBF7aONtPFqUdmcOoH2c0OdFAHM6oUg/Pa52AoEsAmiwLosY/vgd0ATCayvtWnZlEcdxtP+VF2ga2QiQ+kqwjT/NG/VBE94PYok6tZDd468tY9kXQyJdcpMKo6bqqdiQ4qyrD04XFIk0Hxn/AytzRTpJ1BzeoiKGa9GHhZaGzx+KXNIJReitGigS+b99gyKGy8iyiDq7WKeI2g9h70SoiFAX/pvELyl8G3UZ2TdSVhlhyeoaygpXnG9ZnRmYAturCL9txYMmrWQRJPpGyg6QQiPhMsLNqbclnKOodis11Jas3heFRpg+ySIoiiImc/gvnHYZbeGKastKNqyhYcmynVKXaZ0iHcgiJnNMPrJWEf5TfltkPvlIVqB1VzRxZRFhy0rPFC6AuIOVpoi0DL+YotrCVdQ1VBSuEEKxIeEqyLZxEVyNqFkEYJBlGnUWYeYQLBpdNflnNDAqr0XWcinykzrbWXePBrANi7IIYCeQRQANkEUADdZlkXh7popeGGCIXVmk6edF0seh58uW0Y4uABi7xkWae16EQaGIdhrgsW50VQso0mH64R4NgoamnVinSBP3aJA8E0AWaZ1+eF4EgSLtpH+yCDQ0bcI6RVq/0wvd1Xix7oqmuSxCA4rEi13jIrgakEWswqLR1RafFxF2LMhboQfQFzHBIkUAOwFFAA2gCKABFAE0gCKABlAE0ACKABpAEUADKAJoAEUADaAIoAEUATSAIoAGUATQAIoAGkARQAMoAmgARQANoAigARQBNIAigAZQBNAAigAaQBFAAygCaABFAA2gCKABFAE0gCKABlAE0ACKABpAEUADKAJoAEUADaAIoAEUATSAIoAGUATQAIoAGkARQAMoAmgARQANoAigARQBNIAigAZQBNAAigAaQBFAAygCaABFAA2gCKABFAE0gCKABlAE0ACKABpAEUADKAJoAEUADaAIoAEUATSAIoAGUATQAIoAGkARQAMoAmgARQANoAigARQBNIAigAZQBNAAigAaQBFAAygCaABFAA2gCKABFAE0gCKABlAE0ACKABpAEUADKAJoAEUADawiuwDAQRT5fwdYwXVaGf2mAAAAAElFTkSuQmCC)
1)导入脚本
#此节方便不熟悉office宏的童鞋
以Word2010为例,点击 视图 - 宏
这个Operation就是用来格式化的宏,不过现在还是没有的。点编辑
进入VBA编辑器后,在左上角的工程窗口里找到 normal下的newmacros,如果没有的话就自己在模块下建一个模块
双击打开,把VBA代码赋值进去:
Function CollectionSort(ByRef oCollection As Collection, Optional bSortAscending As Boolean = True) As Long Dim lSort1 As Long, lSort2 As Long Dim vTempItem1 As Variant, vTempItem2 As Variant, bSwap As Boolean For lSort1 = 1 To oCollection.Count - 1 For lSort2 = lSort1 + 1 To oCollection.Count If bSortAscending Then If oCollection(lSort1) > oCollection(lSort2) Then bSwap = True Else bSwap = False End If Else If oCollection(lSort1) < oCollection(lSort2) Then bSwap = True Else bSwap = False End If End If If bSwap Then 'Store the items If VarType(oCollection(lSort1)) = vbObject Then Set vTempItem1 = oCollection(lSort1) Else vTempItem1 = oCollection(lSort1) End If If VarType(oCollection(lSort2)) = vbObject Then Set vTempItem2 = oCollection(lSort2) Else vTempItem2 = oCollection(lSort2) End If 'Swap the items over oCollection.Add vTempItem1, , lSort2 oCollection.Add vTempItem2, , lSort1 'Delete the original items oCollection.Remove lSort1 + 1 oCollection.Remove lSort2 + 1 End If Next Next End Function Function GetResult(ByRef arr As Collection) CollectionSort arr Dim result As String flag = False For i = 1 To arr.Count If i = arr.Count Then result = result & "[" & arr(i) & "]" Exit For End If If flag = False Then result = result & "[" & arr(i) If arr(i) + 1 = arr(i + 1) Then flag = True result = result & "-" Else result = result & "]" End If Else If arr(i) + 1 = arr(i + 1) Then If i + 1 = arr.Count Then result = result & arr(i + 1) & "]" Exit For End If Else result = result & arr(i) & "]" End If End If Next GetResult = result End Function Sub Operation() '查找参考文献插入位置 With Selection.Find .Text = "{references}" '表征插入位置的标签 .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = True .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Dim result As Range '记录插入位置 Set result = Selection.Range result.Text = "" Dim c As Comment Dim dic As Scripting.Dictionary '保存已经出现过的参考文献 Set dic = New Scripting.Dictionary i = 0 '记录标号 For Each c In ActiveDocument.Comments If c.Scope.Text = "[]" Then c.Scope.Text = "" Dim p As Paragraph Dim indexs As Collection Set indexs = New Collection For Each p In c.Range.Paragraphs If Left(p.Range.Text, 1) = "@" Then If Not dic.Exists(p.Range.Text) Then i = i + 1 dic(p.Range.Text) = i result.Text = result.Text & "[" & dic(p.Range.Text) & "]" & Right(p.Range.Text, Len(p.Range.Text) - 1) End If indexs.Add dic(p.Range.Text) End If Next c.Scope.Select Selection.Text = GetResult(indexs) Selection.Font.Superscript = wdToggle c.Delete End If Next End Sub
还要注意一下Word的安全性设置。打开word选项,点击信任中心,选择启用所有宏
2)编写模版
#生成每条参考文献不是这个脚本的功能,不过推荐使用这个http://rolfzhang.com/articles/940.html
有以下几个规则:
a)[]表示要插入引用的地方,参考文献通过批注插入在这里:
这样做的原因是批注可以随着文字移动,这样的话就可以重排文字而不用担心顺序的问题了。
b)参考文献之前必须加@,以和一般批注相区别(如上图)
c)一个批注里可以有多个参考文献,以@开头即可
d)多个完全相同的参考文献会自动合并
e)在需要插入参考文献的地方写上{references}
3)运行宏
运行之前强烈建议先另存为上面的成果(以批注的形式添加完所有引用,标注好references,但不要执行脚本),因为转换的过程是不可逆的~
再次打开宏面板,选中operation执行
等待奇迹发生吧。。。
之后就和脚本毫无关系了。。。。
有问题咨询QQ:39977397
主要思想来自于已经失传的软件Ref-tidying(否则我这懒人怎么会自己写呢……)
希望对大家有帮助