Enrique  Bar

Enrique Bar

 México @enriquebar2 desde - visto
Preguntar

Actividad pública reciente

Ha empezado a seguir a
Ha valorado "Excelente" la respuesta

Macro para borrar contenido si cumple una condición y copiar datos de celda siguiente

respondió: Te anexo la macro Sub Borrar_Contenido() 'Por.Dante Amor For i = 2 To Range("A" & Rows.Count).End(xlUp).Row If UCase(Cells(i, "F")) = "X" Then Cells(i, "B") = Cells(i, "C") Cells(i, "C") = Cells(i, "D") Cells(i, "D") = "" End If Next MsgBox "Fin" End...