Respuesta
en
Microsoft Excel
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
Microsoft Excel
a
[Macro] Normalizar celda fecha
"por ahora solo tengo la selección de la columna" ¿A qué t refieres con eso?
Respuesta
en
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
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
Microsoft Excel
a
Crear una macro de busqueda para todo un libro
¿Y cuál es el codigo q usas?
Respuesta
en
Microsoft Excel
a
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
Microsoft Excel
a
Utilizar valor de una variable para crear un rango
ActiveWorkbook.Names.Add Name:="tabla1", RefersTo:="=hoja1!$a$1:" & celda