Excel vba beginsWith ?

[rockbirra]

Buenos días.


tengo una consulta a realizar sobre excel y vba.

Tengo una macro que me recorre una hoja de excel columna por columna.
Me interesaria una funcion que me dijera si el valor de la columna empieza con una cadena que le paso.

Es decir:

a1: mi casa es grande
b1: mi casa es verde
c1: mi casa tiene ventanas.

Me gustaria una funcion que me devolviera cierto (o un valor) cuando comparo a1 con "mi casa"

Seria algo parecido a beginsWith o del estilo, pero no lo encuentro.

Alguna idea?

Muchas gracias.

[3pies]

Lo puedes hacer con la función Instr. Aquí tienes un ejemplo, que lo que hace es colocar en la columna de la derecha, una frase, si encuentra la frase o palabra que hayas informado:

Código:

Sub frase()
frase = "mi casa"
Do While Not IsEmpty(ActiveCell)
    If InStr(ActiveCell, frase) > 0 Then ActiveCell.Offset(0, 1) = "Existe la frase: " & frase
    ActiveCell.Offset(1, 0).Select
Loop
End Sub

Salu2

[rockbirra]

Muchas gracias! perfecto!