Isaac Reyes

H0la Felipe: Si dejas tu condición así, debiera funcionar If (tipo = "COMBOBOX" Or tipo = "TEXTBOX") And Control.Visible Then 'Instrucciones' End If S@lu2

H0la Norma: Sería interesante ver tu tabla de usuarios, ya que esta línea extra el rango A4:D4 Set rango = Worksheets("USUARIO").Range(Cells(4, 1), Cells(4, 4)) Entonces la siguiente, si bien debiera funcionar, no se justifica para una sola fila...

H0la Gonzalo: Hasta donde sé, dentro de un evento VBA trabaja de forma secuencial, por lo que ejecuta una instrucción tras otra. ¿Has probado lo siguiente? Sub Refresh() Workbooks.Open Filename:="C:\Users\Gonzalo.SalleMato\OneDrive - Zurich...

H0la Ignacio: Cuando borras el contenido del cuadro de texto el valor del ListIndex es -1 por lo tanto, si caes en este cas, estarías tratando de seleccionar la celda Cells(0,1), lo más probable es que eso sea el error. Revísalo y si no val por ahí,...

H0la Juan: Para comenzar, dices que si encuentras un sábado le sumas 1 y 2 si es domingo, pero, si no estoy entendiendo mal tu código, lo estás haciendo al revez, 2 para el sabado y 1 para el domingo. Lo otro: Si dices Now + sabado + domingo, y...

Si es así, te sugiero que dividas el problema y una vez que comiences a implementar la solución, vayas preguntando cada parte. Lo que veo es que el problema se puede dividir de la forma siguiente: Ingreso de nuevos equiposCrear una tabla con la...

Responderé sólo para uno de los casos y lo puedes extrapolar al resto. Songamos que queremos aplicarlo a la línea Rows("15:164"). Hidden Y supngamos que en C1=15 y D1=164, entonces una de las formas de hacerlo es ecribir tu código de la siguiente...

H0la Para ocultar, puedes ocupar lo siguiente Sub OcultarCero() Dim strCol As String Dim h As Worksheet 'Asignar hoja Set h = Sheets("Hoja1") For i = 2 To 8 'Verificar si el valor de la fila 22 en la columna i es cero If h.Cells(22, i).Value = 0 Then...

¿Estamos hablando de un control de formulario Excel o un control ActiveX?

Para abrir una carpeta es bastante sencillo utilizando una API Lo primero que debes hacer es declarar la función ShellExecute Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As...