![]() ![]() ORangoCeldas = oHojaRC.getCellRangeByName("B141:H162") Rem - FILTADO PARA ELIMINAR RENGLONES EN BLANCO ODeclaracion1 = oConexion.createStatement() OCell=oSheet.getCellByPosition(40,101) 'AO102' - PEGO EL USUARIO EN LA BOLETA OCell=oSheet.getCellByPosition(38,100) 'AM101' - PEGO EL FOLIO EN LA BOLETA OResultado = oDeclaracion.executeQuery( sSQL) ODeclaracion = oConexion.createStatement() ![]() 'Creamos un objeto para las instrucciones SQL 'Nos aseguramos de que exista la base de datos ![]() ODBC = createUnoService(".DatabaseContext") 'Creamos el servicio para acceder y manipular las bases de datos SSQL = "SELECT ARITMO FROM TablaF WHERE ID = 0" If folio = 0 Then 'SI EL FOLIO ES CERO BOLETA NUEVA, SUMO UNO A LA ULTIMA PARA ASIGNAR LA NUEVA OCell=oSheet.getCellByPosition(38,100) 'AM101' - TOMO EL FOLIO DE LA BOLETA DEL LOCAL MsgBox "Clave Inválida, repita el procedimiento", 16ĭim oDocument As Object, oSheet As Object, oCell As Object Rem -Ĭlave = InputBox( "Ingrese clave" ) ' PEDIDO DE LA CLAVE PARA LA IMPRESION DEL RECIBO Les paso la macro que tengo armada, me guarda todas las hojas. Buenas tardes, tengo una planilla de pedido por la cual mediante macros hace diferentes cosas, una de ellas es imprimir solo la zona que deseo pero también a su vez deseo que guarde en pdf solo lo impreso y no lo logro. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |