Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

MODULO DE CODIGO (HECTOR)

21/06/2004 - 18:55 por LISANDRO | Informe spam
Ayuda Hacer una pregunta
Amigo no entiendo cuando dices colocar lo siguiente en el
modulo de codigo dime por donde debo colocar lo que
escribes y cuales son los pasos a seguir para posterior
ejecutar tal comando...

Espero me puedas ayudar, gracias
Detallo ej. que colocastes en otra pregunta.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("c8:c12")) Is Nothing Then
Exit Sub
With Range("b8:c12")
.Sort Key1:=Range("c8"), Order1:=xlDescending
End With
End Sub
email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 fernando
21/06/2004 - 19:55 | Informe spam
No soy Héctor pero espero que no te importe.

Pulsa alt f11 y seleccionas la hoja en la que quieres te funcione ese
código.


"LISANDRO" escribió en el mensaje
news:1f4cb01c457b0$93ec6420$
Amigo no entiendo cuando dices colocar lo siguiente en el
modulo de codigo dime por donde debo colocar lo que
escribes y cuales son los pasos a seguir para posterior
ejecutar tal comando...

Espero me puedas ayudar, gracias
Detallo ej. que colocastes en otra pregunta.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("c8:c12")) Is Nothing Then
Exit Sub
With Range("b8:c12")
.Sort Key1:=Range("c8"), Order1:=xlDescending
End With
End Sub

Preguntas similares

 

Busqueda sugerida :