VBA（Visual Basic for Applications）是一种编程语言，主要用于在微软Office套件的各种应用程序（如Excel、Word、PowerPoint等）中进行自动化和定制。以下是一些VBA可以编写的程序示例：
数据处理与分析
自动提取和整理Excel电子表格中的数据，进行计算、排序、筛选和汇总等操作。
编写VBA代码来处理和分析数据，例如计算平均值、最大值、最小值等统计指标。
自动化任务
自动化执行重复的任务，如批量处理文件、自动填充数据、生成报表等。
编写脚本来自动打开、保存、关闭和备份Excel或Word文件，将文件转换为其他格式，自动发送电子邮件等。
用户界面设计
创建交互式的用户界面，使用户更方便地操作应用程序。
设计自定义的窗体、按钮、对话框等，以及定义相应的事件和操作。
报表和图表生成
生成各种形式的报表和图表，将数据可视化展示。
编写VBA代码来创建动态的图表、自定义报表模板、自动填充数据和更新图表等。
数据库操作
连接到数据库服务器，执行SQL查询，插入、更新和删除数据，以及生成报表或导出数据等。
自动化编程工具
利用VBA编写代码自动完成一系列操作，省去了手动执行重复性的任务的时间和劳动力。
示例1：自动化数据输入
```vba
Sub AutoFillData（）
Dim i As Integer
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets（"Sheet1"） ' 修改为你的工作表名称
For i = 1 To 10 ' 填充1到10的数字
ws.Cells（i, 1）.Value = i
Next i
End Sub
```
示例2：在A1单元格里输入“Hello, VBA!”
```vba
Sub SayHello（）
Range（"A1"）.Value = "Hello, VBA!"
End Sub
```
示例3：一键更新报表模板
```vba
Sub UpdateReport（）
' 清除旧数据
Sheets（"销售数据"）.Range（"A2:D1000"）.ClearContents
' 假装这是从数据库导入新数据
For i = 2 To 100
Cells（i, 1）.Value = "产品" & i - 1
Cells（i, 2）.Value = Int（Rnd（） * 1000） + 1
Cells（i, 3）.Value = Int（Rnd（） * 100） + 10
Cells（i, 4）.Formula = "=B" & i & "*C" & i
Next i
End Sub
```
通过这些示例，你可以看到VBA在Office应用程序中的广泛应用，从简单的数据输入到复杂的报表生成和自动化任务，VBA都能提供强大的支持。