by sal, dovresti modificare il primo post in http://www.freeforumzone.com/d/11202105/-COLORE-BLUE-FONT-BOLD-ATTENZIONE-SCARICARE-o-INSERIRE-un-FILE-VEDI-QUI-/discussione.aspx ed insegnare come inserire il CODICE nel forum
Non sono un grandissimo esperto e l'ultimo allegato EXCEL si rifiuta d'aprirlo. Pesa 27,5mb.
Dal primo allegato, nel codice in (Questa_Cartella_di_Lavoro) hai, Sub Auto_close() e Private Sub Workbook_Open()
Io eliminerei tutto e scriverei solo questo (sempre sia compatibile con MAC)
vb
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
If ws.Name <> "MENU" Then ws.Visible = False
Next ws
End Sub
Dopo nella sub attuale
vb
Sub FASCIAQUOTA()
Dim Lr As Long, R1 As Double, R2 As Double, I As Long, F As Long
Lr = ActiveSheet.Cells(Rows.Count, "T").End(xlUp).Row
ActiveSheet.Range("T5:AC"&Lr).ClearContents
If ActiveSheet.Range("R24").Value = "" Or ActiveSheet.Range("R25").Value = "" Then MsgBox "Inserire il MIN e MAX": Exit Sub
Lr = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row
'da qui in poi, non posso dire nulla. Sò che il mio codice fuziona con Wind, se col MAC non funziona non sò cosa fare
End Sub
Ho terminato i suggerimenti e si capisce che MAC è diverso da WIND.
Ps. Solo un ragionamento terra-terra dal foglio RIEPILOGO (però, prima và ripulito col VBA del post 15 "se non funziona sul MAC", ripuliscilo Tu), dopo usando solo i tasti (Excel Filtro/Ordina) riesci visualizzare TUTTE le modalità di scommesse che hai fatto nei 300 fogli?
SI; allora Copy le righe visibili in un foglio nuovo e fai quello che devi fare. Nel uscire tutti questi nuovi fogli andranno eliminati ed il Tuo file sarà sempre trà 6/7mb
Excel 2013