none
超级筛选能做到吗? RRS feed

  • 问题

  • 你现在看到的是9列5行的内容,最上面一行是筛选行
    筛选的每一列都要独立的
    筛选的每一列内容都不一样的,有的多,有的少
    看图(补充说明,图片不是我我筛选的结果啊,我复制上去的,我就是不知道能不能这样实现啊,请大家多来看看帮帮忙啊)

    若能的话,我还希望有这样的功能:筛选的内容可能是A杭州B上海C北京,筛选的时候能看到具体的内容,但是选中之后只显示代号A
    有能人能这样做到吗?
    这里不能上传图片,我把图上传到了网络硬盘http://e.ys168.com/?flyslayer


    可能我上面说的都不清楚!

    我想要满足的是:对于任意1列来说,单击该列中任意1个单元格,其内容自动会复制到另外的1个固定的单元格中(不需要按ctrl+C,只要单击该单元格就复制过去)
    如我单击A列中的单元格1,其内容就复制到Z列中单元格1去了,
    我再单击A列中的单元格5,其内容还是复制Z列中单元格1去了,
    我再单击A列中的单元格7,其内容还是复制Z列中单元格1去了,
    这下我应该说清楚了吧?

    有人能这样做到吗?来说说啊,谢谢先了啊
    2009年8月13日 4:02

答案

  • Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
        With ActiveSheet
    
            If Target.Column = 3 Then .Cells(40, 3) = .Cells(Target.Row, Target.Column)
    
        End With
    
    End Sub

    Target代表你所选中的单元格区域,Target.Row是你选中单元格区域的行号,Target.Column代表你选中单元格区域的列号;

    .cells后面的两个参数第一个表示单元格的行号,第二个表示列号。
    Microsoft Technet Observer 如果问题没有解决,请继续跟帖讨论;如果问题得到解决,请标记为答复。
    • 已标记为答案 fly_slayer 2009年8月14日 7:30
    2009年8月14日 6:57
    版主

全部回复

  • 这个……实在是为难EXCEL了。
    筛选其实就是把不需要的“隐藏”,但在EXCEL里,单个单元格是无法被隐藏的,要么是一整行要么是一整列,所以楼主你想要的这种筛选做不到。
    PS,楼主最终的目的是什么呢?如果只是想把与首行相同的用颜色标示出来(像图中所示那样)可以用条件格式啊。

    2009年8月13日 8:02
  • 那换个功能吧:
    现在有9列5行的内容,对于每1列来说,我单击该列中任意1个单元格,其内容都能复制到另外的单元格中,这样的功能能做到吗?


    可能我上面说的都不清楚!

    我想要满足的是:对于任意1列来说,单击该列中任意1个单元格,其内容自动会复制到另外的1个固定的单元格中(不需要按ctrl+C,只要单击该单元格就复制过去)
    如我单击A列中的单元格1,其内容就复制到Z列中单元格1去了,
    我再单击A列中的单元格5,其内容还是复制Z列中单元格1去了,
    我再单击A列中的单元格7,其内容还是复制Z列中单元格1去了,
    这下我应该说清楚了吧?

    有人能这样做到吗?来说说啊,谢谢先了啊

    2009年8月14日 0:15
  • 这是可以做到的,不过要绕个弯子……
    先全部复制过去,再反向选择一下,就是选不需要的,这个如果有规律的话可以用定位或查找,然后把这些不需要的删除。
    这样做是有点麻烦的,不过数据比较多的时候还是蛮快捷的。

    2009年8月14日 2:33
  • 单击任意1个单元格,其内容自动会复制到另外的1个单元格中(不需要按ctrl+C,只要单击内容就复制过去),这个怎么设置,请告知,谢谢

    可能我上面说的都不清楚!

    我想要满足的是:对于任意1列来说,单击该列中任意1个单元格,其内容自动会复制到另外的1个固定的单元格中(不需要按ctrl+C,只要单击该单元格就复制过去)
    如我单击A列中的单元格1,其内容就复制到Z列中单元格1去了,
    我再单击A列中的单元格5,其内容还是复制Z列中单元格1去了,
    我再单击A列中的单元格7,其内容还是复制Z列中单元格1去了,
    这下我应该说清楚了吧?

    有人能这样做到吗?来说说啊,谢谢先了啊
    2009年8月14日 2:57
  • 没听说过有这种设置,但用VBA确实可以实现,把复制粘贴的代码写到Worksheet_SelectionChange事件中就可以了。
    Microsoft Technet Observer 如果问题没有解决,请继续跟帖讨论;如果问题得到解决,请标记为答复。
    2009年8月14日 5:21
    版主
  • 没听说过有这种设置,但用VBA确实可以实现,把复制粘贴的代码写到Worksheet_SelectionChange事件中就可以了。
    Microsoft Technet Observer 如果问题没有解决,请继续跟帖讨论;如果问题得到解决,请标记为答复。

    能告诉我具体的做法吗(具体的操作步骤,什么代码?)?谢谢了啊
    2009年8月14日 5:27
  • 做了一个例子,请点击此处下载,打开的时候注意要启用宏。

    全部代码如下:


    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        With ActiveSheet
            If Target.Column = 1 Then .Cells(1, 2) = .Cells(Target.Row, Target.Column)
        End With
    End Sub

    为便于查看结果,目标单元格在B1而不在楼主要求的Z1单元格。

    另外控制了只在点击第一列的时候会把结果复制到B1单元格。
    Microsoft Technet Observer 如果问题没有解决,请继续跟帖讨论;如果问题得到解决,请标记为答复。
    2009年8月14日 5:58
    版主
  • 做了一个例子,请点击此处下载,打开的时候注意要启用宏。

    全部代码如下:


    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
        With ActiveSheet
    
            If Target.Column = 1 Then .Cells(1, 2) = .Cells(Target.Row, Target.Column)
    
        End With
    
    End Sub

    为便于查看结果,目标单元格在B1而不在楼主要求的Z1单元格。

    另外控制了只在点击第一列的时候会把结果复制到B1单元格。
    Microsoft Technet Observer 如果问题没有解决,请继续跟帖讨论;如果问题得到解决,请标记为答复。
    1、我要改变不是控制第一列,要怎么改啊?比如第三列
    2、目标单元格不是B1,而是C40,要怎么改啊?
    3、一个工作表中能不能有好几列,好几个目标单元格啊?比如说C列对应一个目标单元格,D列对应一个目标单元格,E列对应一个单元格?我想加几个就几个,行不?
    本人真的是菜鸟一个啊,你不要晕啊。真的麻烦了啊
    2009年8月14日 6:47
  • Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
        With ActiveSheet
    
            If Target.Column = 3 Then .Cells(40, 3) = .Cells(Target.Row, Target.Column)
    
        End With
    
    End Sub

    Target代表你所选中的单元格区域,Target.Row是你选中单元格区域的行号,Target.Column代表你选中单元格区域的列号;

    .cells后面的两个参数第一个表示单元格的行号,第二个表示列号。
    Microsoft Technet Observer 如果问题没有解决,请继续跟帖讨论;如果问题得到解决,请标记为答复。
    • 已标记为答案 fly_slayer 2009年8月14日 7:30
    2009年8月14日 6:57
    版主
  • 好的,谢谢了啊!真的很感谢!
    2009年8月14日 7:29