jerryeagle

jerryeagle

 108K puntos  Jalisco, México @jerryeagle desde - visto

Respuestas en Microsoft Excel

Respuesta en a

[Macro] Remplazar celdas que empiecen por 6000

Pues parece que: O no haz avanzado mucho en "conocimientos" o te da flojera porque en muchas de tus consultas pones esto: Tengo la selección de la columna Private Sub Digitos() Cells.Find(What:="digitos", After:=ActiveCell, LookIn:=xlFormulas, LookAt...
Respuesta en a

[Macro] Normalizar celda fecha

"por ahora solo tengo la selección de la columna" ¿A qué t refieres con eso?
Respuesta en a

¿Auto completar en un userform?

Más que Autocompletar yo te sugeriría usar un ComboBox, si quieres escribir algo que esta en una lista, esto seria mejor. Carga el comboBox al iniciar el UserForm, algo si: UserForm1_Initialize() Dim Lista As Range Set Lista = Range("A2", Range("A" &...
Respuesta en a

Formato de miles y decimales en un textbox

Private Sub TextBox7_Change() TextBox7.Value = FormatNumber(TextBox7.Value, 2) '2 es el Numero de Decimales End Sub Al usar este formato, la macro utilizara el símbolo que tengas por defecto para separador de miles y de decimales Aunque yo validaría...
Respuesta en a

Existen eventos de celdas

WorkSheet_SelectionChange Se "dispara" al seleccionar tal celda, Fila, Columna, o Celda de Conjunto de Celdas (Rango) El parámetro que lo dispara es Target de tipo Range Ejm: If Target.Address=Range(A4").Address Then 'Ejecutar algo o If...
Respuesta en a

Enviar desde evento change la dirección de Target

Ponle un Parámetro tipo Range a tu Sub, desde el evento Change Llama a tu sub, algo así: TuSub(Target)
Respuesta en a

Crear una macro de busqueda para todo un libro

¿Y cuál es el codigo q usas?

Cambiar color de textbox a medida que se avanza

Crea una variable para guardar el color anterior, En el evento Enter del TextBox guarda primero el color anterior y después cambialo por el nuevo, es la propiedad BackColor, y en el evento LostFocus o AfterUpdate no recuerdo como es, cambia de nuevo...
Respuesta en a

Utilizar valor de una variable para crear un rango

ActiveWorkbook.Names.Add Name:="tabla1", RefersTo:="=hoja1!$a$1:" & celda

Imprimir a pdf

application.Dialogs(xlDialogPrint).Show

Suscríbete RSS