Victor Perdomo

La información la ingresas en celdas o en textbox, dime cuantos campos son los que conforman tu formulario

En las propiedades del userform busca "picture", solo dale en los ... busca tu imagen y la cargas. Si tienes dudas preguntame ;)

Dale click derecho en la pestaña de la hoja->ver código y pega esto Private Sub Worksheet_Change(ByVal Target As Range) celda1 = "A1" celda2 = "B1" celda3 = "C1" If Not Application.Intersect(Target, Range(celda1)) Is Nothing Then Range(celda2) = Date...

Dale click derecho en la pestaña de la hoja->ver código He inserta esto: Private Sub Worksheet_Change(ByVal Target As Range) Select Case Target.Address Case Is = "$D$9" Range("$B$16").Select Case Is = "$B$16" Range("$C$16").Select Case Is = "$C$16"...

¿Pero estas hojas llevan un consecutivo o un nombre en particular?

Selecciona la celda donde quieras que aparezca el combo box, ve a datos validación, en permitir selecciona lista y en origen pon =medit. Ahora solo pon en la celda A3 que sea igual al valor de la celda de la lista.

¿Tienes fórmulas en esta plantilla? ¿La tienes protegida? ¿Tienes una carpeta donde guardas estos informes? O los guardaras en una carpeta en la misma ubicación de la plantilla.

Si te sirve esta fórmula, ponla en g17 =BUSCARV(G16;M:N;2;0)

Tienes dos errores, el primero imputbox es inputbox, el segundo no puedes poner ñ como atajo es por cuestiones de idioma. Sub Busca_Hoja() On Error Resume Next Sheets(Application.InputBox("", "Ingresa Hoja")).Activate End Sub

Prueba este código, me toco adicionarle una función para que los meses salieran en español y no en ingles, como es por defecto. Sub crear() Set fso = CreateObject("Scripting.FileSystemObject") ruta = "C:\" w = ruta & mes(Month(Date)) If Not...