Error 424 (quitar extensión del nombre)
Publicado por liloulou (1 intervención) el 12/03/2007 13:29:17
Hola, necesito ayudaaa!!!
Tengo el siguiente código (estoy tratando unas macros en excel). Lo que intento es obtener el nombre del archivo sin la extensión (es decir, sin .xls).
Dim nomCompleto As String
Dim nomSinExt As String
nomCompleto = ActiveWorkbook.Name
Dim indicePunto As Integer
indicePunto = nomCompleto.LastIndexOf(\".\")
nomSinExt = nomCompleto.Substring(0, indicePunto)
Al compilarlo con Microsoft Visual Basic no tengo ningún problema; pero al intentar ejecutarlo obtengo el siguiente error:
Se ha producido el error 424 en tiempo de ejecución. Se requiere un objeto
He probado muchas maneras, pero no consigo saber por qué no me funciona.
Gracias por adelantado.
Tengo el siguiente código (estoy tratando unas macros en excel). Lo que intento es obtener el nombre del archivo sin la extensión (es decir, sin .xls).
Dim nomCompleto As String
Dim nomSinExt As String
nomCompleto = ActiveWorkbook.Name
Dim indicePunto As Integer
indicePunto = nomCompleto.LastIndexOf(\".\")
nomSinExt = nomCompleto.Substring(0, indicePunto)
Al compilarlo con Microsoft Visual Basic no tengo ningún problema; pero al intentar ejecutarlo obtengo el siguiente error:
Se ha producido el error 424 en tiempo de ejecución. Se requiere un objeto
He probado muchas maneras, pero no consigo saber por qué no me funciona.
Gracias por adelantado.
Valora esta pregunta
0