VBA技术资料MF118：在多个工作表中插入页眉和页脚

我给VBA的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的工作效率，而且可以提高数据的准确度。我的教程一共九套，分为初级、中级、高级三大部分。是对VBA的系统讲解，从简单的入门，到数据库，到字典，到高级的网抓及类的应用。另外，为了方便大家学习和应用，我又推出了一部VBA汉英手册，这部手册覆盖了VBA的方方面面，与实际工作衔接度高。

为了更好的完善学员的知识结构，及丰富学员的实践经验，我还会提供给大家更多的VBA工具，有较复杂些的NZ系列工具，较容易些的YZ系列，同时还有MF系列技术资料，MF,YZ，NZ各个系列的工具，在平台上不会公布代码，大家可以根据自己的需要联系我选择。MF系列技术资料侧重VBA应用技巧和疑难杂症，目前提供380份资料，里面有很多实用技巧提供给大家。对于MF系列资料，学员只要获得我所有教程（9套教程+汉英手册）中的三套及以上就可以索获这个系列资料;如果您获得我的全部教程+手册+工具（NZ,YZ），那么您可以获得我提供的所有MF系列技术资料，如果您还不是我的T3学员，您可以选择分享。今日给大家介绍的是VBA技术资料MF118：在多个工作表中插入页眉和页脚

【分享成果，随喜正能量】世人不知因果，常谓人死后，则告了脱，无善恶果报，此为最误天下后世之邪见。须知人死之后，神识不灭。如人人能知神识不灭，则乐于为善。若不知神识不灭，则任意纵欲，杀父杀母，种种罪恶，由此而生。此种极恶逆之作为，皆断灭邪见所致之结果。人人能诸恶莫作，众善奉行，并须敦伦尽分，闲邪存诚，则国运可转，灾难可消。则天下太平，人民安乐。然此尚非究竟法。何为究竟法？是在念佛求生西方，了生脱死。。

MF118：在多个工作表中插入页眉和页脚

在页面设置的时候，我们通常会在页眉、页脚中插入某些信息，例如文件名、文件路径或当前日期或页码。如果只是一个工作表，您可以手动执行此操作，但如果它是需要把信息添加到工作簿中的多个工作表或所有工作表，甚至是多个工作簿的多个工作表中，手工完成是比较繁琐的，则可以使用简单的VBA宏代码执行此操作。MF118的资料提供给大家利用VBA宏来完成一个工作薄中多个工作表的页面设置的方法。此示例宏将在活动工作簿的多个工作表中插入页眉、页脚。它还将插入工作簿的完整路径、打印时间等等。这个资料的内容是十分有用的，可以解决工作中的一个难点。MF118资料提供的内容有：①在多个工作表中插入页眉和页脚 ② 在多个工作表中删除页眉和页脚。

为了说明问题，我在工作簿中给出了sheet2和sheet3工作表，作为测试目标。

一 在多个工作表中插入页眉和页脚

我们看此处的操作界面：

点击按钮后，代码会运行，会在sheet2和sheet3中给出页眉和页脚的设置，结果截图示例如下：

二 在多个工作表中删除页眉和页脚

我们看此处的操作界面：

点击按钮后，代码会运行，会在sheet2和sheet3中删除页眉和页脚的设置，结果截图示例如下：

• 代码见程序文件：VBA_InsertHeadersFootersInMultipleSheets.xlsm