Macros/Calc/ba025/es
TDF LibreOffice Document Liberation Project Blogs comunitarios Weblate Nextcloud Redmine Ask LibreOffice Donar
Resumen:
Esta página proporciona un procedimiento de LibreOffice Basic que obtiene la información de clasificación de un intervalo de celdas dado. Es un ejemplo extraído del Capítulo 13 ("Calc como base de datos") de la Guía de Calc 7.0.
Descripción
Se puede usar el método CreateSortDescriptor () para obtener información de clasificación de un intervalo de celdas determinado. Si se utiliza en un intervalo de base de datos, creará un descriptor de clasificación utilizando la información de clasificación almacenada con ese rango. Por otro lado, si CreateSortDescriptor () utiliza en un intervalo estándar con nombre o un intervalo sin nombre generará un descriptor de clasificación con las propiedades predeterminadas. En cualquier caso, el descriptor de clasificación generado puede modificarse y emplear como un argumento a un método de "clasificación" utilizado en un intervalo dado.
La siguiente macro demuestra cómo generar y mostrar la información de clasificación asociada con un intervalo. La salida de la macro es un diálogo que muestra las propiedades del descriptor de clasificación.
Código
Sub DisplaySortDescriptor
On Error Resume Next
Dim oSheet
Dim oRange ' Se necesita un intervalo para crear el descriptor de clasificación
Dim oSortDescript
Dim i%
Dim s$
Dim oDoc ' Referencia al documento de Calc recien creado
oDoc = StarDesktop.loadComponentFromURL("private:factory/scalc", "_default", 0, Array())
oSheet = oDoc.Sheets(0)
oRange = oSheet.getCellRangeByName("B28:D33")
oSortDescript = oRange.createSortDescriptor()
For i = LBound(oSortDescript) To UBound(oSortDescript)
s = s & oSortDescript(i).Name & " = "
s = s & oSortDescript(i).Value
s = s & CHR$(10)
Next
MsgBox s, 0, "Sort Descriptor"
End Sub
Este documento de Calc incluye la macro en LibreOffice Basic