Hola Estimada Gente de Libre Office.
Con mi esposa vendiamos de vez en cuando prendas nuevas y usadas, y otras cosas. Surgio la idea de poder dedicarnos mas seriamente a esto, al recibir bastante cantidad de ropa. Lo que deseamos es en la planilla de calculo, poder reemplazar las letras horizontales de cada columna, por palabras tales como ser, en lugar de A-B-C-D- que nos aparezca: Prenda - Genero - Talle - Colores y/o Descripcion Etc… Me podrian ayudar por gentileza? Desde ya Gracias!
Si te refieres a los encabezados, no es posible, además no le veo caso, para eso tienes toda la hoja de calculo, esto te permitirá manejar filtros y todas las herramientas que te proporciona la herramienta.
@BETO2, Puede hacer la tabla normalmente y usar esta macro para ocultar todos los bordes de la hoja de trabajo.
Sub Ocultar
'Para abrir TELA INTEIRA na abertura do arquivo
'Ferramentas / Personalizar / Eventos
'Ao abrir documento
'ligar a MACRO ok.
'O############################################################################O
Dim oSheet As Object
Dim oController As Object
dim args2(0) as new com.sun.star.beans.PropertyValue : args2(0).Name = "FullScreen" : args2(0).Value = true
CreateUnoService("com.sun.star.frame.DispatchHelper").executeDispatch(ThisComponent.CurrentController.Frame, ".uno:FullScreen", "", 0, args2())
With ThisComponent.CurrentController
.setActiveSheet(ThisComponent.Sheets.getByName( "Planilha1" ) '<== Planiuha de abertura
.ColumnRowHeaders = False
.SheetTabs = False
.Frame.LayoutManager.HideCurrentUI = True
.HorizontalScrollBar = False
.VerticalScrollBar = False
'.Frame.Title = "T Í T U L O O P C I O N A L" '<== Título no modo Aplicativo.
end With
end Sub
Sub Mostrar
'O############################################################################O
Dim oController As Object
dim args2(0) as new com.sun.star.beans.PropertyValue : args2(0).Name = "FullScreen" : args2(0).Value = false
CreateUnoService("com.sun.star.frame.DispatchHelper").executeDispatch(ThisComponent.CurrentController.Frame, ".uno:FullScreen", "", 0, args2())
With ThisComponent.CurrentController
.ColumnRowHeaders = True
.SheetTabs = True
.Frame.LayoutManager.HideCurrentUI = False
.HorizontalScrollBar = False
.VerticalScrollBar = False
.Frame.ComponentWindow.SetFocus() '<<<< Devolver o foco a janela <<<<'
End With
End Sub
En la hoja de cálculo, coloque dos botones, uno para ocultar y el otro para mostrar.
Si necesita explorar otras pestañas, debe crear botones.
Archivo de muestra
ATTENTION: If you would like to give more details to your question, use edit in question or add a comment below. Thank you.
If the answer met your need, please click on the ball to the left of the answer, to finish the question.
Una solución simple posiblemente sea utilizar la opción de Inmovilizar filas y columnas
.
En la fila 1 escribes «Prenda - Genero - Talle - Colores y/o Descripcion Etc…».
Pulsa sobre la celda A2, elige menu Ver
- Inmovilizar celdas
. Adjunto archivo de ejemplo.
Más ayude de LibreOffice sobre Inmovilizar filas o columnas a modo de cabeceras.