Question

情境：

我有一个电子表格，其中包含赠品广告系列中的信息，我会根据我的广告系列通过我的广告系列收到的新Twitter获得付款。不幸的是，我使用的应用程序不跟踪新的关注者与现有关注者，因为他们为“跟随推特进行1次访问”提供了新的和现有关注者的条目。因为我还提供了获取条目的其他方法，我需要导出数据并过滤结果，以便只显示那些在Twitter上获得条目的人，然后通过单独的应用程序过滤掉那些新的和现有的条目。

问题：

每种数据类型都应该有一个单独的列;名称，电子邮件，行动等。行动栏是我期望找到“在Twitter上关注”的地方，但文件非常混乱，可以在许多不同的栏目中找到该行动。因此，我需要一种方法来仅显示其中存在“Follow on Twitter”字段的行。我无法尝试弄清楚如何做到这一点。

Answer 1

以下宏将搜索＆＃34;关注Twitter和＃34;在每个细胞中。对于每一行，如果找到匹配项，将显示该行，否则将隐藏该行。您必须调整宏以匹配工作表的总行数/列数。

Sub Dummy()
    GlobalScope.BasicLibraries.LoadLibrary("Tools")

    Dim ActiveSheet As Object
    ActiveSheet = ThisComponent.CurrentController.ActiveSheet

    Dim r,c As Integer
    For r = 0 To 25
        Dim found As Boolean
        found = False
        For c = 0 to 10
            Dim cell As Object
            cell = ActiveSheet.getCellByPosition(c, r)
            If cell.String = "Follow On Twitter" Then
                found = True
                Exit For
            End If
        Next c
        Dim row As Object
        row = ActiveSheet.getRows.getByIndex(r)
        row.IsVisible = found
    Next r
    MsgBox "Done"
End Sub

在OpenOffice Calc中过滤

1 个答案: