Condividi:        

Excel modifica macro di Flash3005

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Excel modifica macro di Flash3005

Postdi Statix » 02/10/08 14:45

Ciao a tutti,volevo un aiuto per modificare questa macro di Flash3005.
la macro mi ordina il foglio delle righe presenti e di tutte le colonne,
se era possibile ordinare solo il Range C2:G4500,
anche con una nuova macro,io c'è ne ho una ,che mi ordina solo le celle selezionate,ma è lenta .




Codice: Seleziona tutto
Sub Ordina()
'
' Ordina Macro
' Macro registrata il 26/09/2008 da Flash
'

'
   
   
   
    Rigax = 1
N = Range("A" & Rows.Count).End(xlUp).Row

'
For Rigax = 1 To N
    Rows(Rigax & ":" & Rigax).Select
     Rows(Rigax & ":" & Rigax).Sort Key1:=Range("A" & Rigax), Order1:=xlAscending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
        DataOption1:=xlSortNormal
Next Rigax

       
    Range("G1").Select
End Sub
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Sponsor
 

Re: Excel modifica macro di Flash3005

Postdi Anthony47 » 02/10/08 15:12

La macro deve ordinare una per una 4500 righe, e' normale che sia lenta...
Allora? non usare una macro:
-in H2 metti =PICCOLO($C2:$G2;1)
-copi la formula in I2:L2, modificando "l' indice" da 1 in 2-3-4-5
-copy H2:L2 fino a H4500
Avrai cosi' in un attimo i numeri ordinati.

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Excel modifica macro di Flash3005

Postdi Statix » 02/10/08 15:22

Ciao Anthony47
tutto ok.
Aspetto ancora per il post precedente Ricerca su archivio.
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Excel modifica macro di Flash3005

Postdi Flash30005 » 03/10/08 01:02

Statix ha scritto:Ciao a tutti,volevo un aiuto per modificare questa macro di Flash3005.
la macro mi ordina il foglio delle righe presenti e di tutte le colonne,
se era possibile ordinare solo il Range C2:G4500,
anche con una nuova macro,io c'è ne ho una ,che mi ordina solo le celle selezionate,ma è lenta .


La cosa più veloce in assoluto, di una macro che esegue quell'ordinamento (Anthony ti ha consigliato benissimo come al solito), è non ordinare i numeri estratti :lol:

se tu hai (prendo la prima estrazione del tuo archivio)
15 17 39 71 82
e li metti in ordine per crearti gli ambi avrai
15-17 15-39 15-71 15-82 17-39 17-71 17-82 39-71 39-82 71-82
come vedi il 15 (capogioco) si combina 4 volte
il 17 (capogioco) 3 volte
il 39 (capogioco) 2 volte
il 71 (capogioco) 1 volta
e l'82 non è capogioco
è regolare impostare il programma così?
Non si incontreranno problemi di ricerca ad esempio dell'ambata 82 o 39 etc?
In questi giorni pensavo al tuo archivio e mi chiedevo se non fosse stato più semplice generare tutti gli ambi (anche ripetendoli) nella stessa riga, in questo caso avremo 20 combinazione invece che 10
15-17 15-39 15-71 15-82 17-15 17-39 17-71 17-82 39-15 39-17 39-71 39-82 71-15 71-17 71-39 71-82 82-15 82-17 82-39 82-71
In pratica ogni numero (ambata) considerato capogioco avrà ben 4 combinazioni di ambo per ogni estrazione
Un domani in caso di ricerca dell'ambata 82 avrai tutte le combinazioni che questo numero ha generato.
Non ho altre soluzioni al momento se non quella, ripeto, di assegnare ad ogni numero il nome di un foglio di excel, si avranno 90 fogli + il foglio Archivio (immaginiamoli affiancati uno di seguito all'altro)
Consideriamo la prima riga intestazione (l'archivio come è ora) mentre ogni foglio riporterà nella prima riga i numeri da 1 a 90 (A1:CL1)
nella seconda riga del foglio Archivio la prima estrazione (quella riportata qui sopra) mentre
nella seconda riga del foglio 15 avremo un flag alla colonna 17 (colonna Q riga 2) un altro flag alla colonna 39 (cella AM2) e così via
Il foglio 17 avrà il flag nella colonna 15 (cella O2), nella colonna 39 (cella AM2) etc
Possiamo mettere come flag il numero 1 e nulla nel resto delle celle (o qualsiasi altra cosa che ci faciliterà il conteggio), a questo punto una semplice somma di ogni colonna ci darà l'ambo più frequente (in verità ne avremo due es. 15-71 e 71-15 ma sarà facile considerane uno solo). Di ogni colonna si potrà avere il massimo ritardo di un ambo conteggiando le celle vuote tra un flag e un altro, la frequenza conteggiando i flag rispetto alle estrazioni e quindi anche la media.
Infine essendo ogni foglio un numero (capogioco) da 1 a 90 si ottiene l'ambata più frequente sommando tutti i flag di ogni foglio (con il totale ad ogni colonna si sommando tutti i totali delle colonne del foglio)
Impostato così non occorrono formule "complicate" ma solo una macro che metta i flag nei vari fogli il resto sono solo somme e divisioni supportati da una macro che "scansiona" ogni foglio e fornisce i riusultati desiderati.
Questa è un'idea che se reputata valida non è molto difficile da realizzare.
Cosa ne pensi?
E cosa ne pensa Anthony?
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Excel modifica macro di Flash3005

Postdi Anthony47 » 03/10/08 01:43

Anthony pensa che bisogna cercare sempre il trade off tra lavoro sul foglio (con le funzioni native) e lavoro sul vba; tenete presente che qualsiasi cosa che si puo' fare sia in excel che nel vba, sara' eseguita 10-100 volte piu' velocemente da excel che non dal vba.
Io non so per quale motivo Statix vuole ordinare quelle 5 colonne (con i numeri del lotto); mi limito a dire che la cosa ha un senso solo se le elaborazioni successive ne traggono un vantaggio.
Sara' anche per l' ora tarda ma mi limito a queste vaghe considerazioni.
Tra l' altro, se questa tecnica aveva a che fare con le statistiche degli ambi, ho postato nel frattempo un prototipo di file che fa quelle elaborazioni (senza ordinare gli estratti); puo' darsi che l' argomento sia quindi anche superato.

Ciao.
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Excel modifica macro di Flash3005":


Chi c’è in linea

Visitano il forum: Nessuno e 68 ospiti