Pregunta:
Contar filas con datos
Prueba poniendo esto: cant_fila = Range("A1").End(xlDown).Row If cant_fila = 65536 Then If Cells(2, "A") = "" Then cant_fila = 1 End If If Cells(1, "A") = "" Then cant_fila = 0 End If End If
Pregunta:
¿ActiveWindow.SelectedSheets.PrintPreview?
Agradezco tu respuesta, pero el problema no está en la parte del "On Error GoTo fin", el error está en la previsualización de la hoja filtrada ya que queda colgado al ejecutarse... Pero ya se soluciono con la instrucción: Aplication.Run...
Pregunta:
Macro habilitar o quitar barras de herramientas en exc
Excelente gracias me funciono muy bien
Pregunta:
Macro busqueda y seleccion multiple
Bien, Ponle un botón a ese form y aquí tienes el código: Private Sub CommandButton1_Click() Dim x As Integer x = 1 Do Until Hoja2.Cells(x, "A") = "" If (Chr(34) & Hoja2.Cells(x, "A") & Chr(34) = Chr(34) & TextBox1.Value & Chr(34)) And (Chr(34) &...
Pregunta:
Ayuda con Fucion if, else,end if me da error
Para verificar los Ifs, es mejor tabular. Esto es lo que tienes tu: If TextBox2 <> TextBox1 Then MsgBox "Las contraseñas no coinciden" TextBox1 = Empty TextBox2 = Empty TextBox1.SetFocus Else If TextBox1 = Empty And TextBox2 = Empty Then MsgBox...
Pregunta:
Proteger una hoja con el valor de una celda
Esta macro se autoejecuta al abrir y busca el código en la celda A1, si no coincide con lo que hay en la celda, se cierra. Modifícalo a tu gusto. Sub auto_open() Dim a As String a = Application.InputBox("Pon la contraseña") If a <> Cells(1, "A") Then...
Pregunta:
¿Si anidado?
Sustituye CELDA por el nombre de la celda correcto = SI ( CELDA >=0;A2*A5;((-1*A2)*A5))
Pregunta:
Cómo usar la función "autorrellenar" en Excel
Muchísimas gracias por la rapidez y eficacia! Ha funcionado a las mil maravillas! Un saludo.