NAVEGAR POR DETERMINADAS CELDAS

25/02/2007 - 03:59 por Dorian | Informe spam
hola grupo !!

una vez mas acudo aquí en busca de ayuda :))

el problema sería el siguiente:

al abrirse el libro debe seleccionarse la celda T9, pero el usuario sólo
puede escribir datos en las siguientes celdas (la T9 (seleccionada al
comienzo), A12, E12, AB12, I13 y B14) como puedo hacer para que con cada
pulsación solo pueda moverse ("navegar") por éstas celdas y no pueda
seleccionar ninguna otra de la hoja de cálculo ?

alguien me pude dar una mano?

desde ya muchas gracias

saludos

dorian+

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
25/02/2007 - 05:10 | Informe spam
hola, Dorian !

al abrirse el libro debe seleccionarse la celda T9, pero el usuario solo puede escribir datos en las siguientes celdas
(la T9 (seleccionada al comienzo), A12, E12, AB12, I13 y B14)
como puedo hacer para que con cada pulsacion solo pueda moverse ("navegar") por estas celdas
y no pueda seleccionar ninguna otra de la hoja de calculo ?



1) para la apertura en la celda que necesitas... usa el evento '_open' del libro [ThisWorkbook]
y selecciona el rango [previamente la hoja] donde deseas que se inicien los trabajos :))

2) para la 'tabulacion/navegacion/...' solo por las celdas que mencionas...
-> no te sirve proteger la hoja dejando previamente desbloqueadas las celdas que si se pueden modificar ?
[revisa otras opciones/caracteristicas/... en la proteccion de la hoja, segun tu version de excel] ;)

si necesitas algo menos sencillo que la propuesta anterior... comentas algun detalle adicional ?
saludos,
hector.
Respuesta Responder a este mensaje
#2 AnSanVal
25/02/2007 - 11:32 | Informe spam
Hola Dorian.

Suponiendo que la hoja que quieres controlar es 'Hoja1'.

En el módulo ThisWorkbook:
Private Sub Workbook_Open()
Sheets("Hoja1").ScrollArea = "T9"
End Sub

En el módulo Hoja1:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "" Then Exit Sub
Select Case Target.Address
Case "$T$9"
Sheets("Hoja1").ScrollArea = "A12"
Case "$A$12"
Sheets("Hoja1").ScrollArea = "E12"
Case "$E$12"
Sheets("Hoja1").ScrollArea = "AB12"
Case "$AB$12"
Sheets("Hoja1").ScrollArea = "I13"
Case "$I$13"
Sheets("Hoja1").ScrollArea = "B14"
Case "$B$14"
Sheets("Hoja1").ScrollArea = "T9"
End Select
Sheets(1).ScrollArea = ""
End Sub

Saludos desde Tenerife (España).
********************************************
"Dorian" <flacopado(ESTONOVA)@yahoo.fr> escribió en el mensaje
news:
hola grupo !!

una vez mas acudo aquí en busca de ayuda :))

el problema sería el siguiente:

al abrirse el libro debe seleccionarse la celda T9, pero el usuario sólo
puede escribir datos en las siguientes celdas (la T9 (seleccionada al
comienzo), A12, E12, AB12, I13 y B14) como puedo hacer para que con cada
pulsación solo pueda moverse ("navegar") por éstas celdas y no pueda
seleccionar ninguna otra de la hoja de cálculo ?

alguien me pude dar una mano?

desde ya muchas gracias

saludos

dorian+




Respuesta Responder a este mensaje
#3 Dorian
25/02/2007 - 20:17 | Informe spam
hola héctor, AnSanVal

muchas gracias a ambos por sus respuestas\

héctor: de hecho la planilla esta protegida y solamente estan desprotegidas
las celdas mencionadas que son las "habilitadas" para introducir datos; lo
cual no impide a los usuarios seleccionar otra celda, no podrán editarla ni
ver su contenido pero si seleccionarla, que es lo que tampoco quiero :(((

AnSanVal: gracias por tu código\ funciona pero siempre y cuando introduzca
algun dato en la celda seleccionada\
es decir, cuando se abre el libro se selecciona la celda T9 y, como quiero,
no permite seleccionar ninguna otra con el mouse; si introduzco un dato pasa
a la celda A12, y si aqui introduzco un dato pasa a la E12 y así
sucesivamente, va pasando a la que le sigue\

pero si en la celda A12 le doy enter sin introducir ningun dato, pasa a la
A13 en vez de ir a la E12 que es la que le sigue en el orden de tabulacion
:((

me podríais dar una mano con esto??

nuevamente muchas gracias a ambos :))

saludos,

dorian+







"Dorian" <flacopado(ESTONOVA)@yahoo.fr> escribió en el mensaje
news:
hola grupo !!

una vez mas acudo aquí en busca de ayuda :))

el problema sería el siguiente:

al abrirse el libro debe seleccionarse la celda T9, pero el usuario sólo
puede escribir datos en las siguientes celdas (la T9 (seleccionada al
comienzo), A12, E12, AB12, I13 y B14) como puedo hacer para que con cada
pulsación solo pueda moverse ("navegar") por éstas celdas y no pueda
seleccionar ninguna otra de la hoja de cálculo ?

alguien me pude dar una mano?

desde ya muchas gracias

saludos

dorian+




Respuesta Responder a este mensaje
#4 AnSanVal
26/02/2007 - 01:57 | Informe spam
Hola Dorian.

Perdóname, haciendo pruebas (y para poder moverme por la hoja) puse una
línea de más de modo provicional y por despiste la dejé y te envie el código
con ella. Lo que hace que el código no funcione como debe.
Borra la linea ...
Sheets(1).ScrollArea = ""
... (penúltima), que lo que hace es permitir moverte por toda la hoja, y
de esa forma no se moverá la selección al pulsar Intro en una celda vacia.

El código final debe quedar asi:

En el módulo ThisWorkbook:
Private Sub Workbook_Open()
Sheets("Hoja1").ScrollArea = "T9"
End Sub

En el módulo Hoja1:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "" Then Exit Sub
Select Case Target.Address
Case "$T$9"
Sheets("Hoja1").ScrollArea = "A12"
Case "$A$12"
Sheets("Hoja1").ScrollArea = "E12"
Case "$E$12"
Sheets("Hoja1").ScrollArea = "AB12"
Case "$AB$12"
Sheets("Hoja1").ScrollArea = "I13"
Case "$I$13"
Sheets("Hoja1").ScrollArea = "B14"
Case "$B$14"
Sheets("Hoja1").ScrollArea = "T9"
End Select
End Sub


Saludos desde Tenerife (España)
******************************

"Dorian" <flacopado(ESTONOVA)@yahoo.fr> escribió en el mensaje
news:%23Ui%
hola héctor, AnSanVal

muchas gracias a ambos por sus respuestas\

héctor: de hecho la planilla esta protegida y solamente estan
desprotegidas las celdas mencionadas que son las "habilitadas" para
introducir datos; lo cual no impide a los usuarios seleccionar otra celda,
no podrán editarla ni ver su contenido pero si seleccionarla, que es lo
que tampoco quiero :(((

AnSanVal: gracias por tu código\ funciona pero siempre y cuando introduzca
algun dato en la celda seleccionada\
es decir, cuando se abre el libro se selecciona la celda T9 y, como
quiero, no permite seleccionar ninguna otra con el mouse; si introduzco un
dato pasa a la celda A12, y si aqui introduzco un dato pasa a la E12 y así
sucesivamente, va pasando a la que le sigue\

pero si en la celda A12 le doy enter sin introducir ningun dato, pasa a la
A13 en vez de ir a la E12 que es la que le sigue en el orden de tabulacion
:((

me podríais dar una mano con esto??

nuevamente muchas gracias a ambos :))

saludos,

dorian+







"Dorian" <flacopado(ESTONOVA)@yahoo.fr> escribió en el mensaje
news:
hola grupo !!

una vez mas acudo aquí en busca de ayuda :))

el problema sería el siguiente:

al abrirse el libro debe seleccionarse la celda T9, pero el usuario sólo
puede escribir datos en las siguientes celdas (la T9 (seleccionada al
comienzo), A12, E12, AB12, I13 y B14) como puedo hacer para que con cada
pulsación solo pueda moverse ("navegar") por éstas celdas y no pueda
seleccionar ninguna otra de la hoja de cálculo ?

alguien me pude dar una mano?

desde ya muchas gracias

saludos

dorian+








Respuesta Responder a este mensaje
#5 Héctor Miguel
26/02/2007 - 02:12 | Informe spam
hola, Dorian !

... de hecho la planilla esta protegida y solamente estan desprotegidas las celdas mencionadas
que son las "habilitadas" para introducir datos; lo cual no impide a los usuarios seleccionar otra celda
no podran editarla ni ver su contenido pero si seleccionarla, que es lo que tampoco quiero :(((



si las celdas modificables ya estan desbloqueadas... prueba con las siguientes lineas en el evento '_open' del libro:

Private Sub Workbook_Open()
Worksheets("hoja1").EnableSelection = xlUnlockedCells
End Sub

saludos,
hector.
Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida