formule dans vba bis

[nanor]

Salut le forum,
Bonne journée à tous!!

J'ai un ptit problème avec une formule que j'ai mis en VBA. En fait, je teste la cellule C9 et en fonction de sa valeur, j'inscrit la formule adéquate en G9. J'amerais répéter cette fonction pour toute la colonne G; c'est a dire tester C10 et mettre la formule en G10, C11>G11,...
Je peux joindre un fichier d'exemple si vous voulez.

Merci d'avance.

nanor


Select Case (UCase(Range("C9").Value))

Case "SAL"
Range("G9").formula = "=E9*+data!C5/+data!O5"

Case "MENS"
Range("G9").formula = "=E9/12"

Case "POUR"
Range("G9").formula = "=E9*+data!C7/100"

Case "INV"
Range("G9").formula = "=E9/13*+data!C8"

Case Else
End Select

 

[pyrof]

bonjour,

Au lieu d'utiliser Range(" ") utilise cells(ligne,colonne)
tu peux fixer la colonne a 9 et faire varier la ligne de x à y

 

[JCD]

Bonjour,
tu peux faire une boucle et faire varier la ligne dans le Range :

FOR ligne = 9 TO ....

Select Case (UCase(Range("C" & ligne).Value))

Case "SAL"
Range("G" & ligne).formula = "=E9*+data!C5/+data!O5"

Case "MENS"
Range("G" & ligne).formula = "=E9/12"

Case "POUR"
Range("G" & ligne).formula = "=E9*+data!C7/100"

Case "INV"
Range("G" & ligne).formula = "=E9/13*+data!C8"

Case Else
End Select

NEXT ligne

 

[nanor]

La Commande For...Next fonctionne impec, merci beaucoup.

j'ai encore plein d'autres questions, faut d'abord que j'essaie moi meme tout ca...trop de choses dans le vba!!!!

Merci Pyrof et merci JCD

A+

nanor