Dante Amor

H o l a: Te anexo la macro para que al seleccionar una celda con nombre de macro, se ejecute la macro con el nombre seleccionado. Pon la siguiente macro en los eventos de la hoja. Private Sub Worksheet_SelectionChange(ByVal Target As Range)...

Tienes pendiente valorar esta respuesta: Ubicacion de hoja excel de acuerdo a criterios

H o l a: Podrías enviarme en un correo nuevo el ejemplo que pusiste. Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “usuario nuevo” y el título de esta pregunta.

H o l a: Te anexo la macro, en la columna A te va a poner el nombre de la hoja, en la B el código de hoja (codeName) y en la columna C el número de secuencia de la hoja, las hojas tienen un número de índice, empieza en el número 1 para la primera...

H o l a: No estoy seguro de que tu fórmula sea funcional. Si tienes horas en las celdas E6 y G6, la fórmula debería ser: =G6-E6 Si pones E6 - G6, el resultado es un error, ya que no puedes tener tiempo negativo. Sin embargo, si resuelves lo de la...

H o l a: ¿La hoja tiene un filtro en los datos antes de ejecutar la macro? O a qué te refieres con : " En la Hoja CARGUE! Se filtran datos que despues de imprimirlos se borran (solo los datos filtrados) " En tu macro tienes este detalle, estás...

Puedes explicar un ejemplo con imágenes, en el ejemplo explica cuál es el resultado que esperas. Procura que en las imágenes se vean las filas, las columnas de excel y los nombres de las hojas.

H o l a: No entendí esta parte: " El problema surge al querer guardar el libro mediante esta misma macro, ya que al hacerlo el procedimiento no se ve reflejado " ¿Tienes otra macro? ¿O qué es lo que quieres guardar?

H o l a: Te anexo la macro actualizada para que recorra todas las filas. Option Explicit Sub BuscarNumero() 'Por.Dante Amor Dim u As Double, i As Double Dim h1 As Object Dim h As Integer Dim cad As String Dim b As Object ' Application.ScreenUpdating...

H o l a: Te anexo la macro actualizada Sub BuscarValores() 'Por.Dante Amor Set l1 = ThisWorkbook Set h1 = l1.Sheets(1) Set l2 = Workbooks("MANUEL.xlsx") h1.Columns("S:T").ClearContents ' For i = 1 To h1.Range("B" & Rows.Count).End(xlUp).Row cad = "":...