Ya he probado todo eso y aun se sigue cerrando.=(

PD:Ahora me pone: run-time error '9' subscript out of range