excel合并单元格 得到所有数据

[everydayrun1]

excel合并单元格如何得到所有数据？并显示在原来的单元格中， 默认的 合并单元格只保留最左边的数据。

[z_wenqian]

什么意思，得到什么数据？说清楚。

[everydayrun1]

不好意思。我是新手，实在不知道怎么使用你的代码。能够说下吗？我拷贝到模块中。但是插入 函数中没有自己定义的类别

[laoyebin]

这个不是函数啊，这个是过程，按F5运行，或附到工具栏上

[everydayrun1]

[Quote=引用 7 楼 laoyebin 的回复:]

这个不是函数啊，这个是过程，按F5运行，或附到工具栏上
[/Quote]

我还是不会。按了F5，代码拷贝不上去。用的是excel 2003.
麻烦再指点下，说详细点。谢谢

[everydayrun1]

比如说：A1,B1,C1里面都有内容。 你合并这三个单元格后 只能够得到A1的内容。 现在合并的时候我想得到三个单元格的内容。 怎么办呢？

[laoyebin]

用VBA吧

Sub MergeRanges()
    Dim rng As Range, txt As String
    For Each rng In Selection
        txt = txt & rng.Value2
    Next
    Application.DisplayAlerts = False
    Selection.Merge
    Selection = txt
    Application.DisplayAlerts = True
End Sub

[nklfs]

楼上正解

微软提供的合并单元格功能就是那样的，想要特例的，就要自己动手呀。

[z_wenqian]

[Quote=引用 4 楼 nklfs 的回复:]
楼上正解

微软提供的合并单元格功能就是那样的，想要特例的，就要自己动手呀。
[/Quote]

少了就手动粘贴吧。多了就用VBA吧，3楼正解

[z_wenqian]

你知道VBA编程吗？你用过吗？如果连基本的操作都不会，那就很难用上述代码了。上面的不是函数，没有现成的函数，而是VBA过程代码，表格中按ALT+F11出现新的窗口，找到你对应的表，然后将代码拷入其中，先在表格中选中要合并的单元格，然后再到代码内，按F5运行。要不然就是你放上附件，大家帮你做吧。