Microsoft 365 Probleme pour étendre une formule en vba

vgendron

XLDnaute Barbatruc

• 28 Juillet 2022

• #2

Bonjour
Sans fichier exemple, impossibe de t'orienter vers ce qui ne va pas.

 

Vote positif 0 Vote négatif

M12

XLDnaute Accro

• 28 Juillet 2022

• #3

Bonjour,
Teste ceci

VB:

Dim f$
DernLigne = Range("A" & Rows.Count).End(xlUp).Row
f = "=1-((IA7-AG7)/(AD7-AG7))"
Range("IB7").FormulaLocal = f
Range("IB7").AutoFill Destination:=Range("IB7:IB" & DernLigne), Type:=xlFillDefault

 

Vote positif 0 Vote négatif

M

marievirlouvet6

XLDnaute Nouveau

• 28 Juillet 2022

• #4

Je m'excuse j'ai fait un fichier test

 

Pièces jointes

• test1.xlsx

  16.8 KB · Affichages: 7

Vote positif 0 Vote négatif

M

marievirlouvet6

XLDnaute Nouveau

• 28 Juillet 2022

• #5

M12 à dit:

Bonjour,
Teste ceci

VB:

Dim f$
DernLigne = Range("A" & Rows.Count).End(xlUp).Row
f = "=1-((IA7-AG7)/(AD7-AG7))"
Range("IB7").FormulaLocal = f
Range("IB7").AutoFill Destination:=Range("IB7:IB" & DernLigne), Type:=xlFillDefault

Cliquez pour agrandir...

Merci mais le problème persiste toujours le même résultat

 

Vote positif 0 Vote négatif

M12

XLDnaute Accro

• 28 Juillet 2022

• #6

marievirlouvet6 à dit:

Je m'excuse j'ai fait un fichier test

Cliquez pour agrandir...

A tester

 

Pièces jointes

• marievirlouvet6.xlsm

  15.9 KB · Affichages: 3

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 28 Juillet 2022

• #7

en retour ta macro corrigée

VB:

Sub EtendreFormule()

Dim DernLigne As Long



DernLigne = Range("A" & Rows.Count).End(xlUp).Row

Range("F1").FormulaLocal = "=(((A1-B1)-C1)*1.2+D1)"
Range("F1").AutoFill Destination:=Range("F1:F" & DernLigne)

End Sub

en vba, les virgules deviennent des points

 

Vote positif 0 Vote négatif

M

marievirlouvet6

XLDnaute Nouveau

• 28 Juillet 2022

• #8

Je ne comprends pas la formule f = "=(((RC[-5]-RC[-4])-RC[-3])*1.2+RC[-2])" à quoi correspond RC et -5 .
C'est pour pouvoir adapter ensuite à mon vrai fichier

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 2 Août 2022

• #9

Bonsoir.
En notation R1C1, "R" signifie Row et "C" Column.
S'il est suivi d'un numéro, c'est la référence absolue vers ce numéro de ligne ou de colonne.
S'il est est suivi d'un nombre entre crochets droits, c'est la référence relative vers la ligne ou colonne s'écartant de ce nombre de celle portant la formule.
S'il n'est suivi ni de l'un ni de l'autre c'est la référence relative à la ligne ou colonne portant la formule. [0] ne se précise pas, en somme.

 

Vote positif 0 Vote négatif