James Bond

Hay dos maneras una que pongas el nombre del mes en a1 y la otra el nombre concatenado en la celda a1, te paso la instrucción para ambas opciones, usa sola 1 Sub cambiar_nombre() Sheets(ActiveSheet.Name).Name = "Pgos. Prov. " & Range("a1")...

Usa esta macro, solo cambia la celda a1 por aquella donde comiencen tus datos Option Base 1 Sub borrar_numeros() Set datos = Range("a1").CurrentRegion With datos f = .Rows.Count ReDim matriz(f, 1) x = 1 For i = 1 To .Rows.Count numero = .Cells(i, 1)...

Muchos datos en una variable en VBA equivale a una matriz o array de datos ¿no se si eso es lo que buscas?, mira el ejemplo, en el panel locales veras que los daos de fechas únicas son almacenados en una arreglo de variables al que llame matriz, lo...

Este es el resultado de la macro y esta es la macro Sub colorear() Set datos = Range("a2").CurrentRegion ColorFilaP = 35 ColorFilaI = 40 With datos c = .Columns.Count: Fi = .Rows.Count .Columns(1).Copy: .Columns(c + 3).Resize(Fi, 1).PasteSpecial...

Entra a la macro y cambia todas las líneas tablename:="tabla dinámica 1" por el nombre que tu quieras pro ejemplo: tablename:="tabla_numeros", ais cada vez que generes la tabla esta tendrá el mismo nombre, con el nombre por default que actualmente...

Si la macro no tienen controles de formulario como textbox puedes escribirla en un modulo standard, y llamarla desde cada textbox con el evento afterupdate con call (nombre de la macro) o simplemente nombre de la macro, en caso de que la macro maneje...

Esta es una macro sencilla que hace lo que buscas, si el nombre existe en cualquiera de las 2 hojas te lo mostrara en un mensaje y terminara el programa, en caso contrario hara la captura solo especifica antes de range("a:a") del with la hoja donde...

Te explico cuando creas una tabla con nombre creas una matriz de n filas por m columnas, y estas se manejan por coordenadas a lo que quieres tu mismo te has dado la respuesta, así queda en VBA la asignación a variable...

Prueba con esta macro Sub BORRAR_COLORES() Range("A:CY").Interior.ColorIndex = xlNone End Sub

Prueba con esta macro, lo que hace es primero contar las celdas con datos y a partir de la ultima con datos cuenta 6 filas hacia abajo y las elimina todas en un solo paso Sub borrar_filas() cuenta = WorksheetFunction.CountA(Range("a:A"))...