vba 位前相似筛选_Excel VBA复制筛选的当前区域可见单元格,但排除最后3列

有小问题。我有一个很大的代码,它接受用户选择的参考号,并通过过滤和复制数据在多个其他工作表上定位相应的行(可以有多个行,也可以没有行)。

这很好,除了它复制所有可见数据(列A-N)当我真的希望它复制列A到K时(因为粘贴表上的L到N是我有设置参考号的公式的地方,因此无法粘贴)。

我尝试了对下面的代码部分(包括offset)进行一些更改,但是它忽略了偏移量(可能是因为我使用的是xlCellTypeVisible,我必须这样做,因为需要复制的数据可以跨多个非连续行),或者我得到了一个不支持选择方法的错误。

有什么想法吗?

正在复制的工作表-DbExtract

将数据粘贴到的工作表-重复记录

谢谢。

Sub UpdateInputWithExisting()

' Other code that works using set with values and active cell offset with values for other sheets

Sheets("TK_Register").Range("A1").CurrentRegion.AutoFilter field:=12, Criteria1:=RefID

Dim DbExtract, DuplicateRecords As Worksheet

Set DbExtract = ThisWorkbook.Sheets("TK_Register")

Set DuplicateRecords = ThisWorkbook.Sheets("EditEx")

DbExtract.Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).copy

DuplicateRecords.Cells(31, 3).PasteSpecial xlPasteValues

On Error Resume Next

Sheets("TK_Register").ShowAllData

On Error GoTo 0

ActiveWorkbook.RefreshAll

Sheets("EditEx").Select

ActiveWindow.SmallScroll Down:=-120

Range("B14:M14").Select

MsgBox ("Record Retrieved. Make your changes and ensure you click 'Save Changes' to update the Master Registers")

End Sub

vba 位前相似筛选_Excel VBA复制筛选的当前区域可见单元格,但排除最后3列相关推荐

vba数组如何精确筛选_Excel VBA 数组知识点，数组能不能用好，就看这个你学会没有...
今天和大家要说的是VBA数组的应用,上篇文章我们说的是数组的基础知识点,有不明白的小伙伴可以点击链接进行知识点回顾Excel VBA 数组基础知识,初学者不可不学的关键知识,今天主要说说数组的几个操作 ...
mongo 多条件筛选_excel成本统计：如何进行区域筛选，多条件求和？
编按:哈喽,大家好!最近有位小伙伴被一个计算产品成本的问题难住了,要求是根据配件成本核算出成品的成本.这个问题看上去似乎有点复杂,感觉一下子想不出好的解决办法,实际上,却非常简单,而且仅用常见的求和函 ...
使用vba进行excel超链接设置（链接到当前文档某一单元格）
最前面直接说怎么做,使用 sheet.Hyperlinks.Add 添加link,目的位置 anchor ,address 如果是本文件就空着,subaddress写sheet名称和位置,TextD ...
excel自动筛选_Excel 2010自动筛选中的新搜索功能
excel自动筛选 Last week, you saw a quick tip for filtering by selection in Excel 2007. That's helpful wh ...
VBA【遍历每个工作表并将工作表表名赋予B2单元格】
方法一: 存在缺陷:选中所有单元格,批量生成公式时候,每次需要点击进入工作表点击单元格--进入编辑状态,然后公式才会生效使用公式如下: =MID(CELL("filename" ...
excel表格行列显示十字定位_EXCEL中如何设置点击任意一个单元格出现一个十字架标明行和列...
在Excel中,为了增强活动单元格的对比性,有时候我们常常需要修改其背景颜色.字体.字号等,用来区分和其它单元格的对比! 本教程,让我们一起来学习,如何让Excel活动单元格所在行和列都着上背景颜色, ...
excel单元格内容拆分_Excel技巧：如何批量合并相同内容单元格？
金秋十月,现在的天气已经进入一场秋雨一场寒的时候了,小伙伴们要多多注意增减衣服哦今天,小编将要和大家分享的是如何快速批量合并相同内容的单元格,效果图如下图所示: 那具体要怎么操作才能快速实现这样的效 ...
python读取excel文本单元格换行符_Excel自文本导入内容时如何做到单元格内换行...
前言:今天在处理数据的时候,在数据库中用到了\n换行符号,目的是在同表格内做到数据多行显示,比如字段名1 字段名2 字段名3 1 数据一行数据二行数据三行例子是在sql查询后的结果 2 例子如 ...
【VBA】点击工作簿中的每个单元格，整行整列变色
需求描述在点击单元格的时候,单元格所在行与列都变色显示实现方案打开Excle表格,按住ALT+F11 双击上图中的ThisWorkbook Private Sub Workbook_SheetS ...
学习vba之按列合并将选定区域的单元格合并成一列
学习VBA-合并列首先选定一个区域,将这个区域的内容按列合并到该区域的后一列中. 学习过程中,如有错误或改进之处,还请多多指教! Sub 合并列() Dim hang As Integer '控制输 ...

vba 位前相似筛选_Excel VBA复制筛选的当前区域可见单元格,但排除最后3列

vba 位前相似筛选_Excel VBA复制筛选的当前区域可见单元格,但排除最后3列相关推荐

最新文章

热门文章

vba 位 前 相似 筛选_Excel VBA复制筛选的当前区域可见单元格,但排除最后3列

vba 位 前 相似 筛选_Excel VBA复制筛选的当前区域可见单元格,但排除最后3列相关推荐

最新文章

热门文章

vba 位前相似筛选_Excel VBA复制筛选的当前区域可见单元格,但排除最后3列

vba 位前相似筛选_Excel VBA复制筛选的当前区域可见单元格,但排除最后3列相关推荐