Date plus récente avec des interligne ( Vba)

Y

Yaloo

XLDnaute Barbatruc

• 18 Janvier 2014

• #2

Re : Date plus récente avec des interligne ( Vba)

Bonsoir Ilino,

Avec la fonction =MAX(ta plage)

A+

Martial

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 18 Janvier 2014

• #3

Re : Date plus récente avec des interligne ( Vba)

Bonsoir YALOO
Merci pour la formule
est ce que je peux l'avoir en code VBA???
GRAZIE
A+

 

Vote positif 0 Vote négatif

Y

Yaloo

XLDnaute Barbatruc

• 18 Janvier 2014

• #4

Re : Date plus récente avec des interligne ( Vba)

Avec l'enregistreur, je pense que tu peux y arriver.

A+

Edit : Salut Victor, même idée 😉

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

Supporter XLD

• 18 Janvier 2014

• #5

Re : Date plus récente avec des interligne ( Vba)

Bonjour, Ilino, Yaloo 🙂

Que dit l'enregistreur de macros ?

Edit : Bing !!!
😉

 

Dernière édition: 18 Janvier 2014

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 18 Janvier 2014

• #6

Re : Date plus récente avec des interligne ( Vba)

Victor21 à dit:

Bonjour, Ilino, Yaloo 🙂

Que dit l'enregistreur de macros ?

Edit : Bing !!!
😉

Cliquez pour agrandir...

Bonsoir

Code:

Sub Macro3()
'
' Macro3 Macro
'

'
    Range("L11:N11").Select
    ActiveCell.FormulaR1C1 = "=MAX(R[-6]C:R[-2]C[2])"
End Sub

A+

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

Supporter XLD

• 18 Janvier 2014

• #7

Re : Date plus récente avec des interligne ( Vba)

Re,

Voyez-vous pourquoi les cellules fusionnées mettent le bintz ?

Range("L11:N11")

Cliquez pour agrandir...

= "=MAX(R[-6]C:R[-2]C[2])"

Cliquez pour agrandir...

Vous pouvez aussi utiliser :

VB:

[L11].Value = Application.Max([l5:l9])

Edit : On peut même, ici, se passer de ".value", mais ne me demandez pas pourquoi 😕

 

Dernière édition: 18 Janvier 2014

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 18 Janvier 2014

• #8

Re : Date plus récente avec des interligne ( Vba)

rE,
mERCI PATRICK
A+

 

Vote positif 0 Vote négatif