Excel VBA: seleccione Caso si ActiveCell como “* cadena *”

Estoy trabajando en una macro que toma el valor actual de laActiveCell y cambia ese valor basado en un caso seleccionado.

Sin embargo, soy incapaz de determinar si elActiveCell contiene una cadena de comodín. No estoy seguro de si mi sintaxis es correcta. ¿Cómo puedo obtener mi caso selecto para comparar?

    Select Case ActiveCell.Value

        Case ActiveCell.Value Like "*string*"
            ActiveCell.Value = "contains string"

    End Select