macro excel

01/09-2006 à 22:35Salut a tous

Un petit problème pour certain
Pour moi dur dur

Voila une partie de ma macro


premier = Sheets("feuille1").Range("A1").Value
Résultat = premier
Sheets("feuille2").Range("D4").Value = Résultat

Copie la cellule A1 de la feuille1
Sur la feuille2 en cellule D4

Ok

Mais je voudrais que si la cellule A1 de la feuille1 et vierge
Je voudrais copie la cellule H5 de la feuille1 en feuille2 cellule D4

En résumé copié la cellule A1 ou la cellule H5 de la feuille1
En cellule D4 de la feuille2


Merci d'avance pour vos réponses
Et d'avoir pris le temps de lire ce message


Aiglon74

----------
aiglon74

01/09-2006 à 23:59Voilà le code que tu peux mettre

premier = Sheets("feuille1").Range("A1").Value
autre = Sheets("feuille1").Range("H5").Value

If premier <> "" Then Résultat = premier Else Résultat = autre
Sheets("feuille2").Range("D4").Value = Résultat

Bon courage
Pégase

----------