excel - 复制并粘贴到下一个可用行中,忽略格式
问题描述
我希望将信息从一页复制到另一页到下一个可用行。数据的行数将在保存之间发生变化。我目前有以下代码:
Sub CFSNCAll()
r = 1
Sheets("CFSNC_All").Range("C12:T298").Copy
If Sheets("CFSNC_All").Range("C12") = Sheets("Sheet1").Range("A65536").End(xlUp) _
Then r = 0
Sheets("Sheet1").Range("A65536").End(xlUp).Offset(r, 0).PasteSpecial _
Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub
这在没有格式的 Excel 工作表中完美运行。我的 Excel 工作表在范围内的两列中有边框、条件格式,并且网格线已关闭。目前,当您第二次运行宏时,数据会粘贴到右侧工作表中,但位于第 298 行。我认为它是在格式化之前的单元格中注册信息。有没有办法忽略格式并确保它粘贴在条目下方?
解决方案
推荐阅读
- c# - c# 将 DateTimeOffset 转换为 razor 中的祖鲁时间
- hadoop - avahi-daemon 是否应该在 hadoop 集群机器上运行?
- maven - 没有可用版本时的 Gradle/Maven 下载快照
- database - postgresql 选择一列中具有最大值的所有行
- pandas - pandas 使用多列加入
- json - FasterXML Object to JSON with specific Casing
- php - windows/mac上PHP-PostgreSQL web应用开发解决方案栈
- php - 尝试发送数组时仅插入最后一行
- android - 需要使用 ARCore/ARKit 将表设置为世界原点
- angularjs - 从另一个指令的函数中调用指令的函数