Macros y programación VBA

Insertar fotos de carpetas en celdas vacías Hola se podría Insertar fotos de una carpeta en celdas vacías de una tabla Ejemplo 1 Foto 22 33 Foto 4 Gracias, saludos

Tengo un archivo de excel en el cual contiene botones para ocultar y aparecer filas; sin embargo si agrego comentarios a alguna de las celdas me aparece el siguiente error: "Run-Time error '1004': unable to set the hidden property of the ranges class" Este error solo me aparece si le agrego comentarios a alguna de las celdas; si remueve el comentario la macro vuelve a funcionar correctamente; agrego información adicional: El archivo se encuentra protegido ya que contiene fórmulas que no quisiera que el usuario manipulara. (En otros archivos ya lo he hecho de esta manera y el macro funciona) Hice algunas pruebas colocando comentarios en las celdas D12, D2…

Maestros excelente día. Por favor me podrían ayudar con una macro para traer la información de otra hoja que tenga un formulario. Ejemplo: Dar clic en la Celda N:2 de la Hoja TAB, a qui debe salir mediante formulario la información que está en la Hoja Insumos celdas D3:E10 Es únicamente informativa, sin calculo. El formulario debe ser como el siguiente: Adicional, en el caso de que tenga que utilizar esta macro para cambiar celdas hojas añadir otra, me podría indicar en que parte de la macro debería cambiar. Quedo pendiente a cualquier consulta y agradezco por compartir sus conocimientos. Gracias.

Hola buenas tardes: Tengo un archivo con una macro para imprimir archivos desde un listado en una hoja. de mi lista que tengo en la columna C indico en la columna D con la palabra Si, para que se imprima, si esta columna no tiene esta palabra no lo imprime. La macro me es útil. Pero mi actual necesidad es: Imprimir todos los archivos listados, pero si la columna D, está la palabra "X", no deberá ser impreso. Muchas gracias Consulta IMprimir.xlsm

Buenas tardes amigos, tengo una consulta, ¿se podría hacer que un formulario se abra en una parte especificada de de la pantalla?, por ejemplo que se abra en la esquina superior derecha

Saludos apreciados Foreros, Tengo un error en mi código vba que al agregar un dato (Botón agregar), los datos del formulario tipo de aumento, tasa% y Domicilio laboral me carga otra cosa que no es lo que preciso. 1.- Tipo de Aumento: debe ser semestral, bimensual o cuatrimestral me carga un dato numérico (16777215) 2.- Tasa - Domicilio laboral: Repite en mismo dato numérico (16777215) Les dejo el archivo para ver si me puede dan una mano con ello. De antemano Gracias Inmobiliaria AYUDA EXCEL.xlsm

si tengo una base de datos de X cantidad de filas en una hoja y selecciono X fila de datos de esa hoja como se captura los datos en un formulario?

Amigos:Tengo una plantilla para calcular fertilización en diferentes predios (Fincas), y en potreros de cada Predio. Tengo una macro para ir creando una hoja por cada Potrero de cada Predio. Como se van juntando muchas hojas, para la busqueda rápida, quiero hacer un macro para poder diferenciar por color los potreros (hojas) de una Finca (Oasis por ejemplo), de los de otro (Chacón). GRACIAS!!!! GENERA PROGRAMAS FERTILIZACIÓN.zip

Hola a Toda la Comunidad, Nuevamente recurro a vosotros para solucionar una pequeñez para vosotros y una montaña para mí. Tengo una hoja para introducir datos que posteriormente son volcados/copiados a otra hoja. Necesito establecer el recorrido de las celdas en la introducción de los datos, obligando al usuario a pasar por las celdas y no olvidarse la introducción de datos. El recorrido de las celdas debe ser: D6-B10-C10-D10-G10-H10-D12-D13-C16-C17-C18-C19-E16-E17-E18-E19-G16-G17-G18-G19-I16-I17 He buscado por todo el foro y no he sabido encontrar una solución viable. Alguno sabe como solucionar este pequeño problema. Gracias anticipadas. Un Saludo Xavi

Buen día nuevamente, En ésta ocasión quisiera hacer la siguiente consulta, tengo un userform en el cual hay dos botones de opción, con ayuda casi he logrado adaptarlos a mis necesidades lo que me hace falta es lograr que al trabajar en el userform que se encuentra en la hoja llamada "TC", la información se cargue en la hoja llamada "PBA". Con relación a los botones de opción solamente he logrado utilizar dos, la pregunta es si se pueden usar por ejemplo cuatro botones. Por su ayuda anticipadamente gracias. userforms-ejemplo-02.rar

Hola a todos. Necesito una pequeña ayuda con una hoja en la que hay que introducir datos en rango B11:B140. Mi problema es que si por ejemplo termino en la celda B60 al pulsar enter en la siguiente se desplazara a la celda H11. Lo he intentado con condiciones (If) y con activecell y o me da error de compilacion o no me da error pero no hace nada

Buenas tardes comunidad AyudaExcel. La solicitud es la siguiente, requiero la ayuda con la herramienta de Correo Electronico Lotus Notes. Actualmente, manejo una base de datos que en una Textbox me indica el correo electronico de la persona. Seria eficiente que mediante un botón al dar click abra Lotus Notes y únicamente con el destinatario es decir, con el correo indicado en la textbox. De antemano gracias!

Muy buenas a tod@s, tengo que hacer una cosa en excel y me estoy volviendo loca. Os comento: en una hoja de excel tengo una celda numerada de 1 a ... la celda se llama Nº de Orden. Esa numeración se relaciona con unas fotos que tengo en un directorio, los nombres de las fotos son 1 ... Cada vez que elimino un registro de la hoja de excel tengo que volver a asignar un nuevo número de orden pero lo peor es que tengo que volver a renombrar las fotos. ¿Alguien sabría decirme como a través de una macro, cuando elimine la fila correspondiente al número de orden 300, me elimine la foto 300 y que cuando vuelva a dar un nuevo numero de orden me renombre las fotos a ese numero…

necesito macro para acabar documento Buenos días, he creado como veis una hoja en la que he ido desarrollando poco a poco y me haría falta vuestra ayuda para poder acabarla, en la última hoja la "hoja 9", necesitaría que a través de una macro o algo por el estilo, me hiciera el resumen de las hojas: lunes martes miércoles jueves viernes sábado y que la "hoja 9" quedase tal como la he reflejado grácias control obra.rar

Buenas tardes Lo que necesito es crear un macro que copie un rango si coincide con año y mes (solo es necesario que coincida una vez con la celda a2), el rango es de f2:h4460 ya que tengo mas de 10,000 :nightmare: archivos divididos en categorías y necesito jalarlos a otro, un libro por cada categoría seria aplicar el macro 140 veces y necesito pegarla en un archivo llamado carta, cada vez que aplique el macro sera en un archivo llamado carta pero con diferente ruta, y sera pegado en el rango a15:c758 (el rango que necesito copiar tiene un filtro que hace que coincida exactamente con a15:c758). De antemano muchas gracias. acapo e11.zip

en un formulario he colocado un webbrowser el cual es controlado por unos botones los cuales abren ciertas paginas de internet, el problema consiste en que las paginas web que se abren tienen un botón para cerrarlas, al hacer clic en este cierra el webbrowser del formulario, y al dar clic en otro botón manda un mensaje de error en el método 'Navigate' de objeto 'IwebBrowser2', como se le puede hacer para que el formulario se actualice y asi vuelva aparecer el webbrowser en el mismo. Gracias por la ayuda.

Hola, chicos, cómo están? Lo que vengo a consultarles a hoy sé que es simple, pero lamentablemente no me las puedo ingeniar... Tengo una hoja de excel donde hice una especie de "tracker" y selecciono el nombre de una persona, y me trae toda la información que recopila de otras hojas, incluso una fotografía. Las fotos están en un directorio llamado "imágenes" y coinciden con el nombre de la persona. Lo que quiero es que en caso de que NO EXISTA IMAGEN para esa persona, se muestre una imagen llamada "marlies.jpg" que se encuentra en el mismo directorio (actualmente si no hay imagen, me muestra la última imagen cargada). Este es el código: Private Sub Worksheet_Change(B…

Buenos dias a todos. Con este codigo: Option Explicit Const PATH As String = "C:\Documents and Settings\LAMOGA\Escritorio\Formulario Web\" Public Sub Form_Load() Call CountFileType("xlsm") End Sub Public Sub CountFileType(ByVal fType As String) Dim c As Long If LenB(Dir(PATH & "\*." & fType)) <> 0 Then c = c + 1 Do While (LenB(Dir()) <> 0) c = c + 1 ' found another file increment counter Loop MsgBox "Number of " & fType & " = " & c Else MsgBox "Cant find any " & fType & " files!" End If End Sub [/CODE] me cuenta los archivos tipo xlsm en una carpeta deter…

Buenas tardes a todos, espero que se encuentren muy bien, solicito su colaboración porque tengo un inconveniente, necesito crear una macro para que me descuente existencias desde la factura ya que tengo un commanbotton, por otro lado necesito sumarlas existencias que para el ingreso de mercancia tengo una hoja creada llamada entradas, lo hice con formula sencilla pero me aparace #valor y pues observe que apenas borro la informacion de la factura se desaparece el descuento, por esa razón creo que lo mejor seria una macro, por otro lado habia insertado un codigo para que me pasara las facturas que voy creando a la hoja que dice Facturas Emitidas eso si con los productos y …

Hola a todos amigos, agradecer de antemano las innumerables veces que he obtenido ayuda a través de este foro y agradecer el esfuerzo de todos. En esta ocasicón me estoy encontrando con un problema a la hora de crear una dll para agregarla a Excel como Add-in. Hace poco hice el mismo proceso para MS Project y no tuve ningún problema, pero en este caso me ocurre lo siguiente que no deja de ser curioso. Al crear la DLL desde Visual Studio 6, seleccionando Addin Project, y despues de hacer las modificiaciónes en el Designer compilo la dll y para probar la agrego a Excel con un msgbox. Hasta aquí todo ok, al pulsar el botón puedo ver el msgbox de prueba. Pero mis proble…

Hola Bueno Dias, necesito de su apoyo con el siguiente reporte de caja la cuestion es la siguiente me gustaria que en la "columa D" ingreso o gasto cuando ponga en la celda "D18" G se lo reste a la celda "M17" y lo coloque en "M18" y si colo "I" que lo reste., no se que me puedan recomendar si con formula o una macro saludos. Reporte.xls

Buenas tengo un archivo que guarda la hoja en pdf y la envia por email, funciona perfectamente en office 2010 Sub envio_mail() 'envio correo pdf Application.ScreenUpdating = True ActiveSheet.Unprotect Password:="" Dim npres, cliente, Email, rutapdf, LIBRO, ArchivoPdf As String Dim ProgCorreo, CorreoSaliente As Object With Application .ScreenUpdating = False .EnableEvents = False .DisplayAlerts = False End With Set npres = Range("J5") Set cliente = Range("g10") Set Email = Range("g15") rutapdf = "C:\SkyDrive\Documentos\presupuestos\" ArchivoPdf = Range("F7") Set ProgCorreo = CreateObject("Outlook.Application") Set CorreoSaliente = ProgCorreo…

Hola estoy creando un libro que contiene formularios de datos de alumnos, y cuando quiero cerrar el formulario, esto me abra otro formulario donde pueda ingresar una contraseña que se encuentra en una hoja y celda especifica, valide los datos y cierre todo el libro previo a esto que guarde todos los cambios, adjunto ejemplo y espero que me puedan ayudar gracias. libro de notas.zip

Buena tarde amigos: tendrá alguien por ahí algún macro para buscar e insertar imágenes pero al desplegar la ventana de búsqueda esté direccionada a una carpeta especifica?. saludos

buenas tardes me gustaría saber si existe alguna macro que me cree en una celda especifica la fecha en el siguiente formado : si es 01/05/2014 que la macro la convierta en " Caracas al 01 de Mayo del 2014" o si es 20/05/2014 la exprese en " Caracas a los 20 días del mes de Mayo del 2014"