jerryeagle

Creo que quieres recorrer columnas en el ciclo for. Puedes referirte a las columnas así: Cells(No.deFila, No.deColumna) Poniendo el Numero de fila y columna correspondientes. Cuando escribes algo entre comillas, se toma como simple texto, no como...

Para que funciones, debes tener una hoja llamada "Usuarios", un userform1, dos textbox llamados user y pass dos botones, Ok y Cierra y pegar este código en userform: 'En el evento Workbook_open de Thisworkbook debes poner este codigo userform1.show...

Si me gustaría que me mandaras tu archivo y vemos como se puede hacer [email protected]

Es fácil Sub CommandButton1_Click() CommandButton2.Enabled = False 'O puedes poner Locked en lugar de Enabled con True End Sub

No soy tavopaz pero se la respuesta, siempre me había pasado lo mismo que a ti con los textbox, muchos decían que la solución es convertir el texto del textbox (valga la redundancia) a valor numero usando Textbox = Val(txtbox) pero aun así no...

Hay una forma más sencilla de llenar los datos de un UserForm, es dándole a la propiedad list del combobox el valor de un rango de datos y si quieres dos columnas, solo pon el rango de dos Columnas, checa: Private Sub UserForm_Initialize() Combo.List...

Tienes que poner un signo de moneda "$" (Sin Comillas) en cada referencia a alguna celda o rango, ejemplo: =SUMAPRODUCTO((G17:G202=R17) debes ponerla asi =SUMAPRODUCTO(($G$17:$G$202=$R$17) O ya que pusiste la fórmula presiona F2 (modificar) y ve...

No dices si tienes algún conocimiento acerca de Macros, asumiré que si: En un userform con un ComboBox1, un CommandButton1 (Filtrar) y un CommandButton2 (Cerrar) pega este Código: Private Sub CommandButton1_Click() Application.ScreenUpdating = False...

Es sencillo Sheets("Nombre de hoja2").Cells(65536, 1).end(xlup).offset(1, 0).Select 'O elegir primero la Hoja Sheets("Hoja 2").Select 'Y despues la Ultima Fila Vacia Cells(65536, 1).Offset)1, 0).Select No soy tan experto, pero he aprendido mucho aquí...

Checa este código haber si es lo que quieres hacer Private Sub CheckBox1_Click() 'Revisa si está activado el cuadro If CheckBox1 = True Then 'Agrega una columna entre las columnas 8 y 9 Cells(1, 1000).End(xlToLeft).Offset(0, -2).EntireColumn.Insert...