Microsoft 365 Insertion de ligne avec formules

arkheos · 28 Octobre 2019

Bonjour à tous,

j'espère que vous pourrez m'aider, j'ai rechercher sur le forum mais je n'ai pas trouvé de solution.

Je ne peux pas vous mettre le fichier car c'est un fichier pro et il contient des informations que je ne peux pas partager ( merci de votre compréhention).

Je vais donc essayer de vous expliquer le plus précisément possible.

Je renseigne un premier tableau avec des données à l'aide d'une macro.
Dans un second tableau, des formules récupères certaines données de ce tableau pour un traitement avec des formules.
La macro insere une ligne au début de ce tableau mais je ne parviens par à mettre les formules.

pour résumer je souhaite que la macro insere une ligne avec les formules de la première ligne du tableau en faisant décaler vers le bas les lignes existantes et que les formules soient conservées.

Merci de vos propositions
Arkhéos

sousou · 28 Octobre 2019

Bonjour
En vba pour ajouter une formule utilise range.formula="ta formule"
Par contre si tu utilise une tableau excel (convertir en tableau), lorsque tu insère une ligne la formule sera copiée automatiquement

Graveling · 28 Octobre 2019

Salut,

Je ne suis pas un pro de VBA, mais j'ai fait qques macro où je copiais une formule d'une cellule à une autre.

Pour faire cela, je faisais:
Range(A1).formula=Range(B1).formula

Voici ci-dessous une morceau du code

VB:

'boucle pour copier les calculs du tableau du graphique pour le nouveau fournisseur
For i = 1 To 3
   Range("FOURN_GRAPH").End(xlDown).Offset(0, i).Formula = Range("fourn_graph").End(xlDown).Offset(-1, i).Formula
Next

arkheos · 28 Octobre 2019

sousou à dit:
Bonjour
En vba pour ajouter une formule utilise range.formula="ta formule"
Par contre si tu utilise une tableau excel (convertir en tableau), lorsque tu insère une ligne la formule sera copiée automatiquement

Bonjour,

merci pour la réponse, je vais essayé le code proposé.
J'ai essayé avec le tableau mais ça ne fonctionne pas comme je le souhaite.
arkhéos

arkheos · 28 Octobre 2019

Graveling à dit:
Salut,

Je ne suis pas un pro de VBA, mais j'ai fait qques macro où je copiais une formule d'une cellule à une autre.

Pour faire cela, je faisais:
Range(A1).formula=Range(B1).formula

Voici ci-dessous une morceau du code

VB:

'boucle pour copier les calculs du tableau du graphique pour le nouveau fournisseur For i = 1 To 3 Range("FOURN_GRAPH").End(xlDown).Offset(0, i).Formula = Range("fourn_graph").End(xlDown).Offset(-1, i).Formula Next

Bonjour,

merci pour la proposition, je vais essayer.

Bonne journée
Arkhéos

Microsoft 365 Insertion de ligne avec formules

arkheos

XLDnaute Nouveau

sousou

XLDnaute Barbatruc

Graveling

XLDnaute Junior

arkheos

XLDnaute Nouveau

arkheos

XLDnaute Nouveau

Discussions similaires