VBA自学收集：Excel宏编程技巧大全

VBA自学收集 VBA（Visual Basic for Applications）是一种微软公司开发的编程语言，广泛应用于Office系列软件，如Excel、Word、PowerPoint等。VBA可以用来自动化Office中的任务，提高工作效率和生产力。本文收集了10个有用的VBA代码，涵盖了从基本操作到高级应用的多个方面。 1.禁用 worksheet 菜单栏 在VBA中，我们可以使用`Application.CommandBars("WorksheetMenuBar").Enabled=False`禁用 worksheet 菜单栏。这可以防止用户意外地更改worksheet的设置。 2.获取活动单元格所在行B列单元格中的值 使用`cells(activecell.row,"b").value`可以获取活动单元格所在行B列单元格中的值。这可以用来实现一些自动化任务，例如根据某个单元格的值来触发某个事件。 3.添加名为“kk”的工作表 使用`Sub CheckSheet()`可以添加名为“kk”的工作表，并将其排在工作表从左至右顺序排列的最左边的位置。这个代码可以用来自动创建工作表，例如在某些数据分析任务中。 4.一次性增加 ListBox 项目 使用`Sheet1.ListBox1.List=Array("一月","二月","三月","四月")`可以一次性增加 ListBox 项目。这可以用来快速填充列表框中的数据。 5.将一行数据从一个表中拷贝到另一个表中 使用`Sheet2.Rows(1).Value=Sheet1.Rows(1).Value`可以将一行数据从一个表中拷贝到另一个表中。这可以用来实现数据的批量处理和自动化。 6.认识 Me 对象 使用`Sub pro_cell()`可以认识 Me 对象，例如在这个例子中，Me 就是 Sheet1。这可以用来实现某些自动化任务，例如保护和取消保护工作表中的单元格。 7.禁用工作表标签上快捷菜单 使用`Application.CommandBars("Ply").Enabled=False`可以禁用工作表标签上快捷菜单。这可以防止用户意外地更改工作表的设置。 8.将数据从一个列中填入到另一个列中 使用`Sub aa()`可以将数据从一个列中填入到另一个列中，例如从 B1 到 B12 单元格的数据填入 C1 到 C12 单元格。这可以用来实现数据的批量处理和自动化。 9.在点选的单元格插入批注 使用`ActiveCell.AddComment`和`Selection.Font.Size=12`可以在点选的单元格插入批注，并设置字体为 12 号。这可以用来实现批注的自动化和格式化。 10.ScrollArea 属性 使用`ScrollArea`属性可以设置允许滚动的区域，并防止用户选定滚动区。这可以用来实现某些数据分析任务中的滚动功能。 这些 VBA 代码可以帮助我们更好地自动化office中的任务，提高工作效率和生产力。但是，需要注意的是，在使用 VBA 代码时，需要小心地测试和 debug，以免出现错误和问题。