copier une colonne sans certaines valeurs

fred · 18 Août 2004

Bonjour a tous

dans ma feuille "calcul" j'ai une colonne D dans laquelle j'ai différentes valeurs.

J'aimerai avoir dans ma colonne E, les meme valeurs que la colonne D sauf si cette valeur vaut 90.

Comment le faire par un code?

merci
fred

Pascal76 · 18 Août 2004

Bopnjour Fred et le forum

essaies ce code

Sub copiesans90()

Dim x As Integer, y As Integer

y = 1

For x = 1 To Range("D65536").End(xlUp).Row
  If Range("D" & x) <> 90 Then
    Range("E" & y) = Range("D" & x)
    y = y + 1
  End If
Next

End Sub

Bonne journée

Pascal

fred · 18 Août 2004

c'est parfait

merci beaucoup

bonne journée a toi et a tout le forum

fred

copier une colonne sans certaines valeurs

fred

Guest

Pascal76

Guest

fred

Guest

Discussions similaires