Respuesta
en
Microsoft Excel
a
Formato fecha no reconocible
¿Estas 100% seguro que tu sistema debería reconocer los puntos como separadores de fecha? Abraham
Respuesta
en
Microsoft Excel
a
Cargar un calendar desde un command button.
Pues, si tu "Control calendar" esta dentro de un userform, lo que debes hacer es activar dicho userform: Private Sub CommandButton1_Click() Load Userform1 Userform1.Show End Sub OJO, si tu "Control Calendar" esta en la hoja, solo puedes usarlo desde...
Respuesta
en
Microsoft Excel
a
Poner un comentario en varias celdas
En "Validación de datos", simplemente usa los "Mensajes entrantes" Abraham
Respuesta
en
Microsoft Excel
y en 1 temas más
a
VBA. FÓRMULA no recalcula si no paso por la celda
Para insertar fórmulas usando "Formula", debes usar el idioma "universal" para el VBA, es decir, el ingles: Cells(31, 2).Formula = "=Mode('LOG-EX'!$W:$W)" Con eso, tu macro insertara la fórmula convieritiendo la función al idioma de tu configuraicon...
Respuesta
en
Microsoft Excel
a
Macro para cerrar por COMPLETO excel
Para cerrar todo el Excel prueba: Application. Quit Abraham
Respuesta
en
Microsoft Excel
a
Encabezado en listbox
Si para llenar tu ListBox usas ListFillRange, solo coloca la propiedad ColumnHead en True y tomara la primera fila como encabezados Abraham
Respuesta
en
Microsoft Excel
a
En excel como puedo nombrar una hoja con un valor
Pues sin VBA (VB es otra cosa) lamentablemente no podrás :( Es el único modo
Respuesta
en
Microsoft Excel
a
Modificar celda
Suponiendo que los cambios serian en la columna A, usando el evento Change, coloca esto en el modulo de la hoja: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [A:A]) Is Nothing Then Target.Offset(0, 1) = "has modificado...
Respuesta
en
Microsoft Excel
a
Insertar fecha y hora
Suponiendo que los ingresos son en la columna A, entonces, en el modulo de la hoja, usando el evento Change se logra: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [A:A]) Is Nothing Then Target.Offset(0, 1) = Now End If...