使用vb.net在excel中汇总一行

我有一个excel电子表格。我已经对各列进行了汇总，但现在我需要对整行的各个总计进行汇总，得到一个总计。列是P，Q，R，S，T。因为每个工作表的行数总是不同的，所以我已经得到了数据的最后一行，并且我向它添加了两行，这样总行数将比数据少两行。我把B栏中的总计与单个总计放在同一行。这就是我现在拥有的。任何帮助都将被告知

Dim r As Integer
r = lastRow + 2
orange = oSheet.Range("B" & r)
orange.Select()
oSheet.Cells(r, "B").Formula = _
           "=SUM(P:" & r + "Q:" & r + "R:" & r + "S:" & r + "T:" & r & ")"

我得到这个错误：“从字符串“Q:”到类型“Double”的转换无效。”

---

谢谢！劳拉

您不必列出每个单元格。以下几点就足够了：

oSheet.Cells(r, "B").Formula = "=SUM(P" & r.ToString() & ":T" & r.ToString() & ")"

---

您应该仅使用&用于连接：您的代码正在尝试添加

r

和

Q:

，就好像它们都是数字一样。标题是“vb.net”，而标记是“vba”-令人困惑