Hoja anterior

[raditz]

hola
kisiera saber si es posible mediante un macro pasar de la hoja actual en la que estoy parado, a la anterior y copiarla. o sea no es niunguna hoja especifica, sino seria la actual -+ 1
chau...

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í

 

[KL]

Sub test()
    On Error Resume Next
    Worksheets(ActiveSheet.Index + 1).Activate
End Sub

 

[yimysys]

sub copia()
On Error GoTo no:
ActiveSheet.Previous.Select
ActiveSheet.Copy Before:=ActiveSheet
no:
end sub

 

[KL]

A ver, olvida mi mensaje anterior
Aqui va el codigo:

Sub copia()
On Error Resume Next
ActiveSheet.Previous.Copy ActiveSheet
End Sub

 

[raditz]

funciona perfecto, gracias a todos