Jump to content

Macros/Calc/ba025/es

From The Document Foundation Wiki
This page is a translated version of the page Macros/Calc/ba025 and the translation is 100% complete.


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