Quitar registros duplicados

Preguntas y respuestas relacionadas

Cambiar valor de celda al cambiar otra VBA

Alguien podría ayudarme en esto: Tengo dos celdas como listas (de validación de datos) funcionando como listas dependientes. Quisiera que al seleccionar la opción de la lista desplegable de la primer celda, la otra celda (dependiente) quede vacía...
1 respuesta

Como puedo modificar este macro para que extraiga más partes del xml

Sub ExtraerFolioFiscal() Dim MiPc, Carpeta, Archivos, Archivo Dim y, Fila, FolioFiscal Application.ScreenUpdating = False Fila = Range("A" & Rows.Count).End(xlUp).Row + 1 Set MiPc = CreateObject("Scripting.FileSystemObject") Set Carpeta =...
1 respuesta

Agregar dos funciones a esta macro

Estoy tratando de agregar a esta macro: Sub Borrar_celdas_Desbloqueadas() ActiveSheet.Protect Password:="1" Dim r As Range For Each r In Selection If r.Locked = False Then r.ClearContents Dim img As Shape On Error Resume Next For Each img In...
1 respuesta

Modificar Macro para tomar la imagen de diferente ruta según información de celda en excel

Como lo tengo hoy, es así: Adentro de la carpeta Dropbox, hay 5 carpetas: Infracciones Cartas Generadas Servidor 1 Servidor 2 Servidor 3 El archivo maestro de Bitácora y cartas están en la carpeta de infracciones. La idea es que las cartas que se...
1 respuesta

Insertar signo

Quisiera saber como realizar por medio de VBA, un formato personalizado, en el cual pueda insertar el signo " - " entre cada tres posiciones del numero digitado. Ejemplo : 123456789 separe la cantidad de la siguiente forma 123-456-789 150000000...
1 respuesta

Macro para copiar celdas de manera secuencial

Macro para copiar celdas A1:N14 (son 2005 filas y 14 columnas) en otra hoja pero de A1:A14, osea que fila/registro lo transponga/coloque en una columna de manera secuencial. Que copie la celda de A1 hasta N1, coloque el contenido de las celdas en...
1 respuesta

Hacer referencia a un valor en una hoja distinta macro

Private Sub Worksheet_Change(ByVal Target As Excel.Range) 'rango hasta la celda 2000 If Not Intersect(Target, Range("H2:H2000")) Is Nothing Then 'columna H actualizando col G Target.Offset(0, -1) = Target.Offset(0, -1).Value - Target.Value 'acumula...
1 respuesta

Combinar 4 hojas en un solo listbox

Para dante Buena noche Te molesto a ver si es posible esto: Tengo 4 hojas (datos, datos2, datos3 y datos4) y lo que deseo es combinar las 4 listas en un solo listbox en el userform En el userform tengo un optionbutton para que al darle click ahí se...
1 respuesta

Eliminar saltos de linea dentro de una misma celda de excel

Para Dante o cualquiera que me pueda ayudar. Hola, saludos. El caso es que necesito relizar una tarea que consiste en dos pasos. Convertir una tabla de excel con formato irregular( filas con distinto numero de celdas en altura) en formato...
1 respuesta

Error en el método Range de objeto _Global

Tengo el siguiente codigo: Private Sub ComboBox2_Click() Dim ApNom As String Dim idBusca As String Dim fila As Integer Application.ScreenUpdating = False Sheets("DATOS").Select fila = 0 ApNom = ComboBox2 Do While idBusca <> ApNom fila = fila + 1...
2 respuestas
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema