problemas con autofiltros

19/12/2007 - 21:34 por dubicm | Informe spam
hola a tod@s,

tengo instalado el excel 2000 en el ordenador y mi problema es el siguiente:
tengo una base de datos con la hoja protegida y no puedo realizar
autofiltros, en excel 2003 se que se puede hacer pero en 2000 no veo como y
el problema es que en el trabajo no pueden instalar el 2003 ni xp, tiene que
ser el 2000, sabe alguien como puedo hacer para que sin dejar de proteger la
hoja pueda realizar los autofiltros?

espero que me puedan ayudar.

muchas gracias.

saludos.

dubicm

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
19/12/2007 - 23:01 | Informe spam
hola, eduardo !

tengo instalado el excel 2000 en el ordenador y mi problema es el siguiente:
tengo una base de datos con la hoja protegida y no puedo realizar autofiltros
en excel 2003 se que se puede hacer pero en 2000 no veo como y el problema es que en el trabajo
no pueden instalar el 2003 ni xp, tiene que ser el 2000
sabe alguien como puedo hacer para que sin dejar de proteger la hoja pueda realizar los autofiltros?



necesitas (re)proteger la hoja en el evento '_open' de tu libro estableciendo dos caracteristicas:
-> la proteccion a solo la interfase con el usuario
-> el permiso para usar los autofiltros (y esquemas) los cuales YA deberan estar presentes en tu hoja

a) en excel 97 y 2000 NO necesitas 'repetir' el password <= es 'suficiente' con poner:
Private Sub Workbook_Open()
With Worksheets("Hoja1")
.Protect UserInterfaceOnly:=True
.EnableAutoFilter = True
End With
End Sub

b) a partir de excel 2002 [xp] SI es requisito 'repetir' el password :-( <Private Sub Workbook_Open()
With Worksheets("Hoja1")
.Protect _
PassWord:="la MISMA cOntRaSe#a qUe lE pUsISte", _
UserInterfaceOnly:=True
.EnableAutoFilter = True
End With
End Sub

(practicamente) TODO lo que hagas por codigo... pasara sin problemas
(excepto ciertas cosillas relacionadas con ordenaciones, insertar filas/columnas y objetos incrustados) :-((

OJO: si llegaras a necesitar que el usuario defina sobre que listado aplica los autofiltros...
copia/pega las siguientes lineas en un modulo de codigo 'general' y asignas la macro a algun boton/atajo/...
Option Private Module
Sub AutoFiltrosPorMacro()
With ActiveCell.CurrentRegion
If .Count > 1 Then
If .Parent.AutoFilterMode Then
If .Parent.AutoFilter.Range.Address <> .Address Then .AutoFilter
End If
.AutoFilter
Else
MsgBox """Activa"" por favor (alg)una celda" & vbCr & _
"""dentro"" (o... ""cerca"") de la lista ""a filtrar"".", _
vbInformation, "AutoFiltros por macros"
End If
End With
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
Respuesta Responder a este mensaje
#2 dubicm
20/12/2007 - 13:51 | Informe spam
hola hector,

si le he dado la orden de proteger desde HERRAMIENTAS/PROTEGER/PROTEGER
HOJA, tengo que escribir tambien todo el codigo que me dices o vale con la
parte del autofiltro? te lo digo porque yo de programacion tengo nivel 0.

se podria hacer sin programacion? la password se pondria en la orden de
HERRAMIENTAS/PROTEGER/PROTEGER HOJA independientemente de que haya que
escribir el codigo?

espero que me puedas ayudar.

muchas gracias.

saludos.

dubicm


"Héctor Miguel" escribió en el mensaje
news:
hola, eduardo !

tengo instalado el excel 2000 en el ordenador y mi problema es el
siguiente:
tengo una base de datos con la hoja protegida y no puedo realizar
autofiltros
en excel 2003 se que se puede hacer pero en 2000 no veo como y el
problema es que en el trabajo
no pueden instalar el 2003 ni xp, tiene que ser el 2000
sabe alguien como puedo hacer para que sin dejar de proteger la hoja
pueda realizar los autofiltros?



necesitas (re)proteger la hoja en el evento '_open' de tu libro
estableciendo dos caracteristicas:
-> la proteccion a solo la interfase con el usuario
-> el permiso para usar los autofiltros (y esquemas) los cuales YA deberan
estar presentes en tu hoja

a) en excel 97 y 2000 NO necesitas 'repetir' el password <= es
'suficiente' con poner:
Private Sub Workbook_Open()
With Worksheets("Hoja1")
.Protect UserInterfaceOnly:=True
.EnableAutoFilter = True
End With
End Sub

b) a partir de excel 2002 [xp] SI es requisito 'repetir' el password :-(
<> Private Sub Workbook_Open()
With Worksheets("Hoja1")
.Protect _
PassWord:="la MISMA cOntRaSe#a qUe lE pUsISte", _
UserInterfaceOnly:=True
.EnableAutoFilter = True
End With
End Sub

(practicamente) TODO lo que hagas por codigo... pasara sin problemas
(excepto ciertas cosillas relacionadas con ordenaciones, insertar
filas/columnas y objetos incrustados) :-((

OJO: si llegaras a necesitar que el usuario defina sobre que listado
aplica los autofiltros...
copia/pega las siguientes lineas en un modulo de codigo 'general'
y asignas la macro a algun boton/atajo/...
Option Private Module
Sub AutoFiltrosPorMacro()
With ActiveCell.CurrentRegion
If .Count > 1 Then
If .Parent.AutoFilterMode Then
If .Parent.AutoFilter.Range.Address <> .Address Then .AutoFilter
End If
.AutoFilter
Else
MsgBox """Activa"" por favor (alg)una celda" & vbCr & _
"""dentro"" (o... ""cerca"") de la lista ""a
filtrar"".", _
vbInformation, "AutoFiltros por macros"
End If
End With
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

Respuesta Responder a este mensaje
#3 Héctor Miguel
20/12/2007 - 20:12 | Informe spam
hola, eduardo !

si le he dado la orden de proteger desde HERRAMIENTAS/PROTEGER/PROTEGER HOJA
tengo que escribir tambien todo el codigo que me dices o vale con la parte del autofiltro?
te lo digo porque yo de programacion tengo nivel 0.

se podria hacer sin programacion?
la password se pondria en la orden de HERRAMIENTAS/PROTEGER/PROTEGER HOJA
independientemente de que haya que escribir el codigo?



mientras sea la version 2000, no creo que puedas dejar de usar codigo...
-> si quieres mantener la proteccion de la/s hoja/s
-> y conservar el permiso para usar los autofiltros sobre hojas protegidas :-((

saludos,
hector.

necesitas (re)proteger la hoja en el evento '_open' de tu libro estableciendo dos caracteristicas:
-> la proteccion a solo la interfase con el usuario
-> el permiso para usar los autofiltros (y esquemas) los cuales YA deberan estar presentes en tu hoja (...)
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida