Dobrý den všem,
mám takový dotázek... Potřeboval bych filtrovat data z tabulky.
Tabulka má 24 slupců, A1:Yxxx.....Potřeboval bych vyfiltrovat data ze sloupce 14, jedná se o datum,
způsobem, že pokud zadám datum, vypíše mi výsledky které jsou rovny případně větší.
Zkošel jsem toto, ale moc se mi to nedaří zprovoznit
Nevím, jestli nevadí že nejsou vyplněny všechny sloupce případně řádky v tabulce. Některé jsou prázdné.
Potřebuji vypsat data na jiný list, ale to je v pohodě, zatím mám jen testovací odkaz pod tabulkou pro kontrolu.
Budu rád za každé nakopnutí nebo radu, děkuji.
Sub Filtr
doc = thisComponent
Sheets = ThisComponent.getSheets()
list = Sheets.getByName("databaze")
oblast = list.getCellRangeByName("A1:y200")
dim podminka(0) as New com.sun.star.sheet.TableFilterField
podminka(0).Field = 11
podminka(0).Operator = com.sun.star.sheet.FilterOperator.GREATER_EQUAL
podminka(0).IsNumeric = false
podminka(0).StringValue = "30.6.2020"
prefiltruj = oblast.createFilterDescriptor(True)
prefiltruj.setFilterFields(podminka())
prefiltruj.CopyOutputData = True
prefiltruj.OutputPosition = list.getCellRangeByName("a50").CellAddress
prefiltruj.SkipDuplicates = false
oblast.Filter(prefiltruj)
End Sub
Děkuji