Respuesta
en
Microsoft Excel
a
Macro compara columna AB con DE
Prueba con esta macro sobre una copia de tu informacion, la macro eliminara todos los datos que esten repetidos mas de 1 vez Sub compara() Dim funcion As WorksheetFunction Set funcion = WorksheetFunction Set DATOS = Range("a1").CurrentRegion With...
Respuesta
en
Microsoft Excel
a
Coincidencia 3 valores por filas
La macro que sigue de esta imagen te dejaria el resultado asi y esta es la macro Option Base 1 Sub COPIAR_DATOS() Dim FUNCION As WorksheetFunction Dim DATOS As Range, DATOS2 As Range Set FUNCION = WorksheetFunction Set DATOS =...
Respuesta
en
Microsoft Excel
a
Problema con la formula BuscarV
con tus datos yo use la siguiente formula =+BUSCARV(A1,$C$1:$D$3,2,0), el error NA te sale cuando no encuentra o no existe el registro a buscar.
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Como contar celdas de colores distintos
supongo que quieres algo asi? Prueba esta macro, lo unico que tienes que hacer es marcar el area coloreada con el mouse o bien teclear asi: c3:c9 y la macro hara el resto Sub cuenta_colores() Dim unicos As New Collection Set funcion =...
Respuesta
en
Microsoft Excel
a
Filtrar dos columnas a la vez
Prueba con esta macro solo cambia el a1 por la referencia deonde esten tus datos. Sub OCULTAR() Set DATOS = Range("A1").CurrentRegion With DATOS F = .Rows.Count: C = .Columns.Count For I = 2 To F TF = .Cells(I, 3): TM = .Cells(I, 5) If IsEmpty(TM)...
Respuesta
en
Macros Excel
y en 1 temas más
a
¿Como Crear una Hoja en excel con VBA y pasarle los datos?
Prueba con esta macro Sub copiar() hoja = ActiveSheet.Name Set origen = Worksheets(hoja).Range("a1").CurrentRegion nombre = Range("a2") On Error Resume Next Sheets(nombre).Select If Err.Number > 0 Then Worksheets.Add.Name = nombre On Error GoTo 0 hd...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Guía o ejemplo para trabajar con arreglos
Este es un ejemplo simple no necesitas un for para hacerlo Sub FILTRAR() Set datos = Range("A1").CurrentRegion NOMBRES = Array("SARA", "CARLOS", "ROSA") With datos .AutoFilter .AutoFilter Field:=1, Criteria1:=NOMBRES, Operator:=xlFilterValues End...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Como asignar el valor de una celda A1 de una Hoja 1 a una columna A de un hoja2...
Pega esta macro en el modulo vba de la hoja1 Private Sub Worksheet_SelectionChange(ByVal Target As Range) n = Range("a1") Set h2 = Worksheets("hoja2").Range("a1").CurrentRegion filas = h2.Rows.Count If filas = 1 And h2.Cells(1) = Empty Then...
Respuesta
en
Excell
y en 1 temas más
a
Extraer filas completas de una tabla excell a otra hoja independiente
Te paso la siguiente macro solo teclea en el inputbox el codigo que quieres copiar y la macro te copiara todos los registros correspondientes a ese codigo a una hoja que tendra el numero de codigo, el unico cambio que tienes que hacerle a la macro es...
Respuesta
en
Macros Excel
y en 1 temas más
a
Consulta basica de combo box
Usa esta macro Private Sub UserForm_Initialize() Dim rango As Range Set datos = Range("a2").CurrentRegion With datos Rem ---si tiene encabezados activa esta linea------ 'Set datos = .Rows(2).Resize(.Rows.Count - 1, .Columns.Count) ComboBox1.RowSource...