在Microsoft Access报表中合并相同内容单元格的方法咨询

当然可以实现类似Excel的合并效果，Access里主要有两种常用方式：

方法一：利用分组排序隐藏重复值（简单快捷） #

这种方式适合只需要让相同内容只显示一次的场景，视觉上类似合并单元格：

• 打开报表的设计视图
• 点击菜单栏的「分组与排序」（或右键报表空白区域选择该选项）
• 添加你要合并内容对应的字段作为分组依据
• 选中该字段对应的文本框控件，在右侧属性面板找到「重复控件」，设置为否
• 预览报表，相同内容的单元格就只会显示第一行，其余重复行的内容会被隐藏，达到类似合并的视觉效果

方法二：用VBA实现真正的单元格跨行合并（视觉更接近Excel） #

如果需要让单元格真正跨行占满高度，就得用VBA代码来调整控件高度并隐藏重复项：

1. 确保报表已按要合并的字段排序（可通过「分组与排序」设置）
2. 在设计视图中选中目标文本框，记住它的名称（比如txtTarget）
3. 按F7打开代码窗口，添加以下代码：

' 模块级变量，存储上一条记录的内容和控件高度
Dim strLastContent As String
Dim intLastHeight As Integer

Private Sub Report_Load()
    ' 初始化变量
    strLastContent = ""
    intLastHeight = 0
End Sub

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
    If Me.txtTarget.Value = strLastContent Then
        ' 隐藏当前控件，增加上一条控件的高度
        Me.txtTarget.Visible = False
        intLastHeight = intLastHeight + Me.Detail.Height
        Me.txtTarget.Height = intLastHeight
    Else
        ' 重置变量，显示当前控件
        strLastContent = Me.txtTarget.Value
        intLastHeight = Me.txtTarget.Height
        Me.txtTarget.Visible = True
    End If
End Sub

4. 预览报表，相同内容的单元格会自动合并成一个跨多行的单元格，效果和Excel的合并单元格一致

内容的提问来源于stack exchange，提问作者faccio