Nelson Felipe Serrano

Te dejo el link donde puedes descargar un archivo configurado para hacer lo que mencionas, puedes revisar el código y modificarlo a tus necesidades futuras Igualmente dejo el código para quien encuentre útil esta pregunta. Private Sub...

Para que la macro logre lo que quieres debes insertar esta línea de código ActiveWorkbook.ActiveSheet.Copy después de que asignas el valor a la variable <strong style="line-height: 1.5em;">NombreCopia. <strong style="line-height: 1.5em;"> Lo he...

Lo que necesitas se logra con una combinación de correspondencia entre Microsoft Word y Microsoft Excel (puedes evitarte los registros dobles que tienes en tu archivo), te dejo el link donde puedes descargar el documento base, la combinación de los...

He modificado el código para hacer lo que, creo, necesitas, revísalo y me cuentas cómo te va. Al respecto: Esta parte debes pegarla en la hoja de código del libro, ya que se ejecuta antes de que éste se guarde: Private Sub Workbook_BeforeSave(ByVal...

Prueba a usar la función CONTAR. SI con un rango variable y añadiendo la suma del número base... FUNCIONA Quedo pendiente de tu éxito, en caso contrario no dudes en escribir nuevamente.

He probado el código que relacionas, y me funciona; no comprendo a que se puede deber tu error, pero ten presente que la longitud máxima del nombre de la hoja es de 31 caracteres. Si la situación persiste, no dudes en volver a escribir. Quedo...

Te dejo el código que ubica cada línea del contenido del TextBox en una celda de la columna A, supongo que el TextBox tiene por nombre TextBox1 y el botón se llama CommandButton1; con esto claro, te dejo el código que hace lo que necesitas Private...

Las líneas que necesitas adicionar en el código de la hoja que contiene los datos son las siguientes: Application.EnableEvents = False Sheets(1).PivotTables("Tabla dinámica1").PivotCache.Refresh Application.EnableEvents = True (Puede ser necesario...

Para tu caso voy a suponer que la fórmula va a ir en la celda B1 y por tanto se va a evaluar el valor de la celda A1, la fórmula queda como sigue. =SI(A1="","-",NOW()) (Puede ser necesario reemplazar las comas (,) por puntos y comas (;), eso depende...

La línea que necesitas implementar en tu código es la siguiente: ActiveSheet. Range("C1"). EntireColumn.Insert adicionalmente te dejo un archivo que puedes descargar por si tienes problema con el acople de la instrucción.