boumerang

Para empezar, el concepto de Tabla Dinámica, no aplica para lo que pretendes. Más bien es una Consolidación de Datos, la cual puedes hacer desde el menu DATOS. -

Si es posible pero, de alguna manera tendríamos que fijar la fila que será mostrada. Puede ser tan sencillo como seleccionarla y luego llamar al userform, a menos que tu ya hayas decidido por algún método en particular.

Agrega a tu formulario un objeto de IMAGEN, y luego, utilizando la instrucción: - Image1.Picture = LoadPicture(Ruta) - Cargas la imagen en tu formulario.

... ¿Ya probaste quitando los corchetes y asignando la cadena a una variable? - strVAR="SELECT * FROM " & hoja & " where " & cond & "=" & buscar - ... luego ejecutar el query desde la misma variable - Envíame la construcción completa si tienes dudas. -

Je je je... estoy un poco ocupado pero... ya volví. Para mañana ya la tienes. Te enviaré el código para que lo adaptes a tu formulario.

Solo cambia el nombre y ejecuta la macro desde Vista = Macro = Ejecutar. Sub QuitarComplemento() On Error Resume Next Application.CommandBars("Tools").Controls(12).Delete End Sub = También puedes crear un botón y asignarle el procedimiento anterior. .

Un Código en VB será una buena solución. Va: - Sub RellenaSeccionesAbajo() For Each Celda In Range(ActiveSheet.Columns(ActiveCell.Column).Address) Select Case Celda.Value Case "FIN": Celda.Value = Copia: Exit For Case "": Celda.Value = Copia Case...

Lo más fácil, es GRABAR en una MACRO las pulsaciones que necesitas para completar el proceso. Esto cuando es algo relativamente simple. - Para crear la MACRO, ejecuta Grabar Macro, asigna tecla de acceso, ejecuta el proceso y detén la grabación....

Para manejar los mismos términos, dime: ¿Cómo defines las tablas...?

Siguiendo con la lógica de tu código, agrega lo que está en negritas: - c = Target.Row Range("HS" & LTrim(Str(c))).Value = t Range("HT" & LTrim(Str(c))).Value = c.Address -