Question

Excel VBA如何向合并单元格写数据？

Excel 2007版；

Answer 1

你合并后，点一下合并后的单元格不就可以看到，单元格的行列号了吗？
然后用Range("H12")=35
H12就是行列号
就行了。

追问

谢谢你；你们只要告诉我对合并单元格写数据的VBA语句，可以跟我的表的结构
（这个我自己根据具体情况调整，精确控制）没关系！
谢谢启发，那我试试看这句可以不(没13行一个表单)：
Range("i" & 12)=6
i=i+13

希望可以，谢谢！

追答

你的i是列号
下面的i怎么可以=i+13
成了变量

追问

刚写错了，我的原始是：
Range("H" & i)=6

i=i+13

怎么控制行有规律的变动？

追答

你这就行呀，在前面加上判断就行了，要有结束。

Answer 2

看不太明白你想怎么做、做什么？但依据你的叙述，建议你先录制一段宏命令，这段宏命令能够达到你的目的，然后打开VBA，修改你创建的宏命令的相关代码。

追问

感谢各位，我已经试验成功了：
Range("H" & k + 5) = Sheet2.Cells(i + 2, 15).Value
Range("P" & k + 5) = Sheet2.Cells(i + 2, 15).Value
H,P列为合计列，sheet2中的第15列（“O”列）保存有相应的合计数据，直接赋值可以；

Answer 3

[f12].value=100

追问

每同一横排（行）有两个表单（左边是奇数宿舍号，右排是偶数宿舍号）；
总共有200多个表单（宿舍号，即图中的“113”），每个表单的“合计”栏为合并单元格；

明显：合计人数 = A班人数 + B班人数
（如111宿舍的“合计”栏应该自动填入“6”）
关键是VBA在对合并单元格写入数据时报错；没办法写入！

追答

你用我的代码试过了吗，我试了是可以的，往合并单元格写数据就是往第一个单元格写数据。除非是你写错了，写到第二个格子上去了

追问

但是：
Sheet2.Range("O" & i + 2).Copy Sheet1.Range("H" & k + 5)
Sheet2.Range("O" & i + 2).Copy Sheet1.Range("P" & k + 5)
就报错，说合并单元格****错误；
以后改这种写法就好了，不用.copy函数了;再次感谢各位！