Page 1 of 3 123 LastLast
Results 1 to 10 of 22

Celda para un solo carácter con pase a siguiente sin esperas

This is a discussion on Celda para un solo carácter con pase a siguiente sin esperas within the Questions in Other Languages forums, part of the Question Forums category; Celda para un solo carácter con pase a siguiente sin esperas. ¿ Cómo se configura una celda excel para que ...

  1. #1
    New Member
    Join Date
    Jun 2009
    Posts
    31

    Default Celda para un solo carácter con pase a siguiente sin esperas

    Celda para un solo carácter con pase a siguiente sin esperas.

    ¿ Cómo se configura una celda excel para que sólo sea posible meter un carácter y que tras introducirlo salte el cursor a la celda siguiente inferior ?

    Por ejemplo el dígito 1 hace que se escriba el uno y luego el cursor pase a la celda inferior. Y si le damos a enter que pase a la celda siguiente sin escribir nada en la celda actual.

  2. #2
    Board Regular
    Join Date
    May 2009
    Location
    Colombia
    Posts
    180

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    Hola esgrimidor,

    en validación de datos tienes la opción "Longitud de texto", ahí puedes controlar para que en la celda sólo se pueda introducir un caracter.

    De manera predefinida (a menos que hayas modificado ese comportamiento) al presionar Intro tras ingresar el valor o texto en la celda, saltará a la celda siguiente celda inferior.

  3. #3
    MrExcel MVP
    Join Date
    Feb 2002
    Location
    Bogota, Colombia
    Posts
    11,950

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    Sin embargo, no hay forma de que Excel pase a la siguiente celda con solo presionar 1, ya que no se puede correr macros mientras Excel esté en modo edición.
    Regards,

    Juan Pablo González
    http://www.juanpg.com

  4. #4
    New Member
    Join Date
    Jun 2009
    Posts
    31

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    Gracias a los dos.

    hay algún truquito que permita saltar esta limitación.

    O sea. Lo que yo trato está claro.

    Es una lista con unos doscientos y pico items o líneas a comprobar. En la mayoría de los casos es una comprobación a toro pasado. Es decir al final del trabajo, pero también cabe la posibilidad de dos o tres revisiones. O sea que es posible que hayan distintos valores en las celdas y lo que me interesa es proponer el nuevo valor con un solo golpe de tecla o una maniobra rápida.

    Hay forma o alternativa ?

    Por lo mismo también me gustaría si hay forma de proponer que todo se ponga con un valor determinado.

    Por ejemplo que en el rango D4:D263 se ponga todo con el mismo valor. Por ejemplo un 1 o el símbolo ese de check o comprobación que no se cómo se hace.....

    Gracias de nuevo

  5. #5
    New Member
    Join Date
    Jun 2009
    Posts
    31

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    Quote Originally Posted by Juan Pablo González View Post
    Sin embargo, no hay forma de que Excel pase a la siguiente celda con solo presionar 1, ya que no se puede correr macros mientras Excel esté en modo edición.
    Se podría lograr con la tecla Enter ?

    Con la tecla enter propiciar el cambio (o marcado o no marcado ) y que pasara a la celda inferior.

    Con la tecla hacia abajo que pasara de una celda a otra sin cambio.

    Y que el signo prefijado fuera cualquiera, un check por ejemplo, que creo se puede hacer con un tipo de letra y la "a" de ese tipo de letra.

    Gracias otra vez

  6. #6
    MrExcel MVP
    Join Date
    Feb 2002
    Location
    Bogota, Colombia
    Posts
    11,950

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    Intente con esto. Hay que correr el macro "SetKeys" para que las teclas "Enter" cambien de funcionalidad. El macro "UnsetKeys" las hace funcionar normalmente.

    Hay que cambiar el tipo de letra de la columna que tendrá los checks a "Windings", y cambiar la constante "CHECKMARK_COLUMN" al número correcto. Asumí la columna D:D, que es la columna número 4.

    Code:
    Option Explicit
    
    Sub SetKeys()
        Application.OnKey "{Enter}", "RunIt"
        Application.OnKey "~", "RunIt"
    End Sub
    
    Sub UnsetKeys()
        Application.OnKey "{Enter}"
        Application.OnKey "~"
    End Sub
    
    Sub RunIt()
        Dim rng As Range
        
        Const CHECKMARK_COLUMN As Long = 4  'D:D
        Const CHECK_STRING As String = "ü"  'Windings font
        
        If TypeName(Selection) = "Range" Then
            Set rng = Selection
        Else
            Exit Sub
        End If
        
        If rng.Column <> CHECKMARK_COLUMN Then
            Select Case Application.MoveAfterReturnDirection
            Case XlDirection.xlDown
                rng.Offset(1).Select
            Case XlDirection.xlToRight
                rng.Offset(, 1).Select
            Case XlDirection.xlUp
                rng.Offset(-1).Select
            Case XlDirection.xlToLeft
                rng.Offset(, -1).Select
            End Select
            Exit Sub
        End If
        
        If rng.Value = CHECK_STRING Then
            rng.Value = ""
        Else
            rng.Value = CHECK_STRING
        End If
        
        rng.Worksheet.Cells(rng.Row + 1, 1).Select
        
    End Sub
    Regards,

    Juan Pablo González
    http://www.juanpg.com

  7. #7
    New Member
    Join Date
    Jun 2009
    Posts
    31

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    Juan Pablo voy a probar la macro y comento.
    Un abrazo
    Y muchas gracias salga lo que salga.

  8. #8
    New Member
    Join Date
    Jun 2009
    Posts
    31

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    No veo interacción.
    Lo que he intentado es :

    Abro mi libro en cuestión.
    Voy a la hoja donde quiero proponer la lista de comprobación

    sobre la pestaña de la misma botón derecho ratón e introduzco el código aportado. Pero no noto cambio.

    Qué procedimiento tengo que seguir.

    Propuse en vez de la columna D:D , la columna F:F

  9. #9
    MrExcel MVP
    Join Date
    Feb 2002
    Location
    Bogota, Colombia
    Posts
    11,950

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    El código hay que copiarlo en un módulo normal... Alt F11 - Insertar - Modulo, y pegarlo ahí.

    Luego hay que ejecutar el macro "SetKeys" y ya, ahí si debe funcionar al hacer Enter sobre la columna D (o la F si se modifica el código).
    Regards,

    Juan Pablo González
    http://www.juanpg.com

  10. #10
    New Member
    Join Date
    Jun 2009
    Posts
    31

    Default Re: Celda para un solo carácter con pase a siguiente sin esperas

    Lo pruebo inmediatamente y comento.

Page 1 of 3 123 LastLast

Like this thread? Share it with others

Like this thread? Share it with others

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  


DMCA.com