Hola a todos,
Soy nuevo en la programacion de Visual Basic, etoy tratando de comparar celdas en dos columnas distintas de Excel, y si son iguales, poner un texto en otra celda,
el codigo que tengo es este, pero no me funciona, si alguien me puede ayudar muchas gracias,
Sub DiferenciaSolicitud()
'Call ordenarSolicitudes
Dim CeldaAutomovil As Range
Dim CeldaVerificacion As Range
For Each CeldaVerificacion In Columns("S:S")
For Each CeldaAutomovil In Columns("G:G")
If CeldaAutomovil.Value = CeldaVerificacion.Value Then
CeldaVerificacion.Offset(0, 2).Value = Automovil
Else
CeldaVerificacion.Offset(0, 2).Value = Vivienda
End If
Next CeldaAutomovil
Next CeldaVerificacion
End Sub
