fejoal

. 02.12.16 #VBA Vista previa de impresión Hola, Rey Lo que estás buscando es una rutina como esta: Sub VistaP() ActiveSheet.PrintPreview End Sub Luego podés agregar un botón de ejecución de esta macro insertando uno en tu hoja. Luego, hacé click...

.29.11.16 Buenas tardes, Juan Siendo que hay gente dedicada a romper cuantas protecciones, claves, cortafuegos, etc que puedan encontrar, es difícil pensar en algo impenetrable para un código en un archivo de MS Excel. Pero para usuarios no hackers,...

. 23.11.16 #VBA Filtro Avanzado Buenas, Krauxs La siguiente rutina hace lo que solicitas, utilizando los filtros avanzados de MS Excel. Para que funcione, necesitas colocar los títulos de las columnas de la base original que necesitas que aparezcan...

.22/11/16 Buenas tardes, Juan Cierto, parecería todo correcto. Yo probaría con reemplazar la línea Case Is = 0 con la siguiente: Case 0 Alternativamente, me parece más práctico usar un simple condicional inmediato. Es decir que, en lugar de estas...

.15/11/16 Buenas tardes, Darwing Si tienes activa la pestaña de DESARROLLADOR de donde creaste el botón ActiveX: Verás que al elegir el elemento te deja en la barra de fórmulas una leyenda como la siguiente: =INCRUSTAR("Forms.CommandButton.1";"")...

. 08/11/16 Hola, Darwing Daría la sensación que podrías resolverlo usando una tabla dinámica. Así que me tome el tiempo para reproducir un ejemplo y le agregué una de esas tablas quedando algo como esto: Al efecto de mandarte esta imagen, coloqué la...

18/10/16 Hola, Darwin Me parece que es la típica aplicación de la función BUSCARV(), sobre todo por la existencia de un código de búsqueda. Para hacerlo simple, vamos a suponer que tu listado estuviese en la "Hoja1" y en el rango A6:G240. Algo así...

.18/10/16 Buenas tardes, Sebastián Aquel suele ser un error de compatibilidad en la comparación de argumentos. Desde luego, dependerá de qué tienes en ese rango (textos, valores, fórmulas, etc.) Imagino que será una fórmula porque no tendría sentido...

. Buenas, Hose A menos que las instrucciones de envío luego del condicional If Sheets("Hoja_2").Range("O3").Value >= 35 then Fueran distintas de lo que está en el primer IF, yo lo incluiría en la primera condición. Es decir: If...

. 30/09/16 Buenas, Jorge MS Excel cuenta con numerosas y potentes herramientas, a qué negarlo. Pero, para un pedido como el tuyo, no creo que haya solución nativa. Afortunadamente, VBA permite crear tu propia función para resolverlo. Así que...