convertir formule en macro

[ZONZON]

Bonjour au forum, je cherche à avoir l'equivalent de ces formules en VBA, merci d'avance [file name=SIVIDEVBA.zip size=2798]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SIVIDEVBA.zip[/file]

 

[Marc_du_78]

Bonsoir zonzon, le Forum
En retour ton fichier.
Code réalisé avec l'enregistreur de macros que l'on a trop souvent tendance à oublier.
En te souhaitant une bonne soirée. [file name=SIVIDEVBA_20060220191041.zip size=7082]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SIVIDEVBA_20060220191041.zip[/file]

 

[ZONZON]

Merci pour la vba , c'est bien ce que je cherchais

 

[dg62]

Bonsoir ZonZon, Marc


en VBA pur cela peut donner quelque chose dans le genre.

Sub compare()

For Each cel In Range('C2:C20')

    If cel.Offset(0, -2) = '' Then
        cel.Value = cel.Offset(-1, -1)
    Else
        cel.Value = cel.Offset(0, -2)
    End If

Next cel

End Sub