sacar cantidad de un carácter

[ebu]

hola!

si en una variable tengo lo siguiente nombre="Trabajos/Matemáticas/Ejercicios" como puedo sacar la cantidad del carácter "/"??
he estado probando con instr, len... pero no logro sacarlo.

les cuento un poco más. tengo el siguiente código:
dim nombre as string, nombre2() as string
nombre = ...'va cogiendo diferentes rutas
nombre2 = Split(nombre, "/")
nombre = nombre2(UBound(nombre2))
el caso es que en la línea de negrita me da error9. yo entiendo que eso es porque no he dimencionado el vector.

lo que quiero hacer:
dim nombre as string, nombre2() as string
nombre = ...'va cogiendo diferentes rutas
contar=..'contar el número de caracteres de "/"
redim nombre2(contar+1)
nombre2 = Split(nombre, "/")
nombre = nombre2(UBound(nombre2))

agradeceria vuestra ayuda!
saludos!