Condividi:        

Ciclo For Next con variabile

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

Ciclo For Next con variabile

Postdi Statix » 09/09/12 18:20

Ciao a tutti,
ho un problema con il ciclo For Next,
dovrei far si che ad ogni ciclo venga sommato al ciclo iniziale un valore di una cella variabile.D1 (ad ogni ciclo cambia valore)
esempio.ciclo iniziale
Codice: Seleziona tutto
For A = 1 to 100
[B1] = A
Next A
-------------------------
cella D1 = 5
il ciclo dovrebbe  cambiare in
For A =7 To 100
B1=A
Next A

secondo ciclo
cella D1 = 23

For A = 31 to 100
[B1]=A
Next A

e così fino alla fine dei cicli spero che sia stato chiaro,
grazie.
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Sponsor
 

Re: Ciclo For Next con variabile

Postdi Francesco53 » 09/09/12 20:00

Ciao, se ho capito bene a te serve qualcosa del genere:

Codice: Seleziona tutto
Sub prova()

ER = Cells(2, 2) ' cella B2 contenente formula per risultato inizio ciclo
For Y = ER To 100
Cells(1 + Y, 1) = Y  ' scrive il risultato del ciclo
Next

End Sub


Francesco
S.O. Windows 10 e Office 2007
Avatar utente
Francesco53
Utente Senior
 
Post: 811
Iscritto il: 20/02/10 18:45

Re: Ciclo For Next con variabile

Postdi Statix » 09/09/12 20:19

Ciao Francesco53,
non è quello che cercavo,
per spiegarti meglio
ad ogni ciclo devo aumentare la cella B1 + il valore variabile della cella D1
come l'esempio precedente
ecco prima c'ero riuscito a creare il ciclo for next,ma lo perso,
in questo caso avevo la cella D1 a valore 5 fisso
e questo sono i valori giusti
Codice: Seleziona tutto
1
7
13
19
25
31
37
43
49
55
61
67
73
79
85
91
97
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Ciclo For Next con variabile

Postdi Statix » 09/09/12 22:04

credo di aver risolto,
riprovo poi eventualmente posto la macro.
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Ciclo For Next con variabile

Postdi Statix » 09/09/12 22:10

il Range("K3").Value è la cella con valore variabile,che sommo al ciclo,
in questo esempio è fisso a 5,
grazie e alla prossima.
Codice: Seleziona tutto
Sub Ciclo()

For A = 1 To 100
[A1] = A + F
[A1].Copy
     
         [A3].Offset(R, 0).PasteSpecial _
       Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
     R = R + 1
     D = Range("K3").Value

  F = F + D
  If [A1] > 100 Then
Exit Sub
End If
 Next A
[A1].Select

End Sub
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Ciclo For Next con variabile

Postdi Flash30005 » 09/09/12 22:58

Non so se la trascrizione in A1 è necessaria
ma se non lo fosse potresti utilizzare meno righe di codice
Codice: Seleziona tutto
Sub Ciclo()
For A = 1 To 100
    Range("A" & A + 2).Value = A + F
    F = F + [K3]
    If A + F > 100 Then Exit Sub
Next A
End Sub


ciao
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: Ciclo For Next con variabile

Postdi Statix » 09/09/12 23:11

Ciao Flash30005,
la macro postata è un esempio,quindi i range sono diversi da quelli che uso
in effetti uso la trascrizione dei dati per memorizzarli,
la macro non è altro che un tipo di step variabile in base ad una condizione,
che verifica il ciclo impiegato per chiudere il ciclo di una previsione e saltare direttamente alla prossima,
ti ringrazio per il contributo.
ciao
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta


Torna a Applicazioni Office Windows


Topic correlati a "Ciclo For Next con variabile":


Chi c’è in linea

Visitano il forum: Marius44 e 45 ospiti