instruccion que ubique la hoja actual

Solo consultas sobre macros y código VBA Excel.

Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Compartir en:
     

instruccion que ubique la hoja actual

Notapor yonigrinwod » 10 Ene 2012 15:44

que instruccion puedo poner para que no se grabe el nombre de la hoja o como sustituyo esta parte de la macro ActiveWorkbook.Worksheets("PAT 1161 1179 clase") para poder correr la misma macro en diferentes hojas

ActiveWorkbook.Worksheets("PAT 1161 1179 clase").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("PAT 1161 1179 clase").Sort.SortFields.Add Key:=Range( _
"C1"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("PAT 1161 1179 clase").Sort

saludos
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
yonigrinwod
Miembro Frecuente
Miembro Frecuente
 
Registrado: 23 Jun 2008 08:40

Re: instruccion que ubique la hoja actual

Notapor elcibernauta08 » 10 Ene 2012 21:57

quieres realizar lo mismo con todas las hojas del libro??

si es afirmativa tu respuesta puedes intentar con un ciclo for que valla recorriendo todas la hojas actuales del libro y en vez de mandar el nombre de la hoja mandarias la variable de tu ciclo for que regularmente es la "x" quedando asi

EJEMPLO:

ActiveWorkbook.Worksheets(x).Sort.SortFields.Clear
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
elcibernauta08
Miembro Frecuente
Miembro Frecuente
 
Registrado: 02 May 2011 20:25
Ubicación: Yucatan, Mexico

Re: instruccion que ubique la hoja actual

Notapor Héctor Miguel » 10 Ene 2012 22:24

hola, !
que instruccion puedo poner para que no se grabe el nombre de la hoja o como sustituyo esta parte de la macro ActiveWorkbook.Worksheets("PAT 1161 1179 clase") para poder correr la misma macro en diferentes hojas

si para todas las hojas puedes aplicar la ordenacion desde la celda [C1], solo cambia las referencias...
de: -> ActiveWorkbook.Worksheets("PAT 1161 1179 clase")
a: -> ActiveSheet

saludos,
hector.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
Héctor Miguel
Miembro Frecuente
Miembro Frecuente
 
Registrado: 26 Mar 2005 18:31


Compartir en:
     

  • Anuncio
Manual Excel avanzado

Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 7 invitados