Jump to content

Sebastian Celeita Caicedo

Members
  • Content Count

    9
  • Joined

  • Last visited

About Sebastian Celeita Caicedo

  • Rank
    Newbie

Converted

  • Campos
    ,

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Gracias @Haplox, lo que hice fue pasar la información a una celda del libro y una vez en la celda busque el valor de X y le cambie el formato así. Dim Celda As Range Dim palabra As String Dim posicion As Integer palabra = InputBox("Palabra a buscar") For Each Celda In Selection posicion = InStr(1, Celda.Value, palabra) Do Until posicion = 0 Celda.Characters(posicion, Len(palabra)).Font.Bold = True posicion = posicion + 1 posicion = InStr(posicion, Celda.Value, palabra) Loop Next Celda Por si a alguien le interesa . Igualmente gracias por la info.
  2. Buenos días, espero que como siempre me puedan ayudar. Tengo un Textbox que quisiera que mostrara en Negrilla parte del texto. Para hacerme entender les dejo un ejemplo de cómo quisiera que trabajara en código: Dim X As String Dim Y As Boolean X = "" If Y = True Then X = "Carlos Flores" ElseIf Y = False Then X = "Sebastian Celeita" End If Me.TextBox.Value = "mi nombre es: " & X mi inquietud es: ¿Puedo hacer que X se muestre dentro del TextBox en Negrilla, o darle cualquier tipo de formato (Subrayado, cambio de tamaño, color, etc)? Espero sea clara la explicación, cualquier duda o inquietud que necesiten aclarar, por favor no duden en preguntarme. Gracias de antemano.
  3. Buenos días, espero que como siempre me puedan ayudar. Tengo una información que quisiera pasar a un archivo de world. Para esto, estoy utilizando un código que no es mio y utiliza una plantilla de word para buscar objetos y cambiarlos por la información que yo le especifico. Pero quisiera que también me exporte un cuadro que tiene un nombre definido de "cuadro" y no he podido. Alguien que me pueda decir como hago para exportar TODO el cuadro al archivo word. Adjunto un archivo para que sea mas claro la explicación. Gracias de antemano. Pasar a Word.zip
  4. Muchas Gracias, hice el cambio a un Label y se arreglo el problema, muchas gracias.
  5. Adjunto un archivo de ejemplo, el Frame del que hablo es "Info Cliente". Espero que con el archivo sea mas claro. Prueba1.xlsm
  6. Buenos días, Tengo un inconveniente, tengo una información dentro de un TexBox que a su vez esta dentro de un Frame, y estoy usando la función Exit para que se valide la información que esta escribiendo el usuario después de que salga del TexBox, pero me doy cuenta que no esta funcionando si el usuario da Click sobre cualquier otro lugar fuera del Frame, es decir que si el usuario da Click sobre otro TexBox que no este dentro del mismo Frame, la instrucción de validar la información no funciona. Este es el código que estoy usando sobre el TexBox que quiero que sea validado: Private Sub TB_Ciudad_Exit(ByVal Cancel As MSForms.ReturnBoolean) Dim ListaClientes As Range Dim Cursor As Integer Set ListaClientes = Names("Clientes").RefersToRange For Cursor = 1 To ListaClientes.Rows.Count If Me.CB_Cliente.Value = ListaClientes(Cursor, 8) Then If TB_Ciudad <> ListaClientes(Cursor, 12) Then Mensaje = MsgBox("La Ciudad no conicide con el registrado, ¿Desea Gurdar los cambios?", vbExclamation + vbYesNo) Select Case Mensaje Case vbYes: ListaClientes(Cursor, 12) = Me.TB_Ciudad.Value Case vbNo: Exit For End Select End If End If Next Espero sea claro, y gracias de antemano
  7. Buenos días, es posible borrar toda la información de los Textbox y ComboBox dentro de un Frame, sin necesidad de escribir .clear para cada objeto?? Textbox1.clear Textbox2.clear Textbox3.clear Textbox4.clear Textbox5.clear Textbox6.clear ETC Gracias de antemano.
  8. Saludos desde Colombia, Espero que pueda aportar aunque sea un poquito a este crecimiento de conocimiento que tenemos todos. Pero sé que más va a ser la ayuda que ustedes me pueden brindar, ya que aprendí macros de forma empírica, pero me di cuenta de la magnitud de potencial que tiene esta herramienta y lo importante que puede ser para optimizar los procesos que es a lo que yo me dedico. Cordialmente, Sebastian
  9. Buenas señores/ras, Tengo un inconveniente, tengo un formulario con un listbox de 4 columnas inicialmente y cada columna con un ancho especifico .ColumnWidths = "30 pt;360 pt;30 pt;135 pt;135 pt". Pero, luego de hacer click en un botón quiero que aumente el número de columnas (.ColumnCount = Columnas +1, dado que Columnas = es número de Columnas del ListBox antes del "click"), pero además, que modifique el ancho de todas las columnas del ListBox, y genere el ancho de la nueva columna (yo lo especifico). Tener en cuente que por cada click del botón, se genera una nueva columna y modifica todo los anchos, es decir, el primer click pasa de 4 columnas a 5 columnas y el ancho de la columna 4 y 5 sea el 25% de la columna 4 antes del click, siguiente click, de 5 columnas a 6 columnas y el ancho de la columna 5 y 6 sea el 25% de la columna 5 antes del click, siguiente click, de 6 columnas a 7 columnas y el ancho de la columna 6 y 7 sea el 25% de la columna 6 antes del click, etc. ¿como puedo hacer que se modifique el ancho de las columnas por cada click? Espero sea clara la explicación. Gracias de antemano.
×
×
  • Create New...

Important Information

Privacy Policy