@Miko
inviato in MP
Ciao
Moderatori: Anthony47, Flash30005
=SE(CONTA.SE($B2:$V2;X$1)=1;CONTA.SE($B2:$V2;X$1);"") Range("A1:F4005").Select
Selection.Sort Range("A1:F4005").SortRange("A1:F4005").SortSub ordinrecent()
Worksheets("controlli").Unprotect ' togli protez
Application.EnableEvents = False '<<<<<< blocca gli eventi
Range("A6:f95").Sort Key1:=Range("E6"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("E2").Select
ActiveWindow.DisplayGridlines = False 'protegge il fgl
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingColumns:=True, AllowFormattingRows:=True
Application.EnableEvents = True 'ripristino eventi
End SubApplication.EnableEvents = False '<<<<<< blocca gli eventiTorna a Applicazioni Office Windows
| Excel apre solo una schermata bianca Autore: jameswilson |
Forum: Applicazioni Office Windows Risposte: 1 |
| Inserire add.in nella barra di avvio veloce in excel 2003 Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 4 |
| Excel: problema con date se devo unirle a testi Autore: valle1975 |
Forum: Applicazioni Office Windows Risposte: 7 |
Visitano il forum: Nessuno e 154 ospiti