Dante Amor

Pero puedes escribir cuál es el algoritmo para calcular el último número. Si el algoritmo ya está en VB, puedes poner el código. También si pudieras poner unos 4 ó 5 ejemplos de número con el último número ya calculado.

Te anexo la macro, no mencionas en cuál hoja del libro2 está tu rango fijo, le puse en la macro "hoja1", cambia ese nombre por el de tu hoja. El libro2 deberá estar abierto. Sub CopiarDatos() 'Por.Dante Amor Set l1 = ThisWorkbook Set h1 =...

Te anexo la macro Sub Archivo() 'Por.Dante Amor Const DELIMITER As String = "|" 'or "|", vbTab, etc. ' Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") ruta = h1.[C11] If Left(ruta, 1) <> "\" Then ruta = ruta & "\" nombre = h1.[F12] ' nFileNum =...

Antes de revisar el código o de crear una nueva macro, puedes explicar con ejemplos y con datos reales lo que tienes y lo que quieres de resultado

Entra al menú de VBA, herramientas, referencias y revisa que tengas estas: Ahora en herramientas, controles adicionales, busca los siguientes y márcalos Si no te funcionan entonces habría que adaptar un formulario Te anexo el código para simular un...

No entiendo a qué le llamas "un libro en Excel que está junto al que ejecutó" Pero si conoces el nombre, con lo siguiente, si está oculto, lo hace visible y lo elimina Sub atributo() 'Por.Dante Amor arch = "c:\trabajo\" & "234.xlsx" If Dir(arch) <>...

Puedes enviarme tu archivo con la tabla dinámica, en una hoja me pones la tabla dinámica con un solo campo y en otra hoja me pones la misma tabla dinámica pero con el resultado que esperas después de ejecutar la macro. Si todo se ejecuta desde el...

Puedes pegar nuevamente el código, pero directamente, ya que aparece todo en una sola línea

1. ¿Los datos ya están en la hoja4? 2. ¿En qué columna quieres que se busque? ¿O quieres que busque en todas las columnas y que se traiga todo los datos que encuentre? 3. ¿En la hoja1 en cuál celda tienes lo que quieres buscar? Suponiendo que lo...

Si tu combobox es un control activex entonces utiliza este código, cambia "base" por el nombre de tu hoja que tiene tu base de datos. También cambia "A" por la columna que contiene los datos a cargar en el combo. Sub agregar(combo As ComboBox, dato...