VBA---activer une fonction colonne après colonne.

[JJ1]

Bonjour au Forum,

Je souhaiterais que mon code (inséré dans le fichier test joint) active la fonction seulement en colonne M puis à la fin du test en M3 désactive cet alea en colonne M pour passer à la colonne suivante (N)

Comment puis-je le faire? (simplement)

Merci de votre aide.


ps: merci à Dranreb.

 

[gilbert_RGI]

Re : VBA---activer une fonction colonne après colonne.

Bonjour,

comme ceci peut-être

 

[gilbert_RGI]

Re : VBA---activer une fonction colonne après colonne.

une autre possibilité

Sub Macro3()
Sheets(1).Select
Application.ScreenUpdating = False
[M3].Value = ""
[N3].Value = ""
x = Array(13, 14)
For Z = 0 To 1
mecol = IIf(Z = 0, "M", "N")
While Cells(3, x(Z)).Value < 40
For i = 1 To 6
col = x(Z)
Cells(4 + i, col).Formula = ("=RANDBETWEEN(1,11)")
Cells(4 + i, col).Value = Cells(4 + i, col)
Next
Cells(3, x(Z)).Formula = ("=SUM(" & mecol & "5:" & mecol & "10)")
Wend
Next
Application.ScreenUpdating = True
End Sub

 

[JJ1]

Re : VBA---activer une fonction colonne après colonne.

Bonjour Gilbert,

Merci pour tes réponses, j'aime bien la première solution.
Je pensais que l'on pouvait conserver les formules et activer ou non certaines cellules via VBA.
Bon WE
merci

 

[gilbert_RGI]

Re : VBA---activer une fonction colonne après colonne.

la seconde est une amélioration de la première elle fait exactement la même chose !!

si tu laisses les formules elles seront actives au changement de colonnes ce qui parait logique 😎