Excel VBA查找列中的最后5行，并将文本连接到单元格I2中，以“，”分隔&引用；

大家好，我正在尝试编写一个代码，查找列“G”中的最后一行，然后将最后5行（由“，”分隔）连接到单元“I2”中

我知道如何连接5个特定的单元格，以及如何查找最后一行等，但我不知道如何将它们连接在一起

任何帮助或指点都将不胜感激

提前感谢。

将连接一个带分隔符的字符串，但需要首先翻转行的范围

---

HI Jeeped，谢谢你花时间看这个，我忘了说“G”列的单元格中有公式，我希望公式的值是，在我得到值错误的那一刻。不知道你为什么会得到这个错误；a的默认值与a相同；这就是问题所在。我已经在公式中使用和不使用进行了测试，似乎没有问题。仍然存在获取值错误，在G中的每个单元格中，公式中的值都是一个字母而不是一个数字。函数Copylast5（）作为整数Dim ws7作为工作表集ws7=工作表（“Tabelle1”），ws7带有.Cells（Rows.Count，7）.End（xlUp）使用.Resize（5,1）.Offset（-4,0）ws7.Cells（2,9）=Join（Application.Transpose（.Cells.Value2），Chr（44））End With End With End With End With End With End With End函数您能告诉我们您目前有哪些代码吗？

Dim ws7 As Worksheet

Set ws7 = Worksheets("sheet7")
With ws7
    With .Cells(Rows.Count, 7).End(xlUp)
        With .Resize(5, 1).Offset(-4, 0)
            ws7.Cells(2, 9) = _
                Join(Application.Transpose(.Cells.Value2), Chr(44))
        End With
    End With
End With