Dante Amor

Dante Amor

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

Respuestas en Programación

Respuesta en y en 2 temas más a

Macro: Vincular una celda a la ultima hoja

Prueba con lo siguiente y me comentas Sub copiar_Hoja() Worksheets(3).Copy After:=Sheets(Sheets.Count) nombre = ActiveSheet.Name Worksheets(1).Select ActiveCell.Offset(1, 0).Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", _...
Respuesta en y en 2 temas más a

Buscar un dato de un textbox en una Base de datos de Excel

Con el método .AddItem no es posible cargar más de 10 columnas, para cargar más de 10 columnas, puedes utilizar la propiedad .Rowsouce o .List. Revisa las siguientes respuestas, ahí explico cómo utilizar la propiedad .RowSource Codigo VBA para un...
Respuesta en y en 4 temas más a

Problemas con métodos de búsqueda

Te anexo la macro completa. Tuve que crear la macro nueva, para tener un orden de archivos y hojas. Al inicio de la macro se establecen los libros que se van a utilizar; después se solicita que se abra el libro variable. De preferencia mantén abierto...
Respuesta en y en 2 temas más a

¿Cómo omitir el error 91 en una búsqueda dentro de una macro?

Te anexo la macro actualizada Sub prb() Range("A1").Select For i = 1 To 18 Set b = Cells.Find(What:=" E CV", After:=ActiveCell, LookIn:=xlFormulas, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False,...
Respuesta en y en 1 temas más a

Fecha final en Textbox dependiendo de otro

Primero, debes quitar esta línea, porque todavía no has capturado el número de meses TxtFecVenc.Value = DateAdd("m", 1, DateValue(TxtFecDesem)) Ahora debes agregar el evento change del textbox TxtTiem, de esta forma: Private Sub TxtTiem_Change()...
Respuesta en y en 2 temas más a

Problema con la la macro para llenar formulario

Te anexo la macro actualizada. La hoja debe ser declarada como Object. Debes validar que el textbox1 siempre tenga datos, de lo contrario no podrás encontrar la siguiente fila vacía y es probable que por eso se encimen tus registros. Private Sub...
Respuesta en y en 2 temas más a

Macro de excel para buscar vinculando 2 combobox y mostrando un listbox

Te anexo un ejemplo para cargar las sociedades, las categorías y los datos en el List. Cambia en el código "soc1", "soc2", "soc3", por lo nombres de tus hojas que contienen las sociedades. El código está preparado para cargar las categorías si...
Respuesta en y en 2 temas más a

Quiero que mi macro ordene de mas reciente a mas antiguos un rango de fechas

Te anexo la macro con el cambio Sub actualizar() 'Por.DAM Set h1 = Sheets("REGISTRO DE LM") With h1.Sort .SortFields.Clear: .SortFields.Add Key:=Range("F9:F99"), Order:=xlDescending .SetRange Range("A1:H9999"): .Header = xlYes: .Apply End With End...
Respuesta en y en 1 temas más a

Ingresar datos a un textbox y que lo guarde como numero

Para permitir solamente números en el textbox: Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If Not (KeyAscii >= 48 And KeyAscii <= 57) Then KeyAscii = 0 End Sub Los textbox, como su nombre lo dice almacena los datos como...
Respuesta en y en 2 temas más a

Macro VBA. Quiero que copie un rango desde una celda hasta la última con datos pero da error.

Te anexo la macro, pero con otra forma de copiar y pegar. Entendí lo siguiente, quieres copiar de la hoja "BUQUENUEVO" las celdas desde A2 hasta la columna K y última fila con datos, y pegarlos en la hoja "VALDEMORO", en la siguiente fila vacía según...