Macros y programación VBA

Estimados, tengo una macro que me guarda muy bien una hoja excel como PDF en un archivo, el código empleado es el siguiente (OJO, se debe tener cuidado con /, ;, , :, ya que varia entre Windows y Mac): Sub Imprimir_PDF() Application.ScreenUpdating = False Dim texto As String, titulo As String texto = "INGRESE NOMBRE ARCHIVO" titulo = "CREAR ARCHIVO PDF" archivo = InputBox(texto, titulo) Sheets("FAX SIM").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "Macintosh HD:Users:rboke:Desktop:PSC:" & archivo & ".pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False End Sub Lo que no he podido lograr e…

Tengo un archivo que extraje de un pdf y me genero un archivo con 160 libros de aproximadamente 3 hojas o menos cada uno, necesito juntar todas estas hojas en un solo libro ya sea en el mismo archivo o en otro nuevo...ayuda hacer lo uno por uno es muy tardado y ademas que son varios Archivos :worked_till_5am: Por la Atención y ayuda prestada de antemano se los Agradezco BH Lopez A

Hola a todos. Soy nuevo en este foro, y quisiera consultar una duda que tengo: He escrito unas lineas de codigo para guardar una hoja de excel a pdf en una carpeta dandole un nombre segun el valor de unas celdas y necesito saber como hacer para que me salga un mensaje de error de si quiero duplicarla o no. Gracias.

Buenas, solicito su ayuda para saber como buscar un dato de varias hojas y una vez encontrado sumar su subtotal en una hoja resumen. el fichero lo envió con una macro que hace parcialmente lo que necesito solo que no me busca el dato Suma Total Anual.zip

Buen día Tengo este archivo al cual se le pueden estar copiando hojas nuevas que contienen las mismas macros ya que es una plantilla, la cantidad puede variar ,asi como el nombre de cada hoja , en un principio la nombre "curso1" , al cambiarle el nombre , la siguiente macro dejo de funcionar Private Sub Workbook_Open()With Sheets("Curso1") .Protect Password:="123", UserInterfaceOnly:=True .EnableOutlining = True End With End Sub [/CODE] Requiero que funcione para todas las hojas , aun si se le cambia el nombre, ya que para alimentar los datos de la plantilla es necesario desplegar las filas que tengo agrupadas de la 17 a la 122. Saludos y gracias. Plantil…

Hola, alguien no tendra alguna funcion o macro que al seleccionar una celda uno tenga la opcion de colocarle una unidad por ejemplo m2, m3, kg, o cualquier otra unidades de medida digo esto por que es engorroso hacer click derecho ir a formato de celdas, numero, personalizado y colocar # etc, lo mejor seria buscar la funcion creada tal vez por el usuario y seleccionar la celda y en otro box colocar la unidad supongo, esto sirve para realizar computos metricos de forma rapida. Gracias de antemano

buen dia tengan todos, ando en busca de la luz y la iluminacion, no logro dar el proceso, propiedad o codigo que me permita hacer que al seleccionar un elemento de un listbox tambien se posicione o seleccione toda la fila de la hoja encontrada, es decir, una vez dando click en elemento del listbox tambien me señale la fila a la que pertenece. Espero su valiosa colaboracion para poder resolver este dilema gracias anticipadas listoboxActivarceldaregistroSeleccionado.rar

Buenas Tardes a todos : Lo primero gracias de antemano. Por mas que busco en temas anteriores no encuentro exactamente lo que necesito. Tengo una hoja excel con dos hojas. Una primera hoja llamada "Mail" donde tengo una serie de celdas que quiero utilizar como campos de busqueda (E4 = DNI, E6 = Numero Empleado, E8 = Nombre). Y con un boto buscar. El objetivo es que al pulsar ese boton "Buscar", vaya a la hoja "Datos" con esos criterios de busqueda (minimo uno informado y maximo los 4 ), donde tengo los datos en su estructura (Columna A = Nombre, Columna B = Apellidos, Columna C = DNI, Columna D = Numero de Empleado) y me recupere esos datos. Y me los copie en la hoja …

En la Hoja "Obras Sociales" tengo que cargar las entradas de dinero según el mes. Me interesaría saber cómo hacer una macro para que me copie en la hoja "Resumen mensual" las obras sociales( en total son 42) que ha ingresado dinero durante un mes determinado. Ojalá alguien pueda ayudarme !!!! Se me han ocurrido diferentes formas...pero no termino con ninguna.. Gracias de antemano. Alejandro.

Estoy haciendo un formulario en Excel, pero me encuentro con este tema : txtHraInicial.text = 01/01/2014 08:00am txtHraFinal.text = 01/01/2014 12:00 am Nose como hacer para que txtHora.text = txtHraFinal - txtHraInicial, además, Si por ejemplo: Si txtHraInicial.text > 01/01/2014 08:00pm pero menor al 02/01/2014 08:00 am entonces mostrar en txtTurno.text= "TURNO NOCHE", caso contrario que txtTurno.text= "TURNO MAÑANA" Les agradeceré me puedan ayudar con este tema...

Hola Muchachos, Pues Pido d su ayuda debido a que no me e familiarizado mucho en VBA para Excel. Pues tengo un Formulario ( Bienvenido ) con un Label llamado LblVendedor pues a este quiero Asignarle un Caption a través del Nombre de un Caption de un Botón incrustado, el Problema es que, el botón incrustado no se encuentra en el mismo Modulo y no se como hacer la referencia en el Procedimiento para asignar el Caption a LblVendedor.. Private Sub CommandButton1_Click() Label = Me.CommandButton1.Caption LblVendedor.Caption = Label <------ aca Esta mi duda....... Bienvenido.Show Valor = 1 End Sub Su ayuda Por Favor...

buenas compañeros: como puedo hacer para que un textbox tenga un valor máximo a mostrar por ejemplo. si voy a importar un datos numérico a un textbox el cual es 125.333. el textbox me muestre 100.000 que sea el valor máximo a mostrar. si la cifra es mayor a 100.000 que el textbox solo me muestra 100.000 y si es menor obvio la misma cantidad... espero sus ayudas gracias

Señores expertos, soy nuevo en el ámbito de vba y estoy tratando de realizar una macro para ingresar datos de una planilla de control de hormigón fresco, y para poder realizar el formulario de ensayos, necesito repetir el código de muestra las n veces según la cantidad de probetas. Ejemplo: Usando userform ingreso los siguientes datos (entre otros pero solo necesito los del ejemplo): Código de muestra --- edad de ensayo --- cantidad de muestras MT1 ---------- 2 ---------- 3 El resultado esperado en otra hoja debería ser MT1 --------- 2 MT1 --------- 2 MT1 ---------- 2…

Hola a todos. Me gustaría saber si es posible que me ayudéis con una macro y me dijeráis si puede hacerse y como. Serían en realidad dos macros y esta es la idea: Tengo un libro con varias hojas en las que yo voy a ser el "administrador". De esas hojas hay 3 en las que quiero que la gente grabe datos y que solo se muestren esas tres hojas. Quisiera también que los usuarios no puedan grabar nada más que en las celdas que yo habilite y que no puedan mostrar hojas ni manipular fórmulas, pero si poder aplicar filtros. La idea es proteger todas las hojas con la misma contraseña y ocultar las que no quiero que vean y además proteger el libro para que no puedan ver dichas ho…

Hola a tod@s, Sigo desde hace tiempo el foro y he aprendido mucho, por lo que os doy las gracias. Pero esto ha provocado que crea que soy capaz de muchas cosas Mientras sigo leyendo manuales y tutoriales a ver si alguien puede orientarme un poco; os cuento: Tengo un libro excel (pacientes) donde voy añadiendo los datos personales de los pacientes, los tratamientos y los pagos por fechas y tipo (efectivo,t.débito y t.crédito) Tengo un segundo libro (contabilidad) donde, hasta ahora, de forma manual voy añadiendo los pagos de cada paciente para tener claros los gastos e ingresos del negocio. Sería muy cómodo automatizar la parte de ingresos del libro 2 (contabilidad…

Buenas tardes, estoy teniendo un pequeño problema con una macro; resulta que tengo una hoja que a traves de un botón actualiza una tabla proveniente de internet, y una vez que actualiza, realiza operaciones (remplaza "." por "," para que me lo pueda leer como número) Pero resulta que al ejecutarla me he dado cuenta que primero realiza las operaciones y por ultimo actualiza, cuando en realidad el orden es al revés, porque puede ser? Alguno que me oriente porque me desconcertó el problema. El código que uso es : ActiveWorkbook.RefreshAll Dim i, f, final As Integer 'todo Sheets("Todo").Activate For i = 2 To 10000 If Cells(i, 1) = "" Then final = i - 1 Exit For…

Saludos tengo una macro que se dispara cuando cambia el valor de una celda B3, esta macro inicialmete desprotege la Hoja con la clave "XX" y al final vuelve a proteger la misma con la clave "XX". 1 el problema que tengo es que cuando deseo trabajar en la hoja la desprotejo y cualquier cambio o change que realizo en cualquier otra celda diferente a B3 la hoja se protege y no me deja seguir trabajando. 2 Otro problema no me permite copiar y pegar 3 si deseo que la macro funcione solamente para la columna "H" como quedaria la macro Set area = Range("G:H") If Range("b3") <> Empty Then Set area = Range("G:H") Archivo subido "HOJA PROTEGIDA CON CAMBIO DE CELDA" …

Muy buenas noches amigos soy nuevo en lo que concierne a Excel y Access, la consulta es la siguiente tengo una base de datos con tres tablas (LISTTABLAS, PROFESIONES, USUARIO). Y bueno hice una consulta en la base de datos para que me muestras el nombre de las tablas de dicha BASE y que lo guardara en la tabla LISTTABLAS y todo bien el detalle es que quiero ejecutar dicha consulta que hice en Access desde Excel y me sale un mensaje de error: “No tiene permiso para READ en MsysObjects” que es lo que tengo que hacer tmp_21172-prueba190521887.rar

Quisiera hacer una macro que me cortase una celda diagonal cuando en una celda determinada ponga astm_din y ponga 50 en una parte del corte como en el ejemplo,como lo puedo conseguir ejemplo1.xlsx

Hola a todos! Espero alguien me pueda ayudar. Tengo el siguiente código pero al ejecutarlo coloca la formula con referencias fijas (con signo $) si quisiera que fuera relativa para poder copiar y pegar ¿cómo puedo cambiar el código para que la celda sea relativa o fija? ¿Alguna idea? fil = ActiveCell.Rows.Row Selection.FormulaR1C1 = "=(R" + Trim(Str(fil)) + "C4*8)" Muchas gracias.

Primeramente reciban el saludo cordial amigos del FORO AYUDA EXCEL, tengo macros creados exclusivos para mi trabajo, pero los quiero ejecutar desde la barra de herramientas " COMPLEMENTOS" mediante lista desplegable, esto para dar mayor dinamismo al pequeño programa que cree, amigos necesito ayuda para poder concluir mi trabajo......agradecere la ayuda, y que Dios les bendigue a todos Uds. Adjunto pantallazo

Hola, a ver si me explico bien, tengo un archivo excel que relleno todos los días con los datos que recojo de otros 3 archivos excel que descargo de una página web. Actualmente es copio y pego todos los datos que necesito, pero se hace un poco largo, Me gustaría saber si habría forma de que los datos se copiasen solos al descargar los nuevos archivos (Los puedo renombrar como yo quiera). Gracias. Saludos.

Tengo 100 archivos en una carpeta y solo quiero cambiar n cantidad de archivos de esa carpeta a otra. Ejmplo:Ejecuto macro y cambia 10, vuelvo a ejecutar y cambia otros 10 y así sucesivamente hasta vaciar la carpeta.

Que tal, les cuento mi problema: Tengo una macro que envia correos a una columna determinada, gracias a la ayuda de los chicos del foro al agregarle la funcion "specialcells(2) inclusive puedo enviar correo aunque no esten todas las celdas completas... ( ejemplo en el archivo"FUNCIONA BIEN SIN CONDICIONAL") Agrege una hoja al archivo ("datos ")para hacer una condicion en la que si el estado del usuario es VENCIDO, figure un email en esa columna,sino " "... y ahora me sale un mensaje de error 1004 "NO SE ENCONTRARON CELDAS" al apretar el boton en la pestaña CORREO. adjunto los dos archivos el que anda bienj sin condicional y el que estoy teniendo probl…

Hola a todos! Escribo en el foro porque tengo la duda sobre cómo filtrar lo siguiente. Tengo esta data que me muestra la venta en dólares de un cliente (tengo todo el año 2019 por mes y 2020 hasta la fecha, es decir fines de Febrero) Lo que yo quiero es que pueda filtrar automáticamente 2019 de Enero a Febrero y 2020 de Enero a Febrero para hacer una comparativa de cómo están creciendo o decreciendo mis ventas de manera automática Por favor, agradecería mucho su apoyo. Muchas gracias!