Macros y programación VBA
Temas sobre la automatización de Excel utilizando macros y VBA. Errores de VBA. ¿No consigues que tus macros hagan lo que necesitas?
8686 temas en este foro
-
Hola, para hacer una prueba he realizado un formulario UserForm, muy simple, solo introducir un número, y me funciona pero ... no se como hacer para que salga o se cierre, no reconoce la la instrucción "Unload Me" me dice que no reconoce el "Me" ni la instrucción "Userform.hide" ni Exit Sub. Como puedo hacer para que al <Aceptar> se cierre ? y como hacer para que el botón "Cancelar" funcione? Como siempre gracias
-
Buenas tardes; Por favor, ayuda...... Hasta este año no he tenido problemas con el número de semana en las macros que tengo hechas, digo hasta este año porque hoy al actualizar y meter los datos del año que viene .....? No sale el número de semana que tendría que salir. El número de semana le estoy sacando de la siguiente forma: día="01/01/2021" Numero_semana=format(format(día,"ww"),"0#") El número de semana resultante debería de ser 53 pero me está dando 01. Como puedo solucionarlo. Estoy con el móvil, si necesitais el Excel con el ejemplo enciendo el ordenador y lo subo. Muchísimas gracias.
-
0
Reacciones de usuarios
- 2 respuestas
- 3.2k visitas
-
-
Hola a todos, Tengo un problema con VBA. He creado una macro que me genera un gráfico de tipo Chart (xlLineMarkers). Cuando asigno los valores a los valores del eje X con una variable de tipo array (de string) funciona. Pero cuando quiero asignar los valores del eje y con otra variable de tipo array (de double) me da un error. A qué puede ser debido? Dim bays_arr() as String Dim ratios_arr() as double ReDim bays_arr(1 to 18) 'Los valores son: (R03, R04, R05.......R19, R20) ReDim ratios_arr(1 to 18) ActiveChart.ChartType = xlLineMarkers ActiveChart.SeriesCollection.NewSeries ActiveChart.SeriesCollection(1).Name = "=""Skin""" …
-
0
Reacciones de usuarios
- 3 respuestas
- 3.2k visitas
-
-
Hola a todos, soy primeriza pero me gustaría saber si me pueden ayudar con lo siguiente: Tengo un solo archivo en el que he grabado en hojas diferentes la información correspondiente a la captura de una serie de datos provenientes del movimiento de tierras en una obra, desde numero de conciliación, fecha, placas, tipo de material, etc. Semanalmente concilio estos volúmenes tanto con Sindicato (encargados del cobro del acarreo, es decir los camiones que transportan los materiales) como con los bancos (propietarios de los bancos o minas de donde se extrae el material para la estructura de los caminos), me gustaría saber si hay una manera de conciliar estos volúmenes con un…
-
0
Reacciones de usuarios
- 10 respuestas
- 3.2k visitas
-
-
Buenas tardes colegas. Espero se encuentren bien de salud. En un Proyecto que terminé hace un par de meses me está dando el Error 91 en Tiempo de ejecución... Este Error lo está dando en el FrmRetenciones (cuando se va a Cargar). Dicho Formulario prácticamente lo hizo el profesor Antoni a solicitud de una ayuda de mi parte. Trabajaba perfecto hasta hoy, que traté de hacerle una modificación al Sistema, porque necesito que las cuentas que Agregue al Clasificador General (FrmACuenta) en el Rango de las 460 001 a la 460 007 me las imprima en la HojaBase (E28) y en la Hoja Comprobante1 (A16). Estuve revisando y no me doy cuenta de dónde está el error. Por…
-
0
Reacciones de usuarios
- 5 respuestas
- 3.2k visitas
- 2 seguidores
-
-
Hola a todos Tengo un problema con un formulario, estoy intentando poner los datos en la siguiente fila de una columna mediante: Private Sub CommandButton1_Click() Dim Hoja As String Hoja = Nombre.Value Sheets(Hoja).Select Range("D32").End(xlUp).Offset(1, 0) = Titular.Value End Sub Todo lo hace bien, SI LA CELDA ESTA VACIA SIN FORMULAS, es decir, escribe en la siguiente fila hacia abajo.... ...Pero yo en los valores de las celdas de esa columna tengo (cambiando el nº de fila obviamente) lo siguiente =SI(C6="NO";"-";SI(C6="XX";"-";SI(C6="YY";"-";""))) Con lo que, la celda de cara a 'verla' está vacia pero para el proceso VBA no lo está :-( Asi es que, como pued…
-
0
Reacciones de usuarios
- 1 respuesta
- 3.2k visitas
-
-
Buenas Tardes Chicos, Tengo el siguiente código el que ejecuta una consulta sql de una base de datos de oracle, esto lo realizo 5 veces al dias, es solo para ver los movimiento de algunas personas. El problema es que cada ves que la ejecuto me pide la contraseña de la base de datos, lo que pasa que quiero que al momento de ejecutarla me arroje los datos enseguida al excel y no esperar que tenga que meter la contraseña cada ves que le haga una consulta............ y lo otro es que he trato que en esta parte específicamente : "Select pam_nfolio N_PAM,afil_Nrut RUT_AFILIADO from PAM Where afil_Nrut=8959637") , hace referencia que busque al codigo:8959637 , pero lo que h…
-
0
Reacciones de usuarios
- 0 respuestas
- 3.2k visitas
-
-
Hola buenas. Necesitaria una macro para copiar pegra de una hoja a otra con un criterio. Copiar pegar L:R si en R >0 Salud2.
-
0
Reacciones de usuarios
- 11 respuestas
- 3.2k visitas
-
-
Hola amigos, como estan espero que todo bien. Tengo una situación. lo que pretendo hacer, esque desde un archivo txt me convierta a excel y que me ponga la información en cada columna. y al final de cada importe me ponga un total adjunto como esta mi información en txt y como debe de quedar en excel de antemano , muchas gracias. TXT.txt TXT.rar
-
0
Reacciones de usuarios
- 5 respuestas
- 3.2k visitas
- 1 seguidor
-
-
Hola, Necesito ayuda con un trabajo. Necesito contar la cantidad de casillas a las que se les asigna un colo especifico, EN Internet encontre una macro para usar, pero solamente actualiza cuando se edita, o cuando copio pego sobre la celda en que se encuentra el rango de funcion. Podria alguien ayudarme para que se actualizará la formula sola? El codigo de la funcion se encuentra a continuacion Function CountCcolor(range_data As Range, criteria As Range) As Long Dim datax As Range Dim xcolor As Long xcolor = criteria.Interior.ColorIndex For Each datax In range_data If datax.Interior.ColorIndex = xcolor Then CountCcolor = CountCcolor + 1 …
-
0
Reacciones de usuarios
- 1 respuesta
- 3.2k visitas
-
-
Buenas noches a todos y todas, tengo un formulario muy sencillo con diferentes campos que se activan en cascada. Los dos últimos campos son ListBox que se cargan a partir de unas listas en función de la selección que hemos ido haciendo antes. Me funciona todo bien... el problema que tengo es que se modifica el alto de los cuadros del listbox y quiero que quede fijo, como la he diseñado en el formulario "original". En el caso que las listas ocupen más espacio del tamaño del ListBox, se activan los scrolls tanto vertical como horizontal para que el usuario pueda ver todo el contenido. Al modificar su alto lo que hace es que el ListBox me tape unos botones que nec…
-
0
Reacciones de usuarios
- 3 respuestas
- 3.2k visitas
- 1 seguidor
-
-
Buenas tardes Forista Por favor necesito ayuda con macro para poder cruzar bases de datos, para identificar que persona esta repetida en estas. Los campos que se deben de mirar son nombre y numero de identificacion que pueden estar en diferentes filas y a su vez poder organizar los listados sepados en nombres y apellidos. Si es posible que se pueda seleccionar o escoger el archivo asi mismo la fila a buscar y comparar. Muchas gracias, Anexo dos archivos como ejemplo Aprobados.rar YUMBO.rar
-
0
Reacciones de usuarios
- 4 respuestas
- 3.2k visitas
-
-
Buenas tardes. Tengo un ListBox creado con un rango actual seleccionado de RowSource = 'Hoja'!'A1:C20 Dicho rango es una base de datos que irá aumentando en filas, como puedo hacer que dicho rango se adapte a la ultima fila con valores?? Por ejemplo si la ultima es la fila es la 25 que el rango sea 'Hoja'!'A1:C25 y así sucesivamente. Si pongo un rango muy grande me aparecen muchas filas vacias en el ListBox y queria evitarlo. Gracias Esta lista
-
0
Reacciones de usuarios
- 6 respuestas
- 3.2k visitas
-
-
Hola, soy nuevo en el foro y estoy buscando ayuda para crear una macro la cual tome los datos ingresados a las celdas de una hoja y calcule la media, Limite superior, limite inferior y genere una tabla de frecuencias y un histograma, apreciare mucho su ayuda sea cual sea.
-
0
Reacciones de usuarios
- 1 respuesta
- 3.2k visitas
-
-
Buenos días a toda la comunidad de AyudaExcel, soy nuevo en el foro, actualmente trabajo en un proyecto, y me surgió una duda acerca de términos como "Cuentas por cobrar", "Cuentas por pagar", etc. aplicados a una aplicación en excel, tengo una tabla en excel con un botón el cual me calcula los anticipos que dieron los clientes , pero el detalle esta en que hago una suma "acumulativa", es decir si quiero que me calcule los anticipos que dio otro cliente, va a seguir sumando... adjunto el archivo para que se den una idea de lo que estoy haciendo.... si alguien me puede orientar lo agradecería mucho, de antemano muchas gracias.. cuentasporcobrar.rar
-
0
Reacciones de usuarios
- 1 respuesta
- 3.2k visitas
-
-
Buenas tardes aquí solicitando de su apoyo, alguien me puede corregir de favor tengo los siguientes variables Tengo establecido estos variables para determinar mi última columna puesto que a veces mi base de datos trae 10 columnas y otras veces mas (cantidad variable) hasta aquí parece funcionar 1.- uc = Sheets("Hoja1").Range(Sheets("Hoja1").Range("a8"), Sheets("Hoja1").Range("a8").End(xlToRight)).Columns.Count 2 .-Tengo esto para determinar mi ultima fila referenciando la ultima columna , no se por que pero en otras columnas no puedo usarlos para determinar mi ultima fila ocupada , me imagino que ha de traer caracteres ocultos o de color blanco pero no …
-
0
Reacciones de usuarios
- 1 respuesta
- 3.1k visitas
-
-
hola quisiera saber si mediante este ejemplo de datos adjuntos en esta hoja excel se puede reemplazar los datos en forma masiva mediante alguna formula por ejemplo: carpeta cualquiera que contiene archivos de fotos enumeradas asi, (101.JPG, 102.jpg, 103.jpg, 105.jpg. etc ) y que mediante una accion se pueda cambiar quede asi 7.991.437-k.jpg en el fondo quiero renombrar una gran cantidad de archivos cambiandole el numero por el rut (numero unico de carne para los chilenos). la esencia de mi consulta es poderle poner el rut a cada foto que se encuentra en una carpeta mediante una formula que me permita llevarme los datos que se encuentra en una hoja excel. gracias por …
-
0
Reacciones de usuarios
- 2 respuestas
- 3.1k visitas
-
-
Hola, por favor si pudieran ayudarme, vengo realizando una macro con filtros, pero aun mis conocimientos en VBA son incipientes y no logro avanzar a completar el objetivo total de esta Macro, que es traer a un cuadro principal, las sumatorias en cada recuadro, de acuerdo a la edad, el sexo y el lugar de origen, que previamente se filtraron en otra hoja dentro del mismo archivo. Y por ultimo, en caso figure la denominacion "No hubo casos", para la fecha seleccionada, se debera rellenar con el Cero osea "0", los recuadros restantes. Gracias de antemano, por su noble apoyo. CONSOLIDADO por dia.xlsm
-
0
Reacciones de usuarios
- 4 respuestas
- 3.1k visitas
-
-
Alguien tiene un ejemplo de como alinear a la derecha una cantidad numerica en una columna de listbox. Gracias de antemano por su ayuda
-
0
Reacciones de usuarios
- 1 respuesta
- 3.1k visitas
-
-
Hello, My Friends:I have a workbook with several sheets, some of which are going to be printed at once, eighther to a .pdf file or to a paper. Doing so, there are several dialogs that are shown, for example: Dialog PrinterSetup to choose the printer.Dialog Save PDF file as, in the case of a .pdf, to choose where to save the document.Dialog Confirm Save to confirm the operation, of course.Dialog Adobe PDF that shows the addition of sheets to the final document.I am not sure, but only the first one is really an Application.Dialogs, the others are not, at least they do not appear in the VBA list as one.All of the dialogs have a "Cancel" button, to cancel the printing. My cod…
-
0
Reacciones de usuarios
- 3 respuestas
- 3.1k visitas
-
-
Hola soy nueva y no tengo mucha experiencia, he creado una base de datos con formulario vba y tengo un problema cuando realizo una búsqueda desde el formulario la fecha no ne sale igual que en la hoja de Excel , la fecha es formato txt. El formato que sale en la hoja de excel es el correcto 02/02/2024 , en el buscador del formulario sale 2224 o 224. No se como puedo solucionarlo en la macro. gracias y espero que alguien pueda ayudarme.
-
0
Reacciones de usuarios
- 7 respuestas
- 3.1k visitas
- 2 seguidores
-
-
Buenas tardes colegas. Espero se encuentren bien de salud todos. Necesito un aporte de ustedes. En el formulario FrmEmpleado almaceno una serie de datos, entre ellos la Edad de cada uno de los empleados, pero yo necesito que la misma se genere de manera automática a partir del numero de identidad que es el campo que le precede. Me explico; El campo CI (TxtIdentidad) recoje el número de Identidad permanente de cada Cubano y esta formado por: los seis primero dígitos la fecha de nacimiento, los 5 restantes son tomo, folio y sexo, A nuestros efectos e interés los 6 primeros. Por ejemplo, mi numero permanente es 66020108609 donde 66 en el año de …
-
0
Reacciones de usuarios
- 8 respuestas
- 3.1k visitas
- 3 seguidores
-
-
Hola! Supongamos que tengo la tabla que les adjunto, como hago para crear una macro que me permita crear una cita en el Outlook 3 días antes a la fecha que me figura en E2. ¿Cómo hago también para que se me creen otras citas cada vez que yo ingresando más datos? Gracias!
-
0
Reacciones de usuarios
- 4 respuestas
- 3.1k visitas
-
-
Hola amigos espero me puedan ayudar, tengo una archivo de excel con macro con el codigo vba protegido con contraseña y con compartir, pero detecte que cuando el usuario usa el administrador de tareas para cerrar a la fuerza el archivo de excel, este se abre como si no le hubiese puesto protección de bloqueo al projecto vba. La opción más adecuada que encontre fue modificar el registro de windows con CMD, en esta web encontre un buen código: using command prompt from VBA Sub x() Dim Par As String Par = "dir c:\ /s/p" Call Shell("C:\WINDOWS\system32\cmd.exe /c " & Par, 1) End Sub yo lo he transformado de la siguiente manera Sub Deshabilitar() Dim…
-
0
Reacciones de usuarios
- 12 respuestas
- 3.1k visitas
-
-
Estimados amigos soy nuevo en el foro y en la programación vba. Sobre el tema de ocultar hojas o como en mi caso es ocultar solamente una, no encuentro una respuesta facil, veo por aqui a grandes expertos y claro no llego a tanto. Os adjunto el fichero y si alguien pe puede ayudar se lo agradezco. muchas gracias de antemano. Por cierto un foro de excel extraordinario labora33333.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 3.1k visitas
-
Información básica de protección de datos
- Responsable: Sergio Andrés Celemín
- Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.
- Legitimación: Consentimiento del interesado.
- Destinatarios : Hetzner Online GmbH.
- Duración: Mientras se conserve este post o hilo en la comunidad, o decidas eliminar el comentario.
- Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso, rectificación, supresión, oposición y demás derechos legalmente establecidos a través del email sergio@ayudaexcel.com
Información adicional: Encontrarás más información en la política de privacidad.