El Pipe

Donny Morera respondió: Así se aplica el formato a los TextBox requeridos: TextBox1.Text = Format$(TextBox1.Text, "###,###,##0.00")

Abraham Valencia respondió: [Hola Suponiendo que el Checkbox de la hoja es un objeto ActiveX, entonces basta colocar esto en el módulo del Userform: Private Sub UserForm_Initialize() If Worksheets("Hoja1").CheckBox1.Value = True Then UserForm1.CheckBox1 = True End If End Sub En...

Alejandro Salazar respondió: Fíjate que |√(x) e^sin(π/x)| es siempre menor o igual que |√(x)e|, porque seno siempre se encuentra entre -1 y 1. Y el límite de √x e cuando x tiende a cero es cero

Dante Amor respondió: Podemos enviar un enter en el código para cerrar la ventana, prueba con lo siguiente: Sub Cerrar_Outlook() Application.DisplayAlerts = False Dim OL As Object ' On Error Resume Next Set OL = GetObject(, "Outlook.Application") On Error GoTo 0 If OL Is...

Anónimo respondió: El Pipe... prueba cambiando la extensión de tu archivo de *. Csv (que es el que tengas, probablemente) a *.xls (el tradicional) Saludos!, estamos en contacto

LEANDRO ESCANTA respondió:

Dante Amor respondió: Te anexo la macro actualizada Function ValidarAutofiltro_Tabla(Hoja As String, Tabla As String) On Error Resume Next Sheets(Hoja).Select 'Si ninguna columna de la tabla tiene filtro, se lo pone. If Sheets(Hoja).AutoFilter.Filters.Count = 0 Then...