Formule ecrite en VBA

Bonjour à tous
Première question :
J’ai une base de donnée importante sous EXCEL (Pas le choix) avec des calcules qui ont des liaisons de feuilles en feuille.
Donc les calcules sont très longs.
Je voudrais écrire en VBA pour commencer une formule simple
Dans une colonne A1 à A20 des chiffres dans la colonne B1 à B20 d'autres chiffres et en C1 à C20 une simple addition de A + B résultat en C
Donc mes données des colonnes A et B sont entrée sous EXCEL mais la formule est écrite en VBA je ne veux pas voir la formule dans la colonne C
Evidement je débute en VBA
Deuxième question
Si j’arrive à mettre en VBA toutes mes formules est ce que le temps de calcul sera plus rapide
Merci et bonne journée
Phiphi

D'apres ce que j'ai compris, tu veux un code qui te fasse dans la colonne C la somme de A et B a la ligne correspondante.

J'ai pas teste le code mais essaye ce que je viens de mettre.

Code:

---

1 2 3 4 5 6 7 8 9

Sub Somme()   Dim ligne As Integer For ligne = 1 To ligne = 20 Cells(ligne, 3).Value = Cells(ligne, 1).Value + Cells(ligne, 2).Value ligne = ligne + 1 Next   End Sub

---

Bonjour Ptozo
Merci déjà pour ta réponse je n'ai pas réussit a le faire marcher

Ah ...

Effectivement, chez moi aussi, ca ne marche pas.
Chez moi, la macro s'execute, mais n'affiche rien, c'est pareil pour toi ?

Pareil elle se lance mais ne s'exécute pas
Et pour la deuxième question si j'écris toutes mes formule en VBA est ce que le recalcul général ira plus vite que toute les formule écrite dans les cellules EXCEL?
Merci

Bonjour

je pense que tu voulais plutot écrire

a essayer et adapter

Code:

---

1 2 3 4 5 6 7 8

Sub Somme()   Dim ligne As Integer For ligne = 1 To 20 Cells(ligne, 3).Value = Cells(ligne, 1).Value + Cells(ligne, 2).Value Next   End Sub

---

Merci a tous et bon weekend

Salut, à lire et assimiler http://silkyroad.developpez.com/vba/boucles/

Salut

Pour revenir au problème initial (ajouter des sommes sans voir la formule avec des temps de calcul longs)

VBA est un langage interprété, donc les boucles sont souvent lentes. Si tu travailles avec des boucles, tu as intérêt à geler ton affichage avec

Code:

---

application.screenupdating = false

---

en début de macro et
à le dégeler avec

Code:

---

application.screenupdating = true

---

en fin de macro.

Cela étant, les boucles seront toujours plus lentes que les possibilités natives d'Excel.

Dans ton cas, tu n'as pas besoin de boucles. Tu passes la fonction SOMME() en VBA sur l'ensemble de la plage, puis tu réalises un copier/coller spécial valeurs et le tour est joué.

Plus la plage sera grande, plus ce code sera rapide par rapport à une boucle.

Code:

---

1 2 3 4 5 6

Sub AjoutSommesInvisibles() Range("c2:c20").Formula = "=a2+b2" Range("c2:c20").Copy Range("c2:c20").PasteSpecial xlPasteValues Application.CutCopyMode = False End Sub

---

Si tu travailles avec une boucle for ligne = 1 to 20, il ne faut pas modifier la valeur de Ligne au sein de la boucle avec

Code:

---

ligne = ligne +1

---

puisque for ligne = 1 to 20 s'en charge tout seul!