Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

¿Macro? para reemplazo de valores

crowler

New member
Registrado
21 Mar 2024
Mensajes
23
Hola a todos! Un placer formar parte del foro.
Espero puedan ayudarme!

Les comento el inconveniente que tengo:
Armé un archivo Excel para utilizar como consolidador de diferentes tipos de datos...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 

Adjuntos

    Sin permisos de acceso
Solución
Hola

Esta macro puede buscar y reemplazar los nombres de las tablas externas con la fecha del día actual. Aquí un ejemplo de cómo podrías hacerlo:


Sub ActualizarConsolidador()
Dim ws As Worksheet
Dim fecha As String

' Obtener la fecha actual en el formato de nombre de tabla
fecha = Format(Date, "yyyymmdd")

' Reemplazar los nombres de las tablas externas en las fórmulas
For Each ws In ThisWorkbook.Worksheets
ws.Cells.Replace What:="Tabla1 20240320", Replacement:="Tabla1 " & fecha, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next ws
End Sub



Saludos
Hola

Esta macro puede buscar y reemplazar los nombres de las tablas externas con la fecha del día actual. Aquí un ejemplo de cómo podrías hacerlo:


Sub ActualizarConsolidador()
Dim ws As...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Volver
Arriba