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, inicie un proyecto un poco complicado para mi, quiero hacer una base de datos para un control de pagos diarios de clientes a los que se les presta dinero. quiero que el formulario de busqueda al introducirle el nombre o su numero de identificacion, me arroje los datos del cliente que estan en una tabla de datos (CEDULA, NOMBRES, DIRECCION, TELEFONO, RUTA, MONTO DEL CREDITO, NUMERO DE CUOTAS, VALOR CUOTA DIARIA) en un listbox de un formulario. yo no he podido hacer ningun codigo. gracias de antemano. Base de Datos Clientes V2.0.rar - 
									
0Reacciones de usuarios 
- 0 respuestas
- 948 visitas
 
- 
									
- 
				
				Buenos días y gracias de ante mano, He creado un fichero, como podéis ver (fichero adjunto) es bastante sencillo. Pero me gustaría que en la cuarta columna de (alerta), me saltara una alerta y cambiara el color de verde a rojo. Para así poder identificar aquellas personas que han pasado el plazo (24/48/72 horas) desde que se creo. Estoy bastante perdido al respecto y os agradezco vuestra ayuda. Saludos. Hoja RM.xls - 
									
0Reacciones de usuarios 
- 1 respuesta
- 948 visitas
 
- 
									
- 
				
				Buenas comunidad, tengo este problema en el que necesito que si en columna A existe un valor repetido y se cumple cierta condición (que el valor de la celda original en columna F sea distinto de "si") se pinte de un color la fila entera de todos los valores repetidos y este no se pueda modificar. En el archivo adjunto, por ejemplo me gustaría que si ingreso el valor 10 en columna A no pase nada debido a que en columna F el valor es "si" pero en cambio si ingreso el valor 3 en columna A debería ambos marcarse de algún color y ese debería ser inmodificable. Gracias de antemano! comp.rar - 
									
0Reacciones de usuarios 
- 0 respuestas
- 948 visitas
 
- 
									
- 
				
				Buenas tardes, Navegando por la red encontré el siguiente código, el cual elimina la opción de unhide en excel, el problema es que yo puedo lograr que me aparezca, de antemano agradezco su ayuda. cabe mencionar que he intentado lo siguiente pero no funciona. cbControl.Delete.Reset 'Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) ' Dim cb As CommandBar, cbControl As CommandBarControl, cbButton As CommandBarButton ' Set cb = Application.CommandBars("Column") ' For Each cbControl In cb.Controls ' If cbControl.Caption = "&Unhide" Then ' cbControl.Delete ' End If ' Next 'End Sub - 
									
0Reacciones de usuarios 
- 0 respuestas
- 948 visitas
 
- 
									
- 
				
				Ola Masters. Me preguntaba si existe forma de abrir otro archivo de excel, cuando se tiene un formulario ya ejecutado del excel y a la vez abrir otros archivos de excel, sin que me presenten conflictos. Mil Gracias SALUDOS.... - 
									
0Reacciones de usuarios 
- 2 respuestas
- 948 visitas
 
- 
									
- 
				
				Me surgió la duda de como automatizar mediante una macros un registro que al seleccionar un empleado , año, mes y dia se filtre los datos correspondientes y pegarlos a una hoja con el mes y dia seleccionado... les subo mi avance espero su ayuda Empleados_Prueba2.rar - 
									
0Reacciones de usuarios 
- 6 respuestas
- 947 visitas
 
- 
									
- 
				
				Hola gente, tengo una consulta sobre un libro que estoy creando. Tengo un indice con todas las hojas del libro, y lo que busco es que al presionar el link con el nombre de la hoja solo muestre la hoja de destino por unos segundos. También podría ser la posibilidad de poner un botón en cada hoja para que vuelva al menú principal y este se ejecute automáticamente cada "x" segundos. En el archivo que adjunto puse el indice en cada hoja, pero ahora el indice que necesito es mucho mas grande y no entra para poner en cada hoja, y que se vea completo en un monitor de 28", por eso quiero poner el indice en una sola pagina, y luego de accionar algún botón regrese a es… - 
									
0Reacciones de usuarios 
- 4 respuestas
- 947 visitas
- 1 seguidor
 
- 
									
- 
				
				Hola, necesito ayuda con una Macro, en el cual de una primera hoja “Formato” me pase los datos a una segunda hoja y luego esos mismos datos pueda buscarlos y extraerlos a la primera hoja dándole 1 o 2 condiciones, tengo una macro, pero al parecer no me esta funcionando Gracias Formato REGISTRO SEGUIMIENTO NIÑO.rar - 
									
0Reacciones de usuarios 
- 4 respuestas
- 947 visitas
 
- 
									
- 
				
				hola tengo un macro y el problema que encuentro es que agregue una condicion a las celdas de la "fila A" "hoja2" CÓDIGO: SELECCIONAR TODO =SI(B8="";"";SUMA(B8*D8))[/CODE] que se repite en todas las filas ahora lo que pasa que el ejecutar el macro copia las celdas vacias,aunque en el macro especifica que copia las celdas que tienen valores si pongo [CODE]CÓDIGO: SELECCIONAR TODO =SI(B8="";"";SUMA(B8*D8))[/CODE] si lo saco me lo hace bien me pega las celdas que tiene datos nada mas Macro [CODE]Dim UltFila, Cant As Long UltFila = Hoja1.Range("A" & Rows.Count).End(xlUp).Row + 1 Cant = Hoja2.Range("A" & Rows.Count).End(xlUp).Row Hoja2.Range("A8:E"… - 
									
0Reacciones de usuarios 
- 0 respuestas
- 947 visitas
 
- 
									
- 
				
				Buenas Noches desde Colombia, tengo un Userform y este sobrepasa el tamaño de la pantalla, y las scrollbar no estan funcionando, he probado con el codigo width y height y nada - 
									
0Reacciones de usuarios 
- 1 respuesta
- 947 visitas
- 1 seguidor
 
- 
									
- 
				
				Hola a tod@s. Agradezco de antemano su tiempo y respuesta a los siguiente. En la hoja "RESUMEN" se encuentran los códigos de clientes y en las siguientes hojas se nombran cada código de cliente. Entonces lo que se requiere es que, por ejemplo, que en la hoja "A 030-028" se crea un hipervínculo hacia la hoja "RESUMEN", PERO con dirección hacia la celda A4 ya que es el nombre de la hoja "A 030-028". Y así sucesivamente con las demás hojas. Lo haría manualmente pero son mas de 800 hojas. Creo que esto solo se puede lograr con Macros, pero si hay la posibilidad de realizar sin ello estaría perfecto. Saludos PRUEBA.xlsx - 
									
0Reacciones de usuarios 
- 2 respuestas
- 947 visitas
 
- 
									
- 
				
				Buenas tardes He creado un hoja excel con combobox para ir rellenando una hoja excel. Pretendo elegir un nombre de la lista y que lo envíe a la hoja. He conseguido hacer algo pero, si en el combobox indico "I" no puedo elegir la primera opción que sale. Es decir, si pongo en el cuadro "i"no puedo elegir ignacio porque no lo traslada pero si el siguiente que es irene. Me explico como un libro cerrado.... espero que con el archivo me entendais. Tambien me gustaria que el combobox se abriera con un click del raton en el combobox y no hiciera falta pinchar en el cuadro (pero esto no se si se podrá hacer es menos importante) Muchas gracias, ejemplo.xlsm - 
									
0Reacciones de usuarios 
- 4 respuestas
- 947 visitas
- 1 seguidor
 
- 
									
- 
				
				Hola, estoy haciendo una macro en la que tengo que crear un gráfico donde como parte del titulo agrego la fecha de creación, sin embargo al agregar la fecha queda todo del mismo tamaño y quería hacer que la fecha incluida en el titulo apareciera mas pequeña (ej. tamaño 10) y el resto del titulo apareciera mas grande (ej. tamaño 14). A continuación dejo el código donde agrego el gráfico. With ActiveChart .ApplyChartTemplate (ActiveWorkbook.Path & "\series_barra.crtx") .HasTitle = True .ChartTitle.Characters.Text = titulo & Chr(13) & "(" & CStr(Date) & ")" .Axes(xlCategory, xlPrimary).HasTitle = True .… - 
									
0Reacciones de usuarios 
- 3 respuestas
- 947 visitas
 
- 
									
- 
				
				Estimados, ojalá y me puedan ayudar a solucionar este error que anexo.... y les platico... Resulta que este archivo trabaja muy bien en mi máquina y en la de todas donde trabajo, pero cuando se lo mandamos al cliente les manda este error solo a ellos, ya lo revisó el cliente con su gente de sistemas pero ahora piden que si se puede compilar a 64 bits. Me pueden ayudar a solucionarles este problema que solo a ellos les arroja? De antemano, muchas gracias y saludos. error compi.zip - 
									
0Reacciones de usuarios 
- 6 respuestas
- 946 visitas
 
- 
									
- 
				
				Hola....Tengo una lista con dos columnas en excel 2007, en la columna A tengo una lista con muchos nombres de sucursales, en la columna B tengo datos aleatorios.....quiero que a un costado exista de la lista exista un boton que al presionarlo se generen archivos excel por separados con nombre de cada sucursal y que en el interior de cada uno de estos archivos aparezca en una celda especifica, el dato aleatorio que le corresponde a cada sucursal. Gracias - 
									
0Reacciones de usuarios 
- 0 respuestas
- 946 visitas
 
- 
									
- 
				
				Buenos días Comunidad AyudaExcel Anteriormente me habían ayuda con este archivo , es un recuento de comentarios para personas , se puede consultar dicha persona y luego se pueden ver los comentarios que tienen asignados , en ese "Userform4" ocupo asignarle dos botones uno de editar el comentario o de eliminar ese comentario; si notan lo que se carga es una "Listprinte". Gracias de antemano la ayuda. Clima.zip - 
									
0Reacciones de usuarios 
- 0 respuestas
- 946 visitas
 
- 
									
- 
				
				Hola espero me puedan ayudar me gustaria poder hacer una busqueda de la columna B una vez que encontro el dato revise si tiene informacion en la columna J y K si no tiene informacion en alguna de estas dos columnas mande un mensaje de que faltan datos y se posicione en la celda vacia . Gracias duda.xls - 
									
0Reacciones de usuarios 
- 2 respuestas
- 946 visitas
 
- 
									
- 
				
				Hola a todos, Tengo un archivo que contiene macro para conciliación bancaria. Quisiera por favor que me digan como hago para eliminar ese mensaje "FECHA DE VCTO CADUCADO - 31.08.13". Si bien puedo trabajarlo cambiando la fecha de mi pc, pero eso me genera problema lo que quiero es que ya no salga ese mensaje. Mil gracias por la ayuda que me puedan brindar. - 
									
0Reacciones de usuarios 
- 5 respuestas
- 946 visitas
 
- 
									
- 
				
				Buenas noches, resulta que tengo una PC con unas 60 macros y sus respectivas fichas, grupos y botones en la cinta de opciones. Como cambié de PC, intenté exportar todo esto exportando la cinta de opciones y copiando el archivo personal.xlsb a la otra PC pero los botones no encuentran las macros porque buscan claro, la dirección antigua en la otra PC (otro usuario) ¿Cómo podría exportar de forma correcta mis macros y la personalización de la cinta de opciones a la otra PC? Les agradecería su ayuda. - 
									
0Reacciones de usuarios 
- 0 respuestas
- 945 visitas
 
- 
									
- 
				
				Ya realice un codigo en donde ya manda el correo y manda un rango de celdas pero necesito que ese mismo archivo de donde saco el rango de celdas se adjunte en el correo. Espero me puedan ayudar ya que llevo casi 2 dias intentandolo. rivate Sub Si_Click() Dim NSession As Object Dim NDatabase As Object Dim NUIWorkSpace As Object Dim NDoc As Object Dim NUIdoc As Object Dim quienes(0) As Variant Set NSession = CreateObject("Notes.NotesSession") Set NUIWorkSpace = CreateObject("Notes.NotesUIWorkspace") Set NDatabase = NSession.GetDatabase("", "") If Not NDatabase.IsOpen Then NDatabase.OPENMAIL End If … - 
									
0Reacciones de usuarios 
- 1 respuesta
- 945 visitas
 
- 
									
- 
				
				  Hola, A ver si es posible lo que necesito: Tengo varias hojas ocultas en un excel que envío a los clientes, estas hojas ocultas no quiero que sean vistas, para ello pongo contraseña. Sin embargo cada semana les muestro una hoja, contraseña, mostrar.. QUisiera automatizar el proceso. Crear un menú desplegable por ejemplo, de forma que cuando seleccione una hoja oculta, automáticamente se muestre, esto solo le debo de poder hacer yo, no el cliente, por lo que supongo habrá que poner una contraseña Controlo el excel, pero no tengo ni idea de bb ni programación de macros, Muchas gracias (excel 2007) 
- 
				
				hola buenas, he estado hace un tiempo aprendiendo y desarrollando macros en vba para realizar scraping en paginas web, en una de las paginas que utilizo apareció esta protección del sitio, el posible bypasear con vba? he leído que se puede hacer con phyton pero no conozco ese lenguaje el mensaje que dice es Cheking your browser before accessing "sitio" dejo pantallazo https://ibb.co/wp4mwzP en caso de no ser posible, quizás ya sea momento de aprender otro tipo de lenguaje agradezco mucho la ayuda - 
									
0Reacciones de usuarios 
- 5 respuestas
- 944 visitas
- 2 seguidores
 
- 
									
- 
				
				Hola compañeros. Esta es mi primera consulta. Me presento, mi nombre es Jose. Necesito vuestra ayuda ya que estoy estancado en un proyecto y no se solucionarlo. Tengo un formulario, al que accede pulsando un botón colocado en la hoja 1, en el que hay un InkEdit/Textbox. La cuestión es que ese InkEdit/TextBox contiene bastante texto, motivo por el que le he añadido una barra de desplazamiento vertical. El problema es que, al pulsar el botón imprimir (que permite imprimir o guardar en pdf) tan solo se imprime la parte visible en la pantalla. Lo que no soy capaz de conseguir es imprimir todo el texto, tanto el que se ve en pantalla, como el que se ve al … - 
									
0Reacciones de usuarios 
- 2 respuestas
- 944 visitas
 
- 
									
- 
				
				Hola, escribi pero creo que se ha borrado, así que vuelvo a escribir haber si alguien pudiera ayudarme. necesito un macro para que al cerrar el libro se desactiven todos los rangos de modificación activos y al abrir se activen los rangos que yo desee. Soy algo novato en estoy y he podido con otras macros pero esta me supera. Un saludo - 
									
0Reacciones de usuarios 
- 0 respuestas
- 944 visitas
 
- 
									
- 
				
				Necesito colocar el calendario en 10 columnas intercaladas y la forma que conozco no me sirve ya que puedo solo en dos favor vuestra ayuda Muchas Gracias El código que coloco en la hoja en cuestión es el siguiente: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim rngFechas As Range Set rngFechas = Range("a:a,b:b") If Union(Target, rngFechas).Address = rngFechas.Address Then _ Call abrir_calendario End Sub - 
									
0Reacciones de usuarios 
- 1 respuesta
- 944 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.
	 
