Respuesta
en
Microsoft Excel
y en 3 temas más
a
Agregar caracter y que no me modifique algún dato
[Hola Prueba la siguiente macro y me comentas Sub AOM() 'Por Adriel ' u = Range("A" & Rows.Count).End(xlUp).Row ' For i = 2 To u dato = Cells(i, "A") If Cells(i, "B") = "" Then If InStr(dato, "S") > 0 Then num = Right(dato, Len(dato) - 1) If Len(num)...