Estimados. Estuve leyendo varios post y no logro encontrar especificamente con una solución. En primer lugar necesito mandar un email con una macro con un contenido de excel. Logro armar los distintos emails para cada destinatario especifico, ponerle un subject, pero no logro poner el cuerpo del mensaje. NO necesito enviar una celda sola, ya que con .body = Range (Celda) lo envia, sino que necesito que envie toda una tabla entera. Probe varias formas y no logro dar con la correcta. .body= Range("A1:I11") .body= Range("A1:I11").Value .htmlbody=... También he intentado con lo siguiente: Sub EnviarEmail(Destinatario As Variant) With ActiveSheet.MailEnvelope …

Hola, aprovecho para presentarme. Hace tiempo que os leo pero solo unos días desde que me he registrado. Llevo tiempo preguntándome si será posible hacer lo que pretendo. He buscado temas relacionados con "cambio de moneda" y he encontrado cosas parecidas, pero no exactamente lo que busco. Lo que quiero es que con un botón los cuadros de financiación que tengo se muestren en diferentes monedas (euro - dólar y sol, por ejemplo). Y si es posible, aunque ya es demasiado pedir, que se tome la cotización de alguna web. Cualquier ayuda o idea será bienvenida. Un saludo y gracias por ayudar. Dejo un fichero con lo que tengo. Financiación.rar

Buenas tardes compañeros como están, espero que excelente. He estado creando una pequeña aplicacion en formularios y hay una funcion que necesito hacer, y hacerlo así se me ocurrió a mi. Si hay otra alternativa haganmelo saber.Cualquier sugerencia es aceptada. Hay un momento en la cual se necesita hacer reportes y pienso en hacer un formulario con una imagen en forma del reporte ya modificado y con labels en los campos especificos y mediante diferentes parametros se obtengan de la hojas de excel. Donde la función principal es exportarlo a pdf o imprimirlo lo cual sería una mision posible o imposible pues imprimir la imágen con los labels superpuestos si seria extraño en…

Buenas tardes a todos y muchas gracias por tomarse la molestia de leer mi problema. Encontré una macro aquí en este gran foro y la modifique, pero el problema que tengo es que al exportar al txt, las columnas me las separa por tabulador y necesito que solo me las separe con un espacio, que se tendría que modificar? Sub net_user() Dim archNum As Integer Dim Datos As Variant Dim i As Long Datos = Range("aa1", Range("ah" & Rows.Count).End(xlUp)).Value2 archNum = VBA.FreeFile Open ThisWorkbook.Path & Application.PathSeparator & "2A.txt" For Output As #archNum For i = LBound(Datos) To UBound(Datos) Print #archNum, Datos(…

tengo un problema con una macro que cuando la ejecuto me dice error variable de objeto o bloque with no establecido... es para exportar coordenadas de excel a autocad .... espero que puedan ayudarme Creacion de polilineas para Autocad.zip

Hola a todos! tengo esta macro: Sub loco() Dim CompareRange As Variant, x As Variant, y As Variant, contador As Double Dim RANGES As Range Set CompareRange = Sheets("PRECIOS").Range("B1:B1000") Set RANGES = Sheets("COMPRAS").Range("B1:B1000") Application.ScreenUpdating = False Sheets("PRECIOS").Select Range("A1").FormulaLocal = "=CONTARA(B1:B1000)" For Each x In RANGES For Each y In CompareRange If x = y Then contador = 1 Next y If contador = 1 Then contador = 0 Else Cells(Cells(1, 1…

Estoy haciendo una busqueda con macro en base a 2 criterios por dni o por apellido utilizando el siguiente codigo: Private Sub btn_buscardata_Click() Dim contador As Integer Dim s As String Dim i As Integer s = txt_criterio.Text contador = 2 Dim flg As Boolean If rb_dni.Value Then contador = 1 End If If rb_apellidos.Value Then contador = 4 End If lbx_datos.ListIndex = -1 If txt_criterio.Text = "" Then Exit Sub End If For i = 0 To lbx_datos.ListCount - 1 If UCase(lbx_datos.List(i, contador)) Like UCase(s & "*") Then lbx_datos.ListIndex = i fl…

Hola, tengo una celda que contiene varias lineas, pero el espacio entre ellas es muy corto quiero ampliarlo porque se imprimira en un formato predefinido. ¿es posible eso? ¿cómo? espero su ayuda. saludos

saludos tengo una macro que me actualiza una tabla dinamica ubicada en una "Hoja2" pero la fuente de los datos esta en la "Hoja2" que es uan base de datos que se ACTUALIZA cada cierto tiempo. El problema es que el el parrafo rojo(abajo) me di cuenta que no me deja tomar datos de una hoja distinta a la hoja donde se ubicara la tabla dinamica. Que puedo hacer Sub Actualización_de_tablas_dinámicas() Dim rango1 As Range ActiveWorkbook.Worksheets("Hoja1").Select Range("A1").Select Set rango1 = Range(Selection.End(xlToRight), Selection.End(xlDown)) ''ajusta el RANGO ORIGEN de la tabla ActiveSheet.PivotTables("Tabla dinámica4").ChangePivotCache ActiveWorkbook. _ PivotC…

Hola Necesito de su ayuda, he intentado crear un UserForm que me permita buscar entre varias bases de datos (Hojas de un mismo Libro) y luego actualizar el resultado si es necesario como sigue: Cada base de datos (hojas)esta compuesta por valores de Fecha Estado Cantidad Tipo Destino Movimiento 2/1/2013 Pendiente 100 SIM Buenos Aires 12345 El UserForm q trato de crear viene dado por: TextBox1 que contiene el criterio de busqueda, en este caso un numero de "Movimiento" TextBox2 que me entregue el valor de la columna "Estado" (llamese: Preparado, Pendiente, Entregado, etc.) asociado a la misma fila del "Movimiento…

buenas tardes compañero la pregunta es si haba la posibilidad de actualizar el control Dtpiker al Excel 2013 de 64 bits, ya intente varias formas y no puedo como descargar y registrar mscomct2.ocx, instalar un office anterior y actualizarlo al 2013 y no aparece, desde ya saludos

buenos dias al foro. por mi trabajo debo utilizar equipos de 32 o de 64 bits indistintamente. el problema se presenta cuando ejecuto macros en un sistema que no lee el otro. el aviso que se presenta es el que se ve en el archivo anexo. he cambiado la instruccion declare por ptrsafe para leer en 64 bits, pero cuando voy a 32, se presenta el error inverso. hay alguna manera de detectar si el tipo de sistema con el que trabaja el equipo para evitar el error? saludos desde venezuela.

Bueno como el titulo lo dice quisiera que el listbox mostrara solo el rango de datos filtrados en este caso la fecha. no quiero que considere en los datos que muestra la fecha 00-01-1900 el filtro ya esta aplicado en la hoja reporte naves espero haberme explicado bien. adjunto archivo para su revisión de ante mano muchas gracias. PRUEBA REPORTES.rar

Saludos estimados Tengo un archivo el cual esta vinculado con el software SAP, al exportar los datos de este programa mediante una maro en cierto momento me sale un mensaje emergente el cual dice "Excel esta esperando que otra aplicacion complete una accion OLE" al cual le tengo que dar en aceptar (unica opción) reiteradas veces para que mi programa continue ejecuntadose. Quisiera saber como suprimir este mensaje o en todo caso un comando para poder aceptar este, probe con application.displayalerts pero no me dio resultado, disculpen si no subo el archivo pero es muy pesado.

Buenos días, Como bien dice mi nick soy totalmente novata en el tema macros, vba y programación pero en la empresa me han puesto a ello así que no me queda más remedio que buscar y preguntar, perdonadme si me pongo pesada Me gustaría saber como creo un historial con una macro para un libro de excell en el que quede registrado nombre de usuario, fecha y el cambio que ha hecho y que este no se borre cuando se hacen cambios nuevo, ni pasado x tiempo. El libro tiene 3 hojas (Informe, Datos, Historial). Gracias

Buenos días, Necesito poder mostrar una lista de datos en función de unos criterios elegidos. Estos criterios pueden ser elegidos a través de una lista o bien por un campo libre de busqueda. (Adjunto archivo) en la hoja3, estaría la consulta. los campos amarillos son los que el usuario tiene que poder rellenar según su necesidad de busqueda y no necesariamente se tienen que rellenar todos, es decir, puedo buscar unicamente por proveedor o familia de producto, o por 2, 3 ó todos los criterios de busqueda. Para complicarlo un poco más, he añadido un campo libre de busqueda por texto, p.e., por si no conocen ni el proveedor, la familia, etc... Muchas gracias de antemano, …

Buenos días, Al poner a prueba mi plantilla para generar .csv observo que en un trozo de un string que deseo crear no se me inserta del todo bien un hexadecimal. Me explico, el string que deseo crear tiene el siguiente formato: .1A.XX. Se puede observar en el ejemplo adjunto que en la segunda hoja, segunda columna hay una lista de números. En la primera columna de la misma hoja hay los números convertidos a hexadecimal. La macro únicamente genera el string en la primera hoja utilizando estos números en hexadecimal. Ahora viene el fallo. Si nos fijamos bien en el resultado obtenido en la Hoja1, observamos que los hexadecimales que terminan en "A", es decir, "1A", "2…

Ante todo, buenos dias. Necesito vuestra ayuda para poder tener la siguiente hoja de excel en plan. Se trata de una hoja de seguimiento de trabajos y necesitaria cumplir los plazos para entregar las cosas entonces querria tener: -Columna APERTURA, ahi simplemente se introduce la fecha en la que se inicia la obra -columna FECHA DE ENTREGA, simplemente se introduce la fecha en la que hay como limite maximo para entregar la obra. -Columna DESCRIPCION DEL MATERIAL, simplemente se describe de qué se trata. -Columna INCIDENCIAS, simplemente se especifica si esta pasando algo con esa obra. Y ahora viene lo dificil creo -Columna ALERTA 15 DIAS ANTES, necesito que 15 dias…

Buenas Noches: Mi duda es la siguiente, estoy realizando una macro que busque un valor tipo texto que se encuentra en una columna © dentro de otra columna de este tipo(, con el fin de copiar un código(columana a) que acompaña a ese valor encontrado. Es decir, si encuentra el valor, pegar ej: en la columna D el condigo que acompaña a este. El problema radica en que no encuentro una fución que simplemente me diga si ese valor esta en la columna y en q posición para asi copiar el código, como lo hace la función VLookup o buscarV, espero me entiendan, adjunto un ejemplo de como deberia quedar la columna resultado D A B C D 1 1 pe pe 1 2 1 pe l…

Hola, quisiera que pudieran ayudarme con este proyecto, se trata de automatizar y hacer mas simple el registro de los usuarios que ingresan a mi centro de informática.... Quisiera un código, de preferencia en macros que me ayude con la inserción de un dato numérico que a su ves me guarde la fecha y la hora en que fue ingresado, y tiempo mas tarde, ingresar el mismo código y que de nuevo me ingrese la hora final, para después ser restados y me den el tiempo transcurrido... adjunto el archivo original de mi registro para que se puedan dar una idea de que es lo que busco. Nota: tengo un código grabado en mi hoja, que cuando ingreso un dato en numero de cuenta, me regresa la …

Estimados amigos: Vuelvo a abusar de los conocimientos de este foro para ver si alguien puede echarme una mano con una macro que me permita importar los datos de un archivo TXT tabulado a una hoja de Excel, pero con desplazamiento de referencias. Es decir, los datos importados no se copiarán en celdas contiguas, sino que lo harán en filas y columnas distintas (aunque con un patrón determinado). Adjunto un archivo que espero aclare lo que necesito. Agradezco de antemano cualquier ayuda que puedan prestarme. Cordialmente. Macro TXT2XLS.zip

Hola. Solicito su apoyo para crear una macro que me permita copiar el contenido de una celda y pegarlo la cantidad de veces que se indique en otra celda. Espero ser claro.

buenas e visto aqui en el foro como enviar nombre y contraseñas a una web yo tengo el mismo problema incluso e podido abrir con el internet explore pero aquien mi pais el explore demora mucho en cargar quisiera saber si también se puede abrir con el google chrome y me dejen su comentario

Buenos días, amigos del excel. Los molesto un minuto para ver si me pueden ayudar con el siguiente tema. Quisiera crear una macro que me permita copiar una serie de datos, en función de una cantidad de veces. La idea es que me copie tantas filas como le orden a la macro. Dejo un archivo con algunos datos esperando que ayude a enteder lo que necesito. Ej para macro.xls

buenos dias al foro. he estado trabajando con formularios en vba 6.3 y por mas que reviso mi codigo y los temas que ya ha tratado no encuentro como solucionar el error que me arroja a la hora de "ejecutar" el segundo de los cuatro formularios que utilizo. basicamente la idea es que al terminar de capturar un numero en un textbox aparezca en otro el nombre asociado a ese numero que describo en una hoja del archivo de excel, como se que en el textbox pueden capturar cualquier cosa escribí codigo para forzar a que se capturen solo numeros y despues coloque cdigo para saber que hacer en caso de error y ahi es justamente donde "truena" mi formulario. anexo el archivo y col…