Saltar al contenido
View in the app

A better way to browse. Learn more.

Ayuda Excel

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Código se detiene

publicado

Buenas tardes, gusto saludarles.

Tengo un problema con el código que del Modulo 2, cuando lo pongo a correr se detiene en la línea:

{ActiveSheet.Range("$X$5:$BD$357").AutoFilter Field:=2, Criteria1:="PC1"}

, y me lleva al Modulo 1, la verdad no encuentro porque se da el error.

Les agradezco si me pueden ayudar.

Saludes desde Costa Rica,

Nota:

No me dejó subir el archivo, tal vez se lo pueda enviar por correo.

Featured Replies

publicado

Hola :

Como sabes que se detiene en esa parte del codigo?, te muestra algun mensaje de error en esa linea?

lo mejor seria que subar tu archivo en .zip o .rar para que podamos ayudarte.

Saludos

publicado
  • Autor

Sí, lo fui revisando con "F8", paso a paso, pero en esa linea se va al Modulo 1 y ahí me marca en amarillo la línea del codigo con error, lo raro es que si inactivo todo el código del Modulo 1, el codigo del modulo 2 corre bien, y viceversa.

Ni "Zippeando" me deja subir el archivo, me da un error de peso :(

publicado

Dale f5 y luego corre tu macro. Muestranos la linea donde te sale error.

publicado
  • Autor

Si, es esta:

{Sub MuestraCualiSeguimiento()

Sheets("Informe Cualitativo").Select

With Sheets("Informe Cualitativo")

.Rows("12:26").EntireRow.Hidden = False

.Rows("15:15").EntireRow.Hidden = True

.Rows("18:18").EntireRow.Hidden = True

.Rows("23:24").EntireRow.Hidden = True

.Rows("30:40").EntireRow.Hidden = False

.Rows("48:49").EntireRow.Hidden = False

.Rows("73:74").EntireRow.Hidden = False

End With

Range("D9").Select

Sheets("Portada").Select

End Sub}

publicado

El codigo yo lo ejecuto yo me trae ningun problema.

Lamentablemente si no podemos ver tu archivo es dificil ayudarte.

Saludos

publicado

.

Tu macro entra en conflicto con los eventos change de los controles ComboBox1 y ComboBox6, he puenteado estos eventos.

El problema viene derivado de utilizar rangos en la propiedad .ListFillRange de los combobox, ya que estos rangos se ven afectado por el filtro avanzado que efectúas en la macro.

https://dl.dropboxusercontent.com/u/241435/Copia de Ejemplo para consulta de macros.zip

.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.