Syntaxe vba

[JJ1]

Bonjour à tous,

Pouvez-vous m'aider à rectifier un collage (suite à la réponse de Modeste que je remercie):
Sub test2()
Dim i As Integer
With ActiveSheet
For i = 1 To 100
Calculate
If .Range("bc" & 2).Value > .Range("db" & 2).Value Then .Range("f" & 2, "bc" & 2).Copy Destination:=.Range("be2")
Next i
End With
End Sub

principe:
je fais une boucle sur 100 Activate, si le résultat de la cellule BC2 est supérieur à celle de DB2 alors je copie de F2 à BC2 en BE2
mais je voudrais un copie/ valeurs (car je copie les alea des cellules et non les valeurs)

Comment puis-je faire ce copier valeurs ?

Merci beaucoup.

 

[MichD]

Re : Syntaxe vba

Bonjour,

Copier seulement les données :

Sub test()
Dim i As Long, Sh As Worksheet
Set Sh = ActiveSheet
Application.EnableEvents = False
Application.ScreenUpdating = False
With Sh
    For i = 1 To 100
        If .Range("bc" & i).Value > .Range("db" & i).Value Then
             With .Range("f" & i & ":bc" & i)
                Sh.Range("be" & i).Resize(, .Columns.Count) = .Value
            End With
         End If
     Next i
End With
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub

 

[néné06]

Re : Syntaxe vba

Bonjour à tous!

Moi, si j'ai bien compris, pour copier les valeurs sans les formules je ferais:

Sub test2()
Dim i As Integer
With ActiveSheet
For i = 1 To 100
Calculate
If .Range("bc" & 2).Value > .Range("db" & 2).Value Then
.Range("f" & 2, "bc" & 2).Copy
.Range("BE2").PasteSpecial Paste:=xlPasteValues
End If
Next i
End With
End Sub

A+

René

 

[Modeste geedee]

Re : Syntaxe vba

Bonsour®

Bonjour à tous,


je fais une boucle sur 100 Activate, si le résultat de la cellule BC2 est supérieur à celle de DB2 alors je copie de F2 à BC2 en BE2
mais je voudrais un copie/ valeurs (car je copie les alea des cellules et non les valeurs)

Comment puis-je faire ce copier valeurs ?

Merci beaucoup.

🙄
en fichier attaché améliorations du programme initial... https://www.excel-downloads.com/threads/series-a-creer.200521/
il est bien entendu que via ce programme le hasard est toujours maitre de l'optimisation

une vrai optimisation passerait par une analyse statistique des données en colonnes A:E
ça c'est du domaine de Roger 😉

 

[JJ1]

Re : Syntaxe vba

Bonjour à tous et merci pour vos réponses que je vais appliquer ce soir.

ps: je ne pense pas que Roger ferait des statistiques issues du ...hasard, un peu à l'image du mouvement brownien (imprévisible).

Bon AM