Apache OpenOffice: Foro oficial de la comunidad

Publicado: **Mié Mar 11, 2009 3:14 pm**

Hola muy buenas. Soy nuevo en la programacion de macros para open-office. He desarrollado alguna macro para word, pero no consigo hacer lo mismo para writer, debo hacer que la macro busque una palabra en la primera celda de cada tabla, y en caso de encontrarla que guarde el contenido de las celdas de la primera fila.

Agradeceria que alguien me ayudase. Muchas gracias.

Publicado: **Sab Mar 28, 2009 12:12 am**

Código: Seleccionar todo

Doc = ThisComponent
Tablas = Doc.getTextTables
For i = 0 to Tablas.Count - 1
	Tabla = Tablas.getByIndex(i)
	Cell = Tabla.getCellByPosition(0,0)
	If Cell.String = "aqui" then
		sTexto = "" 
		For x = 0 to Tabla.Columns.Count-1
			Cell = Tabla.getCellByPosition(x,0)
			If sTexto <> "" then
				sTexto = sTexto + " " + Cell.String
			Else
				sTexto = Cell.String
			End if
		Next x
		Print sTexto
	End If
Next i

Apache OpenOffice: Foro oficial de la comunidad

Macros para writer (buscar en tablas)

Macros para writer (buscar en tablas)

Re: Macros para writer (buscar en tablas)