luane-aquino

' 1- on LibreOffice Calc, select a range of cells 
' 2- run the macro below
Sub HighlightRangeMacro()
    	Dim nCol As Long 'Column index variable
    	Dim nRow As Long 'Row index variable
    	Dim oCols	'Columns in the selected range
    	Dim oRows	'Rows in the selected range
    	Dim oRange
    	Const nCellBackColor = 15132415 ' "Blue gray"
    	oRange = ThisComponent.getCurrentSelection()

luane-aquino

% Pacotes
\usepackage[table,xcdraw]{xcolor}
\usepackage{listings}           
\usepackage{color}              
\usepackage{graphicx}         

% Quadro exemplo
\begin{quadro}[htb]
\Large
\centering