Condividi:        

Macro a volte non funziona

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

Macro a volte non funziona

Postdi saso » 18/05/17 16:14

Ciao, disturbo ancora una volta
Ho questa macro che a volte si blocca, quindi non effettua i dovuti calcoli.
Chiedo gentilmente se qualcuno può verificare il perché:
Codice: Seleziona tutto
Sub Statistica()
  For k = 3 To 160
   t = 0
      n = Range("a" & k)
              If n = 0 Then
               Exit Sub
              End If
               Select Case n
                    Case Is <= 6
                       nt = 1
                     Case Is <= 12
                       nt = 7
                      Case Is <= 18
                       nt = 13
                      Case Is <= 24
                       nt = 19
                      Case Is <= 30
                       nt = 25
                      Case Is <= 36
                       nt = 31
               End Select
         For x = k - 1 To 2 Step -1
             nc = Range("a" & x)
               
                             If nc >= nt And nc <= nt + 5 Then
                                t = nc
                                  Exit For
                              End If
         Next
         If t <> 0 Then
           Range("H" & t + 2).Select
           ActiveCell.Offset(0, n + 1) = ActiveCell.Offset(0, n + 1) + 1
         End If
  Next
End Sub
saso
Utente Junior
 
Post: 14
Iscritto il: 14/05/17 13:26

Sponsor
 

Re: Macro a volte non funziona

Postdi Anthony47 » 21/05/17 22:31

Mi guardo bene dal fare il reverse engineering di un codice per cercare di capire che cosa dovrebbe fare e invece a volte non fa...
Quindi: resetta tutto, spiega che cosa ti serve e vedremo come risolvere.

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

Re: Macro a volte non funziona

Postdi saso » 24/05/17 09:24

Grazie Antony ho fatto ulteriori verifiche
Sembra funzionare per adesso
saso
Utente Junior
 
Post: 14
Iscritto il: 14/05/17 13:26


Torna a Applicazioni Office Windows


Topic correlati a "Macro a volte non funziona":


Chi c’è in linea

Visitano il forum: Gianca532011 e 74 ospiti