D
Dave de grenoble sur chaune
Guest
bonjour à tous
j'ai une boucle qui marche nikel
Dim nbligne
nbligne = Range('l1')
For d = 2 To nbligne
Dim cinq
Dim six
cinq = Cells(d, 5)
six = Cells(d, 6)
Dim direction
direction = Cells(d, 7)
Select Case direction
Case 15 To 45
Range('H' & d & ':' & 'I' & d).Select
activecells = '=LOGEST(R1C5:R1C6,RC[-3]:RC[-2])'
End Select
Next d
ca marche mais ca copie a chaque fois la formule '=LOGEST(R1C5:R1C6,RC[-3]:RC[-2])' dans toutes les cases
comment reecrire la formule en utilisant mes 2 variables 'cinq' et 'six'
en gros il faut que je remplace 'activecells = '=LOGEST(R1C5:R1C6,RC[-3]:RC[-2])'' par autre chose
je suis à l'ecoute de toutes reponses, je vous remercie d'avance
dave de grenoble sur chaune..
j'ai une boucle qui marche nikel
Dim nbligne
nbligne = Range('l1')
For d = 2 To nbligne
Dim cinq
Dim six
cinq = Cells(d, 5)
six = Cells(d, 6)
Dim direction
direction = Cells(d, 7)
Select Case direction
Case 15 To 45
Range('H' & d & ':' & 'I' & d).Select
activecells = '=LOGEST(R1C5:R1C6,RC[-3]:RC[-2])'
End Select
Next d
ca marche mais ca copie a chaque fois la formule '=LOGEST(R1C5:R1C6,RC[-3]:RC[-2])' dans toutes les cases
comment reecrire la formule en utilisant mes 2 variables 'cinq' et 'six'
en gros il faut que je remplace 'activecells = '=LOGEST(R1C5:R1C6,RC[-3]:RC[-2])'' par autre chose
je suis à l'ecoute de toutes reponses, je vous remercie d'avance
dave de grenoble sur chaune..