Saltar al contenido

Gerson Pineda

Administradores

  • Unido

  • Última visita

Ver perfil Ver su actividad

Mensajes publicados por Gerson Pineda

    publicado

    Hola Pedro, gracias por entenderlo jeje, en definitiva el codigo es completamente mejorable, siguiendo con tu idea, se puede crear un Combobox o Lista Desplegable, para escoger tal prefijo que deseamos utilizar en ese momento, es decir no ingresar a la macro a cambiarlo si no desde una hoja y que la macro busque el dato en la hoja o lo tome del combobox

    Saludos

    0

    publicado

    Hola Rafael, gracias por tus palabras (pero yo tambien sigo aprendiendo:))

    Hola verzulsan si te fijas en la macro, el dato debe ser numerico y diferente de vacio, siendo asi, si escribes 1 te escribira al inicio "AyudaExcel 1" como repito espero sea util y si no pues hice el intento jeje

    Saludos amigos!

    0

    publicado

    Hola

    Si! podra ser algo contradictorio el titulo del tema, pero es algo asi:)

    Suponiendo que somos digitadores de algun inventario y que ciertos codigos/numeros (de materia prima o prendas terminadas o lo que sea...), comienzan con el mismo caracter o caracteres, pues bien elabore (se me ocurrio) esta pequeña macro de evento para que puedan probarla y pues hacer cambios a conveniencia y uso

    Se puede usar en todo el libro o una hoja en especifico

    Para todo un libro

    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    On Error Resume Next
    'If Target.Column = 3 Then
        If Not Intersect(Target, Range("A3:A12")) Is Nothing Then
            If VBA.IsNumeric(Target) And Target <> "" Then
                Target = "AyudaExcel" & Target
            End If
        End If
    'End If
    End Sub[/PHP]

    Para una hoja en especifico

    [PHP]Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    'If Target.Column = 7 Then
    If Not Intersect(Target, Range("G3:G12")) Is Nothing Then
    If VBA.IsNumeric(Target) And Target <> "" Then
    Target = "AyudaExcel" & Target
    End If
    End If
    'End If
    End Sub[/PHP]

    No he visto algo similar aqui en el foro, espero entiendan el objetivo, que les guste y sirva de algo

    Saludos desde Honduras

    Macro de evento.zip

    0

    publicado

    Saludos master Never... en verdad me agrada lo que mencionas, no porque estes un poco de mi lado, pero es que debemos ponernos siempre del lado de los que menos saben de este hermoso mundo llamado Excel, pero porfavor que no intenten (Microsoft) engañarnos con explicaciones ortodoxas, que lo unico que segun ellos, es de dar una mejor comprension, cuando no es asi, el usuario comun, jamas entendera ni se imaginara que EXTRAER se asemeja ahora MED

    Pedro muchisimas gracias por tus aclaraciones sobre esta funcion, aunque nos hallamos salido un poco del tema principal

    Saludos

    0

    publicado

    Pedro disculpame, no habia entendido tu intencion del asunto!

    Y a lo referente sobre los renombres a algunas funciones, estoy totalmente en desacuerdo con estos cambios, es realmente incomprensible y no entiendo porque se tomo esa decision, como puedes cambiar algo tan utilizado y logico, es mas facil entender a que se refiere con EXTRAER que con MED??? no se si soy el indicado en criticar esto, pero la verdad por esas razones ni me asomo con esa version (que podra traer mas novedades/mejoras/funcionalidades pero no creo aceptar algunos cambios)

    Saludos y un abrazo Pedro

    0

    publicado

    Pedro

    Supongo que apartir de 2010 se utiliza MED? y pues para los que aun no disponemos de esa version, podemos utilizar algo como esto:

    Sub separador()
    MsgBox "Separador de decimal del sistema:  " & Application.International(xlDecimalSeparator) _
    & Chr(10) & Chr(10) & "Separador de miles del sistema:  " & Application.International(xlThousandsSeparator)
    End Sub[/PHP]

    Saludos

    0

    publicado

    Hola jackpvs

    Como dice German, estamos aqui para ayudarnos (maxime cuando seguimos las reglas del foro), llevo un buen tiempo aqui y juntos hemos resuelto casos dificiles, en los cuales no habia esperanza para ciertos usuarios, y que para mi agrado he participado en muchos de ellos, y claro seguimos aprendiendo cada dia mas

    Agradecemos tus palabras (escritos) en reconocer la ayuda que te brindamos aqui

    Saludos

    0

    publicado

    Hola

    Bienvenido al foro

    Y pues tu parece que sigues mi linea, tambien trato de innovar y mejorar todo a base de Excel, en mi trabajo y en donde se pueda hacer algo con Excel

    Eso si porfavor lee las normas completamente para no tener inconveniente, aqui en el mejor foro de AyudaExcel en español

    Si vas a consultar mucho sobre VBA trata de empaparte poco a poco de lo mas basico, es una recomendacion de mi parte

    Saludos desde Honduras

    0