Excel批量合并单元格填写公式引用对应的单元格
1、如图,后面的合并单元格是前面合并单元格对应的单元格的和/平均数 ,想用个公式直接出来110/55,行数不确定,不一定只有两行,后面的平均数最好能取整。(百度知道问题)


1、首先打开Microsoft Office Excel 2007,新建文档并保存文件名《Excel批量合并单元格填写公式引用对应的单元格.xlsm》(演示文件,下面代码复制到能运行宏的工作簿都可以),如下图。

2、然后按下快捷键ALT+F11打开VBA(宏)编辑界面,然后点菜单栏【插入】下拉中列表中点【模块(M)】如图。

3、然后插入了一个模块1,在代码框中复制如下代码:
Sub 批量合并单元格填写公式()
'2020-6-24 22:01:29
Dim r As Long, myr As Range, m As String
Set myr = Selection
r = myr.Cells(myr.Count).Row + 1
myr.Cells(1).Select
Do While r > Selection.Cells(Selection.Count).Row
Set myr = Selection
m = myr.Offset(, -1).Resize(myr.Rows.Count, 1).Address(RowAbsolute:=False, ColumnAbsolute:=False)
ActiveCell.Formula = "=CONCATENATE(SUM(" & m & "),""/"",ROUND(AVERAGE(" & m & "),0))"
ActiveCell.Offset(1, 0).Select
Loop
End Sub

4、以上操作动态过程如下:

5、回到工作表窗口,首先选合并单元格区域,然后运行【批量合并单元格填写公式】宏(菜单栏中点【视图】中下列表中【宏】列表【查看宏(V)】打开宏对方框,选该宏名,点【执行】),输出所有公式,运行过程如下图。


6、如果觉得这篇经验帮到了您,请点击下方的 “投票点赞" 或者“收藏”支持我!还有疑问的话可以点击下方的 “我有疑问”,谢谢啦!