Dante Amor

Dante Amor

https://www.youtube.com/@CursosDeExcelyMacros
 5.752K puntos  Ciudad de México, México @aprendemos desde - visto
Preguntar

Respuestas en Visual Basic

Respuesta en y en 1 temas más a

Macro pegar valores de un ciclo sin modificar formato

La macro no copia celdas, solamente pone el valor, antes quitaba el formato porque limpiaba las celdas, pero ya comenté la instrucción que limpiaba las celdas. Revisa y me comentas. Todavía no me dices cómo llenar la columna A de la hoja1, es decir,...
Respuesta en y en 1 temas más a

Macro ordenar, falla cuando se queda una fila en blanco

Te anexo la macro actualizada Sub ordenar() 'Act.Por.Dante Amor ' Set h1 = Sheets("ALBARAN") u = h1.UsedRange.Rows(h1.UsedRange.Rows.Count).Row f_enc = 22 With h1.Sort .SortFields.Clear: .SortFields.Add Key:=h1.Range("B" & f_enc + 1 & ":B" & u)...
Respuesta en y en 4 temas más a

Mostrar en textbox registro con la fecha más reciente

Pon el siguiente código en tu botón de buscar. En el textbox1 pon el número de cliente En textbox2 quedará el nombre En textbox3 quedará la fecha En textbox4 quedará el importe Private Sub CommandButton1_Click() 'Buscar 'Por.Dante Amor ' If TextBox1...
Respuesta en y en 1 temas más a

Cómo bloquear y proteger celdas sin que desactive las macros

Realiza lo siguiente: Desprotege la hoja.Selecciona tu botón con el botón derecho del mouseEntra a las propiedadesEn la pestaña propiedades, desmarca la casilla "Bloqueado" Otra opción: Cuando protejas la hoja marca las casillas Modificar objetos y...
Respuesta en y en 1 temas más a

Macro pegar rango de valores para un ciclo

Te anexo la macro Sub Copiar_Valores() 'Por.Dante Amor ' Set h1 = Sheets("Hoja1") 'destino Set h2 = Sheets("Hoja2") 'datos ' h1.Cells.Clear ' j = 1 For i = 2 To h2.Range("A" & Rows.Count).End(xlUp).Row h1.Range("A" & j & ":D" & j) =...
Respuesta en y en 2 temas más a

Cortar Filas con valores duplicados en Columnas y pegar en Nueva Hoja, dejar solo los valores Únicos.

Te anexo la macro, realiza los siguientes cambios en la macro. Cambia "Hoja4" por el nombre de tu hoja con datos Cambia "Hoja5" par el nombre de tu hoja con resultados Si quieres los registros únicos en la "Hoja5" deja el "1" en esta línea...
Respuesta en y en 2 temas más a

Limpiar o copiar y pegar contenido de celdas según condición

H o l a: Quieres que la macro se ejecute en automático o quieres capturar el ingreso o egreso y entonces presionar un botón para ejecutar la macro. Si la quieres en automático, deberás capturar todos los datos y hasta que captures el último dato...
Respuesta en y en 4 temas más a

Quiero saber si se puede que cada cierta hora un textbox o ComboBox se ilumine o cambie de color

Prueba con lo siguiente, ajusta los nombres de tus controles. La idea es una macro que revise cada cierto tiempo la hora. Yo puse que se revise cada 30 minutos, pero lo puedes ajustar a cada 10 minutos o cada 50 minutos. Private Sub...
Respuesta en y en 1 temas más a

Realizar una resta entre el numero máximo y mínimo de una columna con macros

No entiendo de dónde quieres obtener el máximo. En tu ejemplo se aprecia un listbox. Por eso mi confusión, ¿quieres el máximo de una columna de la hoja de excel o de una columna del listbox? Tendrás que explicar con detalle y ejemplos lo que tienes y...
Respuesta en y en 2 temas más a

Macro validación Campos: Completar celdas condicionadas a rellenar celda inicial.

Prueba con lo siguiente, cambia "Hoja2" por el nombre de tu hoja Private Sub Workbook_BeforeClose(Cancel As Boolean) 'Act.Por.Dante Amor Set h = Sheets("Hoja2") Set rng = h.Range("A1:A20") h.Select For Each celda In rng If celda.Value <> "" Then If...