Condividi:        

FORMULA O MACRO

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

Re: FORMULA O MACRO

Postdi Lucio Peruggini » 09/04/11 01:03

Servivano entrambe!

La prima, in riferimento al primo caso era giusta ma, nel secondo caso sommava solo le celle con asterisco.
Però, aggiungendo anche la seconda che sommava il tutto egregiamente, mi aggiungeva anche una stringa superiore che non riguardava.
Risolto con anziché + 1, 4, con + 0, 4.

If CAst > 2 Or Cells(I, 4) <> Cells(I + 0, 4) Then

Grazie infinite, stavo già sclerando con la rotellina del mause.

Notte
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 896
Iscritto il: 24/01/11 16:23

Sponsor
 

Re: FORMULA O MACRO

Postdi Lucio Peruggini » 09/04/11 14:26

Ho provato ma non ci sono riuscito, come faccio a far partire la macro dalla riga 2 anziché la 1?
In pratica, la riga 1 deve essere libera per alcuni indici che ho inserito.
Grazie, Lucio
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 896
Iscritto il: 24/01/11 16:23

Re: FORMULA O MACRO

Postdi Anthony47 » 09/04/11 22:54

Una istruzione aggiunta e una modificata
Codice: Seleziona tutto
Range("F1:J1").Copy Destination:=Range("AA1")   ' <<Aggiunta
For I = 2 To LastR                                ' << Modificata

In coda una aggiunta
Codice: Seleziona tutto
Range("AA1:AE1").copy Destination:=Range("F1")   ' <<Aggiunta
End Sub

Usa l' area AA1:AE1 come area di servizio; se e' occupata per altri calcoli modifica opportunamente le Copy e le Destination.

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

Re: FORMULA O MACRO

Postdi Lucio Peruggini » 10/04/11 00:38

Grazie Anthony è tutto OK!!!
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 896
Iscritto il: 24/01/11 16:23

Re: FORMULA O MACRO

Postdi Lucio Peruggini » 12/04/11 18:22

Ancora una volta devo consultare il medico per modifica.

Da come si può notare, la macro che prima guardava la ruota e su quella si stoppava compiendo le operazioni dovute, in questo caso dovrebbe non più vedere la ruota ma la coppia di numeri in colonna "C"; al cambio di essi, deve conteggiare.


Codice: Seleziona tutto
199   7922   01.03   Pa   0054   *            
200   7973   01.03   To   0050   *            
201   8103   01.03   Ve   0129   *            
202   8122   01.03   Ve   0018   *            
203   8132   01.03   Ge   0009      Ge   0517   0009   0010
204   8172   01.03   Ge   0039   *            
205   8193   01.03   Ve   0020   *            
206   8227   01.03   Ro   0033   *            
207   8352   01.03   Fi   0124   *            
208   4082   01.04   Ge   0132   *            
209   4086   01.04   Ve   0003      Ve   0351   0003   0005


Avrebbe dovuto fermarsi con l'01.03 quindi tre ritardi consecutivi (in questo caso il parametro impostato è >12) rilevando un 124 di ritardo nella stringa. Invece è andata avanti giustamente rilevando il ritardo più basso che è il "3" poichè la macro gurda attualmente la ruota e non il numero in colonna "C".

Grazie, Lucio
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 896
Iscritto il: 24/01/11 16:23

Re: FORMULA O MACRO

Postdi Anthony47 » 12/04/11 23:24

Il cambio ruota (col. D=4) era gestito in questo messaggio: viewtopic.php?f=26&t=91164#p520337
Se devi sondare il cambio in col C=3 allora dovrai agire modificando l' indice di colonna da 4 a 3 in queste istruzioni:
If ArrE(I, 1) > 18 And Cells(I, 4) = Cells(I + 1, 4) Then '<<MODIFICATA

If CAst > 2 Or Cells(I, 4) <> Cells(I + 1, 4) Then '<<Anche MODIFICATA

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

Re: FORMULA O MACRO

Postdi Lucio Peruggini » 12/04/11 23:31

Grazie Anthony, sei un grade amico. Come sempre hai risolto anche questo inghippo.
Farò le modifiche come dettomi.
Lucio P.
Versione Office - 2013
Lucio Peruggini
Utente Senior
 
Post: 896
Iscritto il: 24/01/11 16:23

Precedente

Torna a Applicazioni Office Windows


Topic correlati a "FORMULA O MACRO":


Chi c’è in linea

Visitano il forum: Nessuno e 71 ospiti