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?
8683 temas en este foro
-
Hola! amigos del foro quisiera solicitarles el apoyo con lo siguiente, estoy intentando crear un código que revise al abrir un libro verifiqué si el nombre del libro es el asignado lo valide, en caso que el nombre no corresponda no permita habilitar los formularios que se encuentran en cada una de las hojas, los cuales se activan mediante un botón. Inicialmente he creado el evento open para validar el nombre del libro, pero aún no logro como definir que si este nombre es diferente no permita habilitar los formularios con el clic del botón. Agradezco la colaboración que me puedan brindar. Private Sub Workbook_Open() Dim nombre As String Dim archivo As…
-
0
Reacciones de usuarios
- 10 respuestas
- 1.2k visitas
- 1 seguidor
-
-
Buenas a todos. Tengo un archivo excel que nada mas abrirlo se abre un formulario de inicio de sesión. Mientras este formulario está abierto no se puede ver el archivo de excel, y una vez que se inicia sesión ya se puede acceder al libro. No obstante, la macro me genera dos problemas: 1.El primero de ellos es que cuando abro el libro, es decir, cuando doy dos clicks al archivo de excel, el excel se abre rápidamente, se cierra y ahí me muestra el formulario de inicio de sesión. Pero yo no quiero que funcione así. Yo quiero que al dar dos clicks al archivo de excel directamente se me abra el formulario sin que se abra el excel. 2. Si abro el archivo de excel…
-
0
Reacciones de usuarios
- 2 respuestas
- 771 visitas
- 1 seguidor
-
-
Hola!! A ver si me sé explicar y si alguien me puede ayudar. Tengo ya toda la Excel con macros programadas funcionando pero ahora necesitaba que toda la hoja de Excel esté bloqueada, y que tan solo se desbloquee la siguiente fila que no tenga celdas rellenadas, es decir: Ejemplo: Rango celdas (A3:F3) desbloqueadas (para poder poner datos); una vez todas las celdas ya contienen información (y no son blancas/vacias), quisiera que la macro bloquee la fila de A3:F3 para no poder modificar los datos entrados y a su vez, desbloquear la siguiente fila: A4:F4 para poder entrar los datos ahí, y así sucesivamente con todas las filas siguientes. Alguien podría ayudarm…
-
0
Reacciones de usuarios
- 2 respuestas
- 570 visitas
-
-
tengo este problema TextBox5 = TextBox1 solo copia el resultado, lo que quiero es que cuando siga presionado el boton se valla a los TextBox sigueinte: Ejem: Presiono Botón ----- textbox 1 = 32 Vuelvo a presionar el Boton ------ Textbox2 = 32 así sucesivamente TextBox1 = "32" TextBox2 = "32" TextBox11 = "32" TextBox10 = "32"
-
0
Reacciones de usuarios
- 3 respuestas
- 652 visitas
-
-
Buenos días estimados Quería solicitarles si me pueden ayudar con un código, debe ser simple, pero yo soy un novato en esto. Tengo en la Hoja1 tres columnas con datos, A tiene Fechas, B y C contienen números. Me gustaría hacer un bucle en donde los valores las celdas de la fila 1 se copien en determinadas celdas de la hoja2 y luego exportar hoja2 en pdf. ej. Hoja1 celda A1 en Hoja2 celda F5 Hoja1 celda B1 en Hoja2 celda D3 Hoja1 celda C1 en Hoja2 celda B2 y exportar hoja2 en pdf luego la siguiente fila Hoja1 celda A2 en Hoja2 celda F5 Hoja1 celda B2 en Hoja2 celda D3 Hoja1 celda C2 en Hoja2…
-
0
Reacciones de usuarios
- 1 respuesta
- 676 visitas
-
-
Es que quiero restar en varios Textbox y una vez que siga apretando el botón siga restando. pero no logro poder lograr que funciones Private Sub CommandButton1_Click() On Error Resume Next TextBox3 = CDbl(TextBox4) - CDbl(TextBox5) - CDbl(TextBox6) - CDbl(TextBox7) - CDbl(TextBox8) End Sub
-
0
Reacciones de usuarios
- 2 respuestas
- 1.6k visitas
-
-
Buenos días, Estoy intentando eliminar todas las filas que tengan en la columna A celdas vacías y duplicadas. Al ejectur ambas macros por separado, Excel no hace nada. Sub Eliminarduplicados() Dim Valor As Long Application.ScreenUpdating = Fale Sheets("Hoja1").Range("A1").Select Do While Not IsEmpty(ActiveCell) Valor = Application.WorksheetFunction.CountIf(Range("A:A"), ActiveCell.Value) If Valor > 1 Then ActiveCell.EntireRow.Delete Else ActiveCell.Offset(0, 1).Select End If Loop Range("A1").Select Application.ScreenUpdating = True End Sub Sub Elimi…
-
0
Reacciones de usuarios
- 5 respuestas
- 1.8k visitas
-
-
Private Sub CommandButton29_Click() With UserForm1 TextBox2 = TextBox2 - 1 Unload Me End With End Sub no logro que reste una vez que lo doy al boton! que puedo haccer!
-
0
Reacciones de usuarios
- 4 respuestas
- 871 visitas
-
-
Saludos a todos, aqui con la siguiente cuestion tengo una tabla de datos unicos y lo que deseo es una macro o formula que me devuelva la fila(año) y la columna(mes) Mes Año Enero Febrero Marzo Abril Mayo Junio Julio Agosto Septiembre Octubre Noviembre Diciembre 2010 72.5520 72.9717 73.4897 73.2556 72.7940 72.7712 72.9292 7…
-
0
Reacciones de usuarios
- 2 respuestas
- 687 visitas
-
-
Private Sub CommandButton23_Click() TextBox1 = TextBox1 - 1 End Sub Quiero que en el TextBox1 al pasar a numero negativo -1 el numero pase a 0 porque no quiero que se pase a -1 -2 -3 -4 ya que no requiero eso... Ejem: TextBox = me dio un resultado 856, Pero si el el resultado es -856 pase a 0 espero su gran ayuda
-
0
Reacciones de usuarios
- 1 respuesta
- 1.1k visitas
-
-
Hola, Estoy dándole vueltas a un Excel que quiero crear. No consigo crear las dos cosas. Mi idea es: en una columna escribir todos los datos que en este caso son clientes. Después que automáticamente con la macro me cree por cada cliente una nueva hoja y con un hipervínculo a esa hoja. Por lo que al finalizar la macro deberá quedar el listado inicial con hipervínculos a su correspondiente hoja. La hoja se llamará igual que el nombre del cliente. Y además de esto que cada hoja de cliente nueva que se cree que sea en base a una plantilla. Yo consigo copiar la base o hacer un índice medianamente bien pero ambas cosas no consigo hacer. Si alguno puede echarle…
-
0
Reacciones de usuarios
- 10 respuestas
- 988 visitas
-
-
Buenos días a todos; -Necesito de vuestra ayuda. Para mejor comprensión adjunto enlace de un video y comentario. Saludos y gracias de antemano Adjunto también la macro. MEvento.zip
-
0
Reacciones de usuarios
- 23 respuestas
- 5k visitas
-
-
Necesito por favor si me pueden ayudar con la siguiente macro. Tengo un archivo con varias celdas de información climática pero debe ir colocando a cada columna la información de medida al final de cada celda ejemplo Temperatura exterior viene original 20.3 y debo colocarle 20.3 °C y así con las demás columnas envío el archivo en Excel como ejemplo agradezco me puedan ayudar.
-
0
Reacciones de usuarios
- 1 respuesta
- 671 visitas
- 1 seguidor
-
-
Estimados!! necesito de su ayuda.hice una planilla en Excel para controlar los retiros de materiales de mi empresa , las funciones basicas ya estan (Lee el codigo,asigna cantidad por defecto y a mano cargo quien lo solicita) pero quiero hacer un poco mas y acá es la cuestion.- Necesito que cuando leo un producto se abra un popup que haga lo siguiente 1) sume los productos que son iguales en una linea , identifique a la persona que se lo lleva (porque en mi planilla precaria lo tengo que hacer de forma manual) y al dar aceptar se termina la transacción , y cuando leo un producto de nuevo se genere otra con el mismo popup y se repita el proceso.la idea es que cuando el usua…
-
0
Reacciones de usuarios
- 3 respuestas
- 1.5k visitas
-
-
Hola, De nuevo tengo que recurrir a vosotros. Estoy preparando una hoja para hacer un inventario. Tengo un scanner que voy pasando por el código de barras de los artículos. Como el ordenador no lo estoy mirando mientras escaneo, necesito que me avise con un pitido cuando una celda de la columna "E" es igual a "0". Gracias de antemano
-
0
Reacciones de usuarios
- 10 respuestas
- 1.5k visitas
-
-
Buenos días, expertos necesito una ayuda en mi archivo en la hoja Etiquetas_1 hay formato de rótulos ese formato quisiera que se imprima las cantidad de veces de acuerdo a numero que representa en la columna bultos, cada rotulo representa a a un numero de bultos; balga la redundancia, lo que necesito es una macro que me imprimala cantidad de veces de cada rotulo de acuerdo el numero de bultos se puede cambien de numero o en otros no se puede poner ningun numero entonce tampoco imprimiria. Muchas gracias, esperando su ayuda por favor. Adjunto el archivo Rotulos-wings.xlsm
-
0
Reacciones de usuarios
- 7 respuestas
- 919 visitas
- 1 seguidor
-
-
Les comento: Me solicitaron que en función a ciertos % de avance que obtenga cada Provincia, se le adjudicara un color en particular (el usuario los podrá cambiar) no es complicado solo que me hace falta el Mapa en excel (Shapes) por Provincias. Si alguien lo puede compartir genial o si ya existe algo en el foro... mejor. Saludos desde México.
-
0
Reacciones de usuarios
- 4 respuestas
- 2.6k visitas
- 1 seguidor
-
-
Buenos días, Tengo un problema con un archivo de excel al que quiero mediante un botón ocultar las columnas cuyas celdas estén vacías, es un inventario de productos por almacen que muestra las cantidades del mismo de acuerdo al código de cada producto. Me oculta las columnas del rango que estoy usando sin tomar en cuenta si están vacías o no. En una archivo con menos datos lo he probado y si funciona. Adjunto el archivo para que lo miren. También tiene programado un buscador para que muestre solo la referencia del producto requerida, entonces la mecánica del archivo sería mostrar solo una referencia de producto y poder ocultar las columnas (almacenes) que no te…
-
0
Reacciones de usuarios
- 8 respuestas
- 3.8k visitas
-
-
Buenos tardes estimados acudo a ustedes en esta ocasión para que me ayuden en lo siguiente: tengo un listado de productos(cada producto tiene su precio de lista y su Nombre cuenta de gastos) Lo que en un inicio realiza es generar pedidos (eligiendo tienda, cuenta de gastos), luego selecciona producto de la lista y lo agrega a la HOJA PEDIDO Aquí viene mi solicitud: Deseo que toda la lista de la HOJA PEDIDO, se consolide por fila y fecha(fecha, mes, año) , totalizando Cantidad y Total, tal como se ve en el ejemplo de la hoja C1 y que también se consolide por fecha (año, mes),Nombre cuenta de gastos y TOTAL, tal como se ve en el ejemplo de la …
-
0
Reacciones de usuarios
- 5 respuestas
- 930 visitas
-
-
Buenos días amigos, Tengo el siguiente problema con una Excel que estoy armando para el costeo de personal, resulta que en 2 formularios "frm_RegistroOpe" y "frm_RegistroOpeAdd" le inserté un filtro para que busque en las marcaciones de asistencia en base al DNI (Documento de identificación) y a la fecha de marcación, si no hay coincidencia entonces me lanza un mensaje diciendo que el personal no tiene marcación, pero no me está funcionando, ya probé todo tipo de código y no encuentro la solución, solamente llega a reconocer al primer dato de la tabla o al último, pero lo que yo necesito es que busque en toda la tabla, puse el siguiente código: Private Sub Command…
-
0
Reacciones de usuarios
- 3 respuestas
- 1k visitas
-
-
Hola Foristas. Buenas a todos. Espero estén bien de salud. Una vez más por acá con dudas. Primero: En el Formulario (UserForm6) Pretendo insertar los Datos Generales de la Empresa que se imprimirán en las hojas correspondientes. Estos datos se fijarán una primera vez y no “deben” modificarse a no ser que alguno de ellos cambie en algún momento. ¿Cómo puedo mantener los Datos en sus respectivas celdas sin que cambien? ‘Este es el código (inconcluso): Private Sub BtnGuardar_Click() 'Validar que se ingresen Datos en todos los Campos If Me.TxtEmpresa.Text = "" Then MsgBox ("Debe completar el campo: " & Me.TxtEmpresa…
-
0
Reacciones de usuarios
- 0 respuestas
- 854 visitas
- 1 seguidor
-
-
Buenas noches a todos. Se lo que le voy a pedir, para ustedes es algo fácil en la cual para mi es algo difícil. espero su gran ayuda. https://postimg.cc/1nnXDN5W IMG del Proyecto esto es solo en suma y resta. El esquema es el siguiente: 1 Cartas ----- dará -1 ------- ejem: vemos arriba "3 Energía" " 6 Cartas " presionamos "1 Cartas" -- daría "2 Energía" "5 Cartas" que se pueda jugar con los botones cuando agregan cartas, si tal caso da "0" que salga mensaje "No tiene mas energía" Cuando presiones el el botón " Pasa Turno " dará la siguiente suma "dará +2 Energía +3 Carta" El botón " + Energía " solo dará " +1 Energía " …
-
0
Reacciones de usuarios
- 2 respuestas
- 1k visitas
-
-
Buenas tardes compañeros, a ver si me podéis ayudar con esta macro la cual me funciona perfecta pero ahora a parte de remarcar en color las diferencias en la columna B de las dos hojas también me piden si se puede hacer que me sume el valor de las celdas de la columna M de ambas hojas y el resultado aparezca en la columna Q solo de los valores de las celdas sin color, que serian las que se repiten de una hoja en otra. Esta macro me funciona perfecta, he remarcado en rojo donde creo tiene que ir lo que pido y leo y leo y no termino de encontrar una solución. ¿Me pueden ayudar? El código que estoy utilizando es este: Sub CompararStock() Dim …
-
0
Reacciones de usuarios
- 8 respuestas
- 2.1k visitas
- 1 seguidor
-
-
Se puede crear un macro en donde cuando el worbook abra, siempre abra en otro tab del Ribbon? Me explico cuando uno abre el documento de excel siempre abre con el Tab del "Home" preselecionado. Sin embargo hay varios como Insert, Page Layout, Formulas, Data e incluso uno que yo creé. Puedo hacer que por default abra con ese tab que yo creé en el ribbon?
-
0
Reacciones de usuarios
- 5 respuestas
- 1.4k visitas
- 1 seguidor
-
-
Buenas tardes. Voy a hacer una especie de caja registradora en excel, y por ello voy a tener en una hoja diferentes macros que corresponden a diferentes productos. Entonces lo que quiero es que al cliquear en el macro del producto pues en una celda aparezca un 1, si vuelvo a cliquar en dicho macro de producto pues el 1 sea un 2, de esta forma pues se sumarán tantos productos como clics haga en la macro. Sin embargo, como la suma tengo que ir haciéndola en una única celda no se me ocurre cómo acumular la suma de los clicks en esa única celda. ¿Alguien sabe y me puede ayudar? Gracias de antemano.
-
0
Reacciones de usuarios
- 2 respuestas
- 815 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.