recherche sur plage et remplacement par macro avec plusieurs valeurs calculées

fchevalier · 10 Décembre 2015

Bonjour

Je cherche à remplacer par macro (avec recopie valeur pour éviter les références circulaires) les caractères "*" d'un tableau par la valeur calculée en bout de chaque ligne.

Une fois les "*" remplacés, les écarts entre temps total et temps théorique sont nuls et les temps d'affectation des équipes sont corrects.

La fonction EQUIV me donne le n° de colonne dans lequel on trouve le "*" sur chaque ligne mais je ne sais pas comment aller plus loin.

Qi qq1 a une idée (mon fichier exemple est joint)

Merci d'avance !!

vgendron · 10 Décembre 2015

Re : recherche sur plage et remplacement par macro avec plusieurs valeurs calculées

Hello

en vba ca te donne ca

Code:

Sub remplace()
Set tableau = Range("D3:I7")

For Each ele In tableau
    If ele = "*" Then
        Cells(ele.Row, ele.Column) = Range("J" & ele.Row)
    End If
Next ele

End Sub

fchevalier · 11 Décembre 2015

Re : recherche sur plage et remplacement par macro avec plusieurs valeurs calculées

@vgendron

Hello,
C'est net, c'est épuré, c'est fonctionnel, c'est un miracle

Un grand merci !!!

recherche sur plage et remplacement par macro avec plusieurs valeurs calculées

fchevalier

XLDnaute Nouveau

Pièces jointes

vgendron

XLDnaute Barbatruc

fchevalier

XLDnaute Nouveau

Discussions similaires