PuntoV056, Si deseamos cargar mas datos en la malla de datos

Sub Main()

	'Este script se complementa con puntov055   (ajusta a la columna numero 20)
	'También en PuntoV001 se define ancho de la columna 19 
    Set rstArticulo = CreaRecordSet( "SELECT precio2, precio3, ClaveProdServ FROM prods WHERE articulo = '" & fg2.TextMatrix( fg2.row, 0 ) & "'", Ambiente.Connection )

    'fg2.TextMatrix( fg2.Row, 17 ) = rstArticulo( "precio2" )
    'fg2.TextMatrix( fg2.Row, 18 ) = rstArticulo( "precio3" )  

	fg2.TextMatrix(n, 19)  = "ClaveSAT"
	fg2.TextMatrix(fg2.Row, 19)  = "" & rstArticulo( "ClaveProdServ" ) 

	fg2.Row = fg2.Row
	fg2.Col = 19
	fg2.CellFontBold = True

End Sub