Carlos Arrocha

Lo normal es que si eliminas la hoja del libro se elimine también de vba y no aparezca, pero si en tu caso no es así, prueba cerrando el libro y lo vuelves a abrir.

Si solo quieres que te sitúe en la última celda te podría servir algo así. Private Sub CommandButton1_Click() Set h1 = Sheets("Hoja1") h1.Range("A" & Rows.Count).End(3).Select End Sub

En la estatura no sólo interviene el ADN que se hereda de los progenitores, también influyen otros factores, como la la ingesta de alimentos, deporte y descanso, por lo tanto, si tenemos en cuenta la edad y llevas una vida sana y saludable, es...

Te dejo otro ejemplo. Como ves, registras los diferentes valores en una columna, en el ejemplo columna A, en la columna C pones la fórmula que marca la flecha y arrastras hasta donde tengas la última moneda, solo queda poner la cantidad en la columna...

Si entendí bien, quieres que el dato de una celda cambie, cuando seleccionas otra. Si es así prueba lo siguiente. Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Target, Range("A2:A15")) Is Nothing Then Range("B2") =...

[Hola Juan. No sé como tienes estructurado tu código, pero una opción puede ser con una condición if, por ejemplo: Sub Ejemplo() Set h1 = Sheets("Nombre de la hoja") If h1.[A1] = "Black" Then 'Nada Else Call ganador Call empate End If End Sub

[Hola. Te dejo la macro para poner en un botón. Ingresa el dato a buscar en el textbox1, en el textbo2 te mostrará el resultado de la col. B. [Saludos, Carlos Arrocha. Private Sub CommandButton1_Click() Set h1 = Sheets("Hoja1") If TextBox1 = "" Then...

[Hola. Una opción es que lo concatenes. Por ejemplo, si tienes 6 etiquetas con resultados, puedes añadir otra para que aglutine todo. Private Sub CommandButton1_Click() Label7.Caption = Label1 & Label2 & Label3 & _ Label4 & Label5 & Label6 End Sub Y...

[Hola Javier. Te pongo un ejemplo para un botón, pero también lo puedes poner dentro del evento change del combobox. Private Sub CommandButton1_Click() If ComboBox1 = "" Then Exit Sub Set h = Sheets("Hoja1") Set b = h.Range("A:A").Find(ComboBox1,...

[Hola. Te dejo un par de ejemplos. El primer ejemplo te muestra un mensaje msgbox indicando las hojas que están ocultas, cada vez que abres el libro (Pon el código dentro de ThisWorkbook), pero también lo puedes poner en un módulo y ejecutarlo cuando...