如何 return 到 VBA 上的上一个 sheet？

Question

您好，我有一个数据集需要重新格式化。数据来自多列，但我已将其合并为一列，然后进行 xlookup。我想我可以编写一个脚本来复制记录并将其粘贴到将进行数据清理的 sheet 上，除非我使用命令“lstsheet.select”时我得到一个运行时间 424 错误。我必须使用 last sheet 而不是特定的 sheet 的原因是因为我必须使其动态化以便最终用户不必 select 特定的宏。

数据是这样的

A 列：Driver

B 列：拖拉机

C 栏：预告片

但我希望它相互堆叠，所以在另一个上 sheet 它会显示包含所有三个值的一列。

Sub Asset_Export()

Range("E5:E100").Copy

Worksheets("Asset Upload").Range("A2").PasteSpecial xlPasteValues

LstSht.Select

Range("F5:F100").Copy

Worksheets("Asset Upload").Range("A98").PasteSpecial xlPasteValues

End Sub

Data Source

Result of Data

Answer 1

您可以通过输入框选项获取值来提供动态 sheet 数字。

i = inputbox("Enter the sheet number")

sheets(i).range(XX).copy

继续...

如何 return 到 VBA 上的上一个 sheet？

How to return to previous sheet on VBA?

excel

vba