excel - 使用单元格引用从特定行号复制到最后一行
问题描述
我有下面的代码,我需要让它如下工作。
- 从第 10 行复制到最后一行的值。
- 最后一行将参考从单元格 N10 开始的 N 列。
SO团队有什么建议吗?
wbSource.Sheets(SITE_TEMPLATE).Rows(10).EntireRow.Copy wbMaster.Sheets(SITE_TEMPLATE).Range("A" & insertRow2)
insertRow2 = insertRow2 + 1
解决方案
尝试这个:
Sub test()
Dim LastRow As Long
With Workbooks("wbSource").Worksheets("SITE_TEMPLATE")
LastRow = .Cells(.Rows.Count, "N").End(xlUp).Row
.Rows(10 & ":" & LastRow).EntireRow.Copy wbMaster.Sheets(SITE_TEMPLATE).Range("A" & insertRow2)
insertRow2 = insertRow2 + 1
End With
End Sub
推荐阅读
- highcharts - Highcharts中带有梯度图例的填充气泡图
- python - 无法使用 os.environ 在 Python 脚本中访问 Jenkins 环境变量
- sql - 如何使用 SQL 选择计数最高的父项和子项
- reactjs - 如何在 TailWindCSS 中使用诸如 fontsource 之类的 Web 字体库
- sql-server - 使用 Azure Active Directory Interactive BCP 输入/输出多个文件
- reactjs - 反应路由器链接不是重新渲染组件
- python - python,Selenium“CTRL + S”保存视频不起作用
- java - 写入多个文件时新行分布不均匀
- jquery - 如何避免 JQuery 与其他库冲突
- salesforce - 如何开始使用 Salesforce DX 进行内部组织自定义