Parar macro si valores iguales

Como detengo mi macro si dos celdas son igiales, en este caso las A2 y la A5.
Lo mismo necesito para detenr la macro si el valor de la A5 se encuentra en la columna A de la Hoja2
Esto es lo que tengo, genero una calve a partir de la hora, fecha y nombre del cliente más 3 dígitos al azar entre 1 y 999 más una letra.
Range("A5").Select                ActiveCell.FormulaR1C1 = _                "=CONCATENATE(DAY(TODAY()),MONTH(TODAY()),HOUR(now()),MINUTE(now()),SECOND(now()),MID(RC[2],1,SEARCH("" "",RC[2],1)-1),RANDBETWEEN(1,100),CHAR(65+RAND()*26))"                Range("A5").Select                Selection.Copy                Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _                :=False, Transpose:=False                nbre = Application.UserName                Sheets("Hoja1").Range("AH5").Value = nbre
Ya ando muy mal, no se como detenerla si el valor generado ya existe o la celda a2 y a5 son iguales.
Gracias!

1 respuesta

Respuesta
1
if [a2]=[a5] then exit sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas