将PowerPoint文本框中的数据粘贴到Excel

将PowerPoint文本框中的数据粘贴到Excel,excel,vba,powerpoint,Excel,Vba,Powerpoint,我有一个PowerPoint,我需要将文本框中的数字复制到特定的excel文件中。我决定在PowerPoint上使用宏,因为该文件将与多个用户共享,并且我希望将每个文件的数据编译成电子表格。到目前为止,我的代码运行良好,但只复制到特定行,因此覆盖了现有数据。查找下一个空行的代码有问题。到目前为止,我所尝试的似乎只在从一个excel转换到另一个excel时起作用 rw = Range("A" & Rows.Count).End(xlUp).Offset(1).Selec

我有一个PowerPoint,我需要将文本框中的数字复制到特定的excel文件中。我决定在PowerPoint上使用宏,因为该文件将与多个用户共享,并且我希望将每个文件的数据编译成电子表格。到目前为止,我的代码运行良好,但只复制到特定行,因此覆盖了现有数据。查找下一个空行的代码有问题。到目前为止,我所尝试的似乎只在从一个excel转换到另一个excel时起作用

rw = Range("A" & Rows.Count).End(xlUp).Offset(1).Select
说到VBA,我充其量只是个新手。请帮忙

While xlsWB.Worksheets(1).Range("A" & row) <> ""
row = row + 1
Wend
此外,还可以使用
For循环
将其自动化

xlsWB.Worksheets(1).Range("A" & row) = ""