En principio un saludo a todos. Mi problema es el siguiente: Tengo una lista en excel (columna A) la cual contiene diversas direcciones electrónicos, debo enviar un correo predeterminado (un archivo propio de outlook cuya extensión es *.msg, mismo que contiene el titulo y el contenido del mensaje pero no el destinatario. Este archivo no debo cambiarlo, simplemente "llamarlo"con la macro). Lo que deseo hacer mediante una macro es: 1.- "Llamar" a este archivo *.msg de outlook. 2.- Copiar la primera dirección electronica en la etiqueta To: y enviarla. A así sucesivamente hasta la última dirección electrónica de la lista en excel. Todo esto de manera individual para c…

Tengo un listbox que tiene como opciones diferentes paises, y necesito que al seleccionar 1 o mas paises de ese listbox me aplique el filtro de esas selecciones en una tabla. la tabla la tengo en la hoja 4 y la columna 7 es la correspondiente a ciudades. lo que necesito es que, si yo selecciono, Argentina, Argelia y Angola, me aplique dicho filtro en la tabla que tengo en mi hoja4 Private Sub GenerarInforme_Click() Dim elementoLista As Long Dim arreglo As Variant With ListBox1 For elementoLista = 0 To .ListCount - 1 If .Selected(elementoLista) Then If ListBox1.Selected(elementoLista) = True Then seleccionados = s…

Hola!! Estoy construyendo una planilla que me facilite una tarea que realizo con frecuencia.. Dicha planilla consta de dos hojas, la primera es una especie de carátula o resumen que tiene una tabla de 5 columnas, unos campos a completar (cliente, fechas, etc..) y un botón "buscar". La segunda es una hoja que contiene datos exportados de un archivo de texto mediante Datos/Archivo de texto, éste contenido se actualiza a diario. Lo que quisiera es realizar un macro que, al presionar el boton "buscar", recorra la segunda hoja y cargue a la tabla de la primer hoja los datos de las columnas especificadas y según cumplan los filtros que se han especificado (cliente, desde, ha…

Hola tengo un pequeño problema, estoy trabajando un libro y preciso poder insertar filas y que vengan con el formato y formula de la fila anterior. ahora bien tengo este macro Sub insertarfilayformula() ' ' insertarfilayformula Macro ' ' Acceso directo: CTRL+m ' ActiveCell.Rows("1:1").EntireRow.Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove ActiveCell.Offset(-1, 6).Range("A1").Select Selection.AutoFill Destination:=ActiveCell.Range("A1:A2"), Type:= _ xlFillDefault ActiveCell.Range("A1:A2").Select End Sub[/CODE] pero deseo combinarlo con este otro que encontre en el foro para que me de la opcion de a…

Buenas noches expertos estoy de vuelta para pedir ayuda a ustedes tengo una macro que estoy actualizando, es decir, cambiando el diseño del formulario pero a la macro en si le hice unas pequeñas modificaciones que les presento a continuación en el archivo adjunto. la macro se basa en crear una pauta mensual con turnos rotativos de "M"(mañana) y "T" (tarde) asi es como funciona la macro al habrir el formulario se debe marcar el boton de opcion 1 (alejandro muñoz), despues en la lista despeglable el numero 1 que crresponderia a los dias de donde empezara la macro despues de eso solo ingresar y debe verse una lista hacia la derecha con letras "M" y "L" la cosa es que solo me…

alguien me puede colaborar y decirme en que esta fallando este filtro? pruebafiltro.xlsm

En un archivo de excel se tienen unos registros de barcos que hacen maniobras en un puerto marítimo, dichas maniobras son asistidas por personas, se requiere en una celda llevar un conteo consecutivo automático de cada maniobra que corresponda a cada persona en el lapso de un mes, al finalizar el mes se reinicia el conteo nuevamente, cada una de estas maniobras tiene una duración en tiempo, es decir, por ejemplo inicia a las 12:00 y puede finalizar a las 13:10. Me permito contextualizar la consulta: por ejemplo iniciando el mes, se registra una maniobra con una persona, a esa persona en la celda del conteo le corresponde el 1, si se registra otra persona a esa le correspo…

Hola, en mi trabajo me pidieron hacer una Macro para un archivo de Excel que bajamos de nuestro Sistema, donde viene todas las deudas de todos nuestro nuestros clientes. Lo que quieren que haga esta macro es que al seleccionar yo cierto cliente, se envien las deudas que este tiene a Outllok para poderlas enviar por correo. He visto muchos temas donde se envian archivos de Excel por correo, pero no me sirven porque yo no quiero enviar el libro completo, solo cierto rango, me podrian ayudar? Les adjunto el archivo ejemplo. Saludos Ejemplo Clientes.xls

Buenas Tardes a todos, Soy nuevo en programación de Excel y he estado realizando un autofiltro con 2 Criterios. Lo que necesito es crear If Then con el primer criterio, si mi criterio1 no existe entonces que se muestre una caja de dialogo, mi codigo es así: For i = 149 To 185 Range("I7:I55").Select Selection.AutoFilter ActiveSheet.Range("$I$7:$I$55").AutoFilter Field:=1, Criteria1:=i, _ Operator:=xlOr, Criteria2:="=TAL" If Criteria1 = False Then MsgBox "No existe Criterio " & i Next Intenté subir mi archivo, pero no me lo permite, espero me puedan ayudar

Buenas tardes, tengo una planilla en donde voy trayendo datos de otras planillas (copio y pego) una vez que ya tengo toda la información, necesito que mediante una macro/formula se eliminen todas las filas en donde el primer dato (ubicado en la columna A) tiene el siguiente texto: QHP Standard 1,QHP Standard 2, QHP Standard 3, QHP Standard 4 y QHP Standard 5. He aplicado la siguiente Macro, pero no se como unificar que evalúe las 5 variables, por lo que he tenido que hacer 5 macros, y después hacer una para unirlas a todas. Quisiera saber si existe la posibilidad de hacer solo una y que tome las 5 variables de texto posible Sub Eliminar_Filas_1() She…

buenos días, quería saber si alguien me podría indicar como mover una base de datos en excel de 30 columnas y 6500 filas a acces??esto debido a que donde laboro esta base de datos de excel se actualiza cada 15 días y requiero moverla a acces para uso estadístico.esta macro debería cada vez sobre-escribir lo que exista en la tabla de acces llamada empleados.cabe destacar que el excel y el acces ambos estan en la siguiente ruta:Z:\Relación laboral\MILI\CONSTANCIAS\pruebas\la clave del acces es " rrhh "gracias de antemano por su colaboración.

Hola a todos. Llevo meses empleando una macro para hacer scrapping la cual tengo que modificar dado que la web ya no admite IE. A través de tutoriales conseguí escribir un código que me permite obtener los datos, llevo varias semanas y tengo dos problemas: Primero, no consigo que la macro copie los datos de página 2 debajo de los datos de la página 1, los de la 3 debajo de las 2,..., sino que siempre copia encima de lo anterior. Segundo, copiar los datos en la hoja de excel actual (solo consigo que copie los datos si creo una nueva hoja) Este es el código inicial que funciona bien, debajo pongo a donde he llegado con Selenium. Emple…

Tengo un ListBox con datos, los datos son numéricos con signo moneda Bs 1.234,56 Quiero al dar clic en una determinada línea del ListBox pasar esos datos al TextBox y que también quede en este ultimo con signo moneda también, tal como está e el listBox algún experto me puede suministrar dicha línea o líneas? Gracias

Hola a todos, mi nombre es Maurizio y mi nuevo problema es este Es posible, en su opinión, poder obtener un menú desplegable de selección múltiple ¿Aprovechando una "validación de datos"? ¡Si si! ¿Cómo se puede lograr esto usando siempre vba? gracias Traslation : --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Hi everyone, my name is Maurizio and my new problem is this. It is possible, in your opinion, to be able to obtain a multi-selection drop-down menu Taking advantage of a "…

Hola! que tal! tengo una dudilla que creo que es posible, necesito hacer un filtro con datos que registre con una userform, en la hoja registro varias cosas como fechas, de donde proviene la informacion, que cantidades, y quiero evitar el paso en que tengo que volver a la hoja para enseñarlos a mis empleadores, para evitar el caso de una posible modificacion posterior. asi trabajaria solamente sobre la userform y seria yo quien agregue dato a la base. adjunto el archivo! ojala puedan ayudarme! saludos!! gracias de ante mano! Userform1.rar Explicacion.pdf

Buen Día: He hecho una macro para remitir estados de cuentas a clientes en forma masiva enlazando outlook con excel, en una hoja de excel he consignado los datos (nombre en la columna A, correo en la columna B y ruta del archivo a enviar en la columna C), está funcionando bien pero no adjunta el archivo adjunto de la ruta que doy, alguien podría ayudarme con esto, esta es la macro. Adjunto el excel con la data (sólo estoy probando con 2 datos, sin embargo pueden ser varios) Sub Send_Files() Dim OutApp As Object Dim OutMail As Object Dim sh As Worksheet Dim cell As Range Dim FileCell As Range Dim rng As Range With Application .EnableEvents = Fals…

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 a todos; Con el procedimiento que adjunto guardo el libro en una ruta temporal con la hoja activa, después copio esa ruta en un textbox que tengo en un formulario e envío el mail. Hasta aquí todo bien. La consulta es si es factible que se guarde todo el libro con " todas las hojas que tenga". Saludos y muchas gracias como siempre por su colaboración. Sub adjuntarLibro() Dim RutaTemporal As String, vArchivo As Workbook, vArchivoTemp As String Application.ScreenUpdating = False With ActiveWorkbook .ActiveSheet.Copy End With Set vArchivo = ActiveWorkbook vArchivoTemp = vbNullString RutaTemporal = Environ$("…

Actualizar vinculación según una celda y autocompletar. Lo primero es lo primero: FELICIDADES por el trabajo que estáis realizando! Ayudáis a mucha gente Lo segundo mi problema; Tengo un libro que una de las celdas está vinculada a otro excel el cual se genera por un software externo y crea la excel con una terminación tal que así: 10111-30_Etot.xls año(10)mes(11)primerdia(1)-ultimodia(30)_Etot.xls desde el dia 1 al 30 solo cambia la fila de la celda vinculada es decir(lo realizo pinchando y arrastrando): fecha fórmula celda vinculada 01/01/2012 ='C:\Documents and Settings\jcli\Mis documentos\Inge\Program\Plant\[121…

Buenos días, tengo una consulta. Tengo una tabla en excel con muchas líneas, la cual se actualiza desde otra en access. El problema es que la tabla de access son muchas líneas (tiene datos de 2010, 2011, 2012 y 2013) y al actualizarse la de tabla excel tarda mucho. Mi consulta es ¿Se puede actualizar la tabla excel con los datos de access, pero solo los datos a partir de una fecha determinada mediante código en VBA? Es decir que solo se actualicen los datos a partir de 2013. PD:Sé que tendría que adjuntar un archivo pero como es una consulta sobre actualizar datos desde excel no sé cómo hacerlo.

Buen día les saludo, les quería comentar una gran duda que tengo la verdad he visto varias macros en la cuales crean hipervinculos a partir de un valor de celda. pero en realidad quisiera saber una cuestión. imaginemos que tengo el numero de una factura en varias celdas, y quiero jalar la imagen de la factura, y estan asi en las celdas: A2=3 A3=5 A4=6 pero en la carpeta están los números de factura pero de esta manera C:\Users\doctor\Desktop\Control de Base de datos esta Factura=3 Factura=5 Factura=6 entonces quisiera saber como indicarle a la macro que busque el A2,A3,A4 ETC. en la carpeta que especifiqué, aunque este numero de factura tenga "Factura=" en…

Hola compañeros, Tengo un módulo de login que me mantiene ocultas las hojas del libro, siempre y cuando el usuario no se haya identificado previamente. El caso es que cuando abro el libro en otro equipo (evento Workbook_Open > Abrir FormularioDeAcceso), me aparece el típico mensaje de "Habilitar las macros". El problema es que YO NO QUIERO QUE EL USUARIO PUEDA VISUALIZAR EL CONTENIDO DE ESAS HOJAS SI NO ESTÁ LOGUEADO. Y claro... Simplemente, con cerrar el mensaje de habilitar las macros y un click derecho "Mostrar hojas" es suficiente para visualizar el contenido de las hojas, sin necesidad de tener que loguearse. Por eso mi pregunta es: ¿Sabéi…

Saludos muy comedidos, deseo ayuda para que mediante alguna macro pueda directamente asignar una letra para que la macro se ejecute con Ctrl + la letra de la celda respectiva. En el ejemplo la macro muestrapass manualmente se le asignado la letra "s" y la macro ocultapass se la asignado la letra "o", de esta forma al aplicar Ctrl+s muestra la Hoja PASS y con Ctrl+o oculta la Hoja PASS. las letras se las ingresa en la Hoja PASS Gracias ejecutar macro opciones Ctrl mas letra en celdas.xls

hola amigos tengo la siguiente pregunta que a lo mejor ala mayoría de ustedes ya les ha pasado. tengo una formula matricial mayor a 255 caracteres al utilizar la formula manualmente y presionar las teclas control+shift+enter funciona sin problemas, al grabar la macro y ejecutarla me da un mensaje de error 1004. como puedo hacer para poner esta formula dentro de la macro y que esta la ejecute? copie este ejemplo pero no me ha funcionado para probar y hacer cambios pero no me ha funcionado Sub Macro2() Dim celda As Range ForEach celda In Range("B2:B12") celda.Select SendKeys "{F2}+{ENTER}", True Next celda EndSub[/CODE] mi formula es así de larga, favor su a…

Buenas!! Muchas gracias por la ayuda que siempre daís. Adjunto archivo para explicar mi busqueda de una solucion. Mediante un userform introduzco y borro nombres a dos tablas. Después las fechas la introduzco manualmante. Cuando introduzco el nombre, todo va bien. Ya que lo introduce en la tabla y por un código puesto en la hoja me lo ordena automáticamente. De esta forma me sale ordenado en el userform. El problema es cuando elimino el nombre, me elimina solo el nombre y me lo ordena de nuevo automaticamente, que está bien. Pero, me deja al final de la columna las fechas y por ende cuando introduzco un nuevo nombre le asigna esa fecha. Lo que deseo co…