Question

我有一个函数在包含值的列中找到第一个单元格：

recherche = colonneRecherche.createSearchDescriptor    
    with recherche                     
        .SearchString = valeur
        .SearchCaseSensitive = false    
        .SearchByRow = true          
        .SearchWords = false          
    end with
resultat = colonneRecherche.findFirst(recherche)
    if isnull(resultat) then
        RechercherValeur = "NO RESULT!"
        Exit Function
    else
        thisComponent.CurrentController.select(resultat)
        a.nom = "TEST"
        RechercherValeur = a
        Exit Function
    End If

包含＆＃34;选择＆＃34;的行选择好的单元格，但我想获得单元格的行号而不选择它。我试过了

resultat.Row

但它不起作用。有人可以帮我吗？感谢

Answer 1

我从未使用过LibreOffice但我不会说法语，但如果你的VBA就像Excel VBA那么你可能会使用不正确的方法。

Excel中没有FindFirst（与Access不同），但有Find方法。

以下VBA返回第一个匹配的行号：

Sub testFind()
    Dim ws As Worksheet, f As Range
    Set ws = Sheets("Sheet1")
    Set f = ws.Cells.Find("abc")
    If f Is Nothing Then
        MsgBox "Not found"
    Else
        MsgBox "Found on row: " & f.Row
    End If
End Sub

Answer 2

我自己找到了：

android:permission="android.permission.BROADCAST_SMS"

在VBA Libreoffice中获取FindFirst结果的行号

2 个答案: