Unificación de datos de diferentes hojas con una macro

[Jacifuentes521]

Buenas.

Tengo un archivo Excel (es solo un ejemplo) con varias hojas y en cada hoja hay datos.

Sin permisos de acceso

Sin permisos de acceso

Y así con las demás...

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í

 

[hc3115]

El adjunto:::

 

[Macro Antonio]

Sub ConsolidarInconsistencias()
Dim Hoja As Worksheet, CON As Worksheet, Título As Range
Application.ScreenUpdating = False
Set CON = Sheets("Inconsistencias Consolidadas")...

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í

 

[Jacifuentes521]

Sub ConsolidarInconsistencias()
Dim Hoja As Worksheet, CON As Worksheet, Título As Range
Application.ScreenUpdating = False
Set CON =...

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í

 

[Jacifuentes521]

El adjunto:::

Muchas gracias, solo una cosita más. ¿Cómo hacer para que también me traiga el color amarillo (o sea que las menciones que...

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í

 

[Macro Antonio]

Añade esta línea:

CON.Range("C" & fila).Interior.Color = vbYellow

 

[Jacifuentes521]

Añade esta línea:

CON.Range("C" & fila).Interior.Color = vbYellow

Gracias.