Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/27.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel:是否从B列的重复列表中删除A列值?_Excel_Excel Formula_Vba - Fatal编程技术网

Excel:是否从B列的重复列表中删除A列值?

Excel:是否从B列的重复列表中删除A列值?,excel,excel-formula,vba,Excel,Excel Formula,Vba,在A列中,我有一系列按数字顺序排列的数字。每个数字都在自己的单元格中 在B列中,我有一个包含所有这些数字的单元格。A列中的每一行都有B列中该单元格的副本 例如: A1:100 A2:200 A3:300 B1:100 200 300 B2:100 200 300 B3:100 200 300 我需要一种从B列列表中删除a列值的方法,这样B列中的每个列表都不会在其a列中包含该值 例如: A1:100 A2:200 A3:300 B1:200 300 B2:100 300 B3:100 200 基本

在A列中,我有一系列按数字顺序排列的数字。每个数字都在自己的单元格中

在B列中,我有一个包含所有这些数字的单元格。A列中的每一行都有B列中该单元格的副本

例如:

A1:100

A2:200

A3:300

B1:100 200 300

B2:100 200 300

B3:100 200 300

我需要一种从B列列表中删除a列值的方法,这样B列中的每个列表都不会在其a列中包含该值

例如:

A1:100

A2:200

A3:300

B1:200 300

B2:100 300

B3:100 200

基本上与之相反。我怎样才能做到这一点,最好没有VB


如果您将单元格b1中A1的值替换为空白值,它是否无效?你试过了吗

Range("A1").Select
Value1 = ActiveCell.Value
ActiveCell.Offset(0, 1).Replace What:=Value1, Replacement:=" ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

如果您将单元格b1中A1的值替换为空白值,则它不起作用?你试过了吗

Range("A1").Select
Value1 = ActiveCell.Value
ActiveCell.Offset(0, 1).Replace What:=Value1, Replacement:=" ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
  • 基于用CHR(10)分隔数字的注释
假设您的数据在A1:B3范围内。
在两列之间插入一列,这样您将有三列,其中A列和C列包含数据,B列之间为空白。
将此公式放置在单元格B1中并向下拖动

=TRIM(SUBSTITUTE(SUBSTITUTE($C1,$A1,""),CHAR(10)," "))  
结果将显示在B列中,如下所示:

  • 基于用CHR(10)分隔数字的注释
假设您的数据在A1:B3范围内。
在两列之间插入一列,这样您将有三列,其中A列和C列包含数据,B列之间为空白。
将此公式放置在单元格B1中并向下拖动

=TRIM(SUBSTITUTE(SUBSTITUTE($C1,$A1,""),CHAR(10)," "))  
结果将显示在B列中,如下所示:


与其他评论类似,我有一个疯狂的嵌套公式,但也许值得一试

=修剪(替换(“&SUBSTITUTE(B1,字符(10),”)&“&A1&“,”)


。。。替换字符(10)只是为了比较,并在每个值的任一侧添加空格以针对实例,例如1002中的100与其他注释类似,我有一个疯狂的嵌套公式,但可能值得一试

=修剪(替换(“&SUBSTITUTE(B1,字符(10),”)&“&A1&“,”)



。。。替换字符(10)只是为了进行比较,并在每个值的任一侧添加空格,以针对1002中的实例,例如100

Ready to use helper列,如果您不想使用VBA?是的,电子表格的其余部分可以广泛使用。因此我想我们可以在a和B之间插入一列,这样您将在单元格C1中获得新的comun B,使用此公式并向下复制:
=TRIM(替换(“&B1&”、“&A1&”、”)
列C将包含您想要的结果。是的,我可以添加更多列@tigeravatar没有骰子,它只是在每个细胞中复制B1的列表。我可能需要注意的是,列表中的值不是用空格或逗号分隔的,而是用字符(10)换行符分隔的。如果不想使用VBA,可以使用辅助列吗?是的,电子表格的其余部分可以广泛使用。因此我假设我们可以在a和B之间插入一列,这样您将在单元格C1中获得新的comun B,使用此公式并向下复制:
=TRIM(替换(“&B1&”、“&A1&”、”)
列C将包含您想要的结果。是的,我可以添加更多列@tigeravatar没有骰子,它只是在每个细胞中复制B1的列表。我可能应该注意到列表中的值不是用空格或逗号分隔的,而是用CHAR(10)换行符分隔的。我不确定我理解你的意思。查看注释,我理解你的问题。。。替换得到了部分值…如果你将文本转换为列,用空格分隔,你将得到完整的数字,也许这对你有帮助。我不确定你的意思。查看注释,我理解你的问题。。。替换得到部分值…如果您将文本转换为列,用空格分隔,您将得到完整的数字,也许这对您有帮助。谢谢!这几乎是可行的,但因为它删除了100的所有实例(在本例中),而不是具体的“100”,所以结果像1000变成0,5100变成5,等等。有什么想法吗?此外,如果有帮助,数字在列表中的位置将始终等于其行号,即100在第1行,是列表中的第一个值,200在第2行,是列表中的第2个值,等等。您应该提供更好的测试数据。你能用一个更新你的问题吗?除了第一行和最后一行之外,我所有的行都有你的新要求。我还在努力。我在原始帖子中添加了一个指向整个数据集的链接。谢谢,我可以手动完成第一步和最后一步,没问题!试试这个公式
=TRIM(替换($C1,CHAR(10)和$A1&CHAR(10),“”),CHAR(10),“”)
。就像我说的第一排和最后一排都不行。我还在做完整的一手帕!这几乎是可行的,但因为它删除了100的所有实例(在本例中),而不是具体的“100”,所以结果像1000变成0,5100变成5,等等。有什么想法吗?此外,如果有帮助,数字在列表中的位置将始终等于其行号,即100在第1行,是列表中的第一个值,200在第2行,是列表中的第2个值,等等。您应该提供更好的测试数据。你能用一个更新你的问题吗?除了第一行和最后一行之外,我所有的行都有你的新要求。我还在努力。我在原始帖子中添加了一个指向整个数据集的链接。谢谢,我可以手动完成第一步和最后一步,没问题!试试这个公式
=TRIM(替换($C1,CHAR(10)和$A1&CHAR(10),“”),CHAR(10),“”)
。就像我说的第一排和最后一排都不行。我还在写完整的oneOh不,等等,刚刚看到关于CHAR(10)的评论。。。将有另一个外观和编辑此!编辑-似乎在我的测试电子表格上工作,假设我正确理解了您的数据集:)哦,不,等等,刚刚发现了关于CHAR(10)的评论。。。会吗