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?
8680 temas en este foro
-
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
- 637 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
- 631 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
- 783 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
- 663 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
- 954 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
- 4.9k 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
- 644 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.4k 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.4k 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
- 880 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.5k 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.7k 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
- 877 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
- 815 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.3k 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
- 785 visitas
-
-
Hola buena noche estoy tratando de hacer una macro sencilla, de cambiar puntos por comas y viceversa, pero el inconveniente es que me deja los números como texto cada vez que los connvierto... si alguien puede que me ayudarme se lo agrederia, Mil bendiciones. Open abrir.xlsm
-
0
Reacciones de usuarios
- 6 respuestas
- 8k visitas
- 1 seguidor
-
-
Hola amigos, a ver si podéis ayudarme: Tengo una base datos creada con aproximadamente 1.000 registros (filas) que con una macro va rellenado otra base de datos general (que tiene también otros datos) Lo que querría conseguir es que en el momento que incluyo un registro en la B.D. General, quedara marcado en la primera (la ya creada) por ejemplo con un color que marcara toda la fila, o con negrita u otra manera, con el fin de que resalte y cuando abra la base de datos (la ya creada) pueda ver de una ojeada qué registros han pasado ya a la b.d.general y lo que es más importante para mí , cuales son los que faltan de trasladar. Espero haberme explicado …
-
0
Reacciones de usuarios
- 4 respuestas
- 850 visitas
-
-
I want to Call a routine that I have it into a UserForm. But I tried to call from a Module and I'm receiving a error msg. This is the routine that I have inside a CommandButton of the UserForm Public Sub HO_Issuance() Set myCell = ActiveCell myCell.Value = "TAILBOARD " ActiveCell.Offset(2, 0).Select Selection.Value = "THIS IS " & TextBox_OIC.Value & " INFORMING " & TextBox_EIC.Value ActiveCell.Offset(1, 0).Select Selection.Value = "THAT THE RECLOSING HAS BEEN DISABLED ON " & TextBox_Feeder.Value ActiveCell.Offset(1, 0).Select Selection.Value = "UNDER HOLD-OFF # " & ActiveSheet.Range("J2").Value ActiveCell.Offset(2, 0).Select…
-
0
Reacciones de usuarios
- 1 respuesta
- 592 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 [email protected]
Información adicional: Encontrarás más información en la política de privacidad.