Jump to content

error en el metodo select de la clase range


Recommended Posts

Hola a todos; mi codigo es el siguiente

Sub ProtectSheet()

On Error GoTo ManejadorError

Password = "paz"

ActiveSheet.Unprotect Password

Cells.Select

Selection.Locked = False

Selection.FormulaHidden = False

Selection.Locked = True

Password = "paz"

Selection.FormulaHidden = False

ActiveSheet.Protect Password, True, True, True

ManejadorError:

MsgBox Err.Description

End Sub

si ejecuto una macro que copia la hoja, que es la que contiene esta macro me da error en la linea Cells.Select dando de error error en el metodo select de la clase range y si lo ejecuto desde el libro original me da error en la linea ActiveSheet.Protect Password, True, True, True, y dice no coinciden los tipos, que puede estar pasando.

saludos

juandi

Link to post
Share on other sites

Respuesta: error en el metodo select de la clase range

Hola, Prueba asi de esta manera a ver si asi funciona.

Sub ProtectSheet()

On Error GoTo ManejadorError

Password = "paz"

ActiveSheet.Unprotect Password

Cells.Select

Selection.Locked = False

Selection.FormulaHidden = False

Selection.Locked = True

Password = "paz"

Selection.FormulaHidden = False

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _

Scenarios:=True

ManejadorError:

MsgBox Err.Description

End Sub

Saludos.

Link to post
Share on other sites

Respuesta: error en el metodo select de la clase range

Hola, Prueba asi de esta manera a ver si asi funciona.

Sub ProtectSheet()

On Error GoTo ManejadorError

Password = "paz"

ActiveSheet.Unprotect Password

Cells.Select

Selection.Locked = False

Selection.FormulaHidden = False

Selection.Locked = True

Password = "paz"

Selection.FormulaHidden = False

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _

Scenarios:=True

ManejadorError:

MsgBox Err.Description

End Sub

Saludos.

Hola, gracias por tu respuesta, peor ahora me da erro de "No coinciden los tipos", sabes que puede pasar?? el error salta despues de pasar por la linea

ActiveSheet.Protect DrawingObjects:=True, Contents:=True,Scenarios:=True

saludos

juandi

Link to post
Share on other sites

Respuesta: error en el metodo select de la clase range

Probe y ejecute este codigo en mi trabajo sin ningun error, ahora estoy en casa y lo volvi a ejecutar obteniendo el mismo resultado, corre perfectamente.

A lo mejor tienes mas codigo arriba en donde declaras variables de algun tipo y por eso las variables de este codigo no coinciden al ser utilizadas, a lo mejor la variable password esta declarada como integer y es utilizada en este codigo para texto, no se algo asi, insisto, en mi pc corre perfectamente, ojala otro usuario lo pruebe y nos diga los resultados obtenidos.

Saludos.

Link to post
Share on other sites

Respuesta: error en el metodo select de la clase range

Probe y ejecute este codigo en mi trabajo sin ningun error, ahora estoy en casa y lo volvi a ejecutar obteniendo el mismo resultado, corre perfectamente.

A lo mejor tienes mas codigo arriba en donde declaras variables de algun tipo y por eso las variables de este codigo no coinciden al ser utilizadas, a lo mejor la variable password esta declarada como integer y es utilizada en este codigo para texto, no se algo asi, insisto, en mi pc corre perfectamente, ojala otro usuario lo pruebe y nos diga los resultados obtenidos.

Saludos.

Gracias por tu ayudas, en este momento no tengo el archivo a mano cuando lo tenga pruebo. En realidad la variable password no está declarada, si mal no recuerdo, quizas tome por defecto integer y yo le estoy pasando texto, cuando tenga el archivo la declaro con string y veo que pasa. Te agradezco mucho te atención y cuando tenda novedades te aviso

Saludos y gracias

Juandi

Argentina-Cordoba

Link to post
Share on other sites

Respuesta: error en el metodo select de la clase range

Gracias por tu ayudas, en este momento no tengo el archivo a mano cuando lo tenga pruebo. En realidad la variable password no está declarada, si mal no recuerdo, quizas tome por defecto integer y yo le estoy pasando texto, cuando tenga el archivo la declaro con string y veo que pasa. Te agradezco mucho te atención y cuando tenda novedades te aviso

Saludos y gracias

Juandi

Argentina-Cordoba

Hola, prové el sig. codigo:

Private Sub cmdgrabar_Click()

Dim Password As String

On Error GoTo ManejadorError

Password = "paz"

ActiveSheet.Unprotect Password

Cells.Select

Selection.Locked = False

Selection.FormulaHidden = False

Selection.Locked = True

Password = "paz"

Selection.FormulaHidden = False

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

'cmdgrabar.Enabled = False

ManejadorError:

MsgBox Err.Description

End Sub

Me sigue dando error de no coinciden los tipos, que puede pasar.

saludos juandi

Link to post
Share on other sites

Respuesta: error en el metodo select de la clase range

Hola Juandi,

Es casi seguro que el error viene de otro lado que aqui no se alcanza a ver en este codigo que detallas.

La macro corre perfectamente en excel 2000, 2003 y 2007

Saludos.

Hola, fui comentando linea por linea y me seguia dando error, hasta que saque el manejadordeerror y se solucionó, que puede ser??

saludos y gracias por todos

Link to post
Share on other sites
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

Privacy Policy