Félix Zamora

Dante Amor respondió: Te anexo la macro. Sub eliminar() 'Por.Dante Amor For i = Range("A" & Rows.Count).End(xlUp).Row To 1 Step -1 Set b = Range("B:B").Find(Cells(i, "A")) If b Is Nothing Then Cells(i, "A").Delete Shift:=xlUp End If Next End Sub Sigue las Instrucciones...

Elsa Matilde respondió: Ya te la ajustaré y dejaré escrita aquí la versión final. Sdos Elsa

Dante Amor respondió: Te anexo la macro Sub copiar() 'Por.Dante Amor Application.ScreenUpdating = False Sheets("datos").Copy After:=Sheets(Sheets.Count) ActiveSheet. Cells. Clear Sheets("datos"). Range("D1:X30"). Copy ActiveSheet. Range("D1") End Sub

Dante Amor respondió: Te anexo la macro. Sub comparar() 'Por.DAM On Error Resume Next With Application Set rango = .InputBox("Selecciona el rango a comparar", _ Default:=Selection.Address, Type:=8) If rango Is Nothing Then Exit Sub Set celda = .InputBox("Selecciona la...

Luis Mondelo respondió: Te mando mi solución. Posiciónate en la primera celda de esa columna y después ejecuta esta macro: Sub proceso() 'por luismondelo Cells(65000, ActiveCell.Column).End(xlUp).Offset(1, 0).Value = "end" Do While ActiveCell.Value <> "end" If...

Mario Rodríguez respondió: Da la sensación, Jonatan, que donde has escrito filas quisiste escribir columnas. Para entender mejor tu necesidad, te sugiero que subas en algún servidor gratuito una versión pequeña de tu archivo. Aprovecha para escribir en la segunda hoja que es...

Dante Amor respondió: Si tienes esto en la hoja1 A 1 -234 2 23 3 -456 En la hoja 2 pon esto A 1 =SI(Hoja1!A1<0,Hoja1!A1*-1,Hoja1!A1) Arrastra la fórmula en la hoja 2 hasta la última fila que tienes en la hoja1

Dante Amor respondió: No se puede posicionar el msgbox, no está dentro de sus parámetros: MsgBox(prompt[, buttons] [, title] [, helpfile, context]) Lo que puedes hacer es simular el msgbox con userform. Crea un userform con un label y commandbutton Este sería el código en...

ruben2013 respondió: En Excel no hay esa opción de empezar a escribir y que se autocomplete, pero hay otra opción que si que te puede ayudar. Teniendo en cuenta que te sitúes en la misma columna en la que ya estaba escrita ese dato, presionasl ALT+ flecha abajo. Se te...

ramiropiro respondió: Encontré una respuesta para los que no tenemos excel 2013.. está en You Tube... https://www.youtube.com/watch?v=_n6pzkCF0-c

Elsa Matilde respondió: Ya tengo en mi poder tus muestras. Ni bien lo tenga resuelto te las enviaré a tu correo. Sdos Elsa

Dante Amor respondió: Te anexo el archivo con la macro https://www.dropbox.com/s/b3j1d3vvv5dh02y/copiar%20hojas%20a%20libro2.xlsm?dl=0 En la celda B1 escribe la ruta en donde tienes tus 31 libros En la columna A escribe los nombres de los libros con todo y extensión. En...