Dante Amor

Te anexo la macro Sub Generador() 'Por.Dante Amor Set h1 = Sheets("Generador") Set h2 = Sheets("Almacenadas inventario") dato = h1.Range("A16") If dato = "" Then MsgBox "Falta capturar el valor en A16" Exit Sub End If ' Set b =...

No entendí que son "notas desaprobadas". Según tu ejemplo, si en alguna de las celdas de cada fila tiene un número menor o igual a 10 entonces esa fila no se elimina, de lo contrario, es decir, si todos los números son mayores a 10, entonces esa fila...

Directamente en listbox no es posible Pero podrías hacer lo siguiente: Private Sub CommandButton1_Click() 'Actualiza un dato en el listbox If ListBox1.ListIndex = -1 Then MsgBox "Selecciona un registro del list" Exit Sub End If 'Pasa el dato del...

Pon la siguiente macro en los eventos de tu hoja Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Not Intersect(Target, Columns("A")) Is Nothing Then If Target.Count > 1 Then Exit Sub If Target.Value = "" Then Exit Sub existe =...

Puedes poner una rutina que vaya ordenando conforme vas agregando registros en el listbox: Sub filtro1() Sheets("fiven").Select 'hm.Cells.Clear Range("A1:A1000").Select Selection.EntireRow.Delete Dim fec1 As Date, fec2 As Date...

Pon lo siguiente en un botón Sheets("hoja1"). Range("d5"). Value = Label1.caption Cambia "hoja1" por el nombre de tu hoja y "d5" por la celda donde quieres poner el dato. También cambia Label1 por el nombre de Label. R ecuerda valorar la repuesta.

Copias la información de B1:B8 hasta n1:n8 (la n es la última columna con datos) Hay algunos datos que faltan por definir: - Cómo se llama la hoja origen, según la macro se llama "brecha" - Cómo se llama la hoja destino, según la macro se llama...

Te anexo los eventos para tu userform 'Por. Dante Amor Private Sub TextBox1_Enter() TextBox1.ForeColor = &H0& If TextBox1.Value = "Usuario" Then TextBox1.Value = "" End If End Sub ' Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If...

Haber si entendí. En el libro-origen tienes varios nombres. En cada nombre tienes un dato. Ejemplo: Libro: origen Nombre Dato "RutTitular" 30.686.957-X "NombreTitular" Manuel Zamora Lo que quieres es tomar cada dato de esos nombres y llevarlo al...

Envíame un correo nuevo con ejemplos Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Aleida Cervino”