remplacer des cellules dans une colonne-VBA

Bonjour,

Je souhaite remplacer le mot "date Inst" dans ma colonne "C" de 2000 lignes.

J'ai ce code qui me donne un message d'erreur: Erreur de compilation: Nombre d'arguments incorrect ou affectation de propriété incorrecte

le bug est dans cette ligne de code :

Code:

---

correct = Replace(orig, "Date Inst", "")

---

alors que j'ai bien vérifié sur internet la fonction replace!

voici le code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub replaceEx() Dim orig, wb As Workbook, correct, i   Set wb = Workbooks.Open("Z:\VBA\base-macro.xlsx") For i = 1 To wb.Sheets(2).Range("C" & Rows.count).End(xlUp).Row orig = wb.Sheets("Feuil2").Range("C" & i + 1).Value correct = Replace(orig, "Date Inst", "") Range("C" & i + 1).Value = correct Next i   End Sub

---

merci pour vos aides!

:)

Bonjour, essaye ceci:

Code:

---

1 2	wb.Sheets("Feuil2").Range("C1:C" & i + 1).Replace What:="Date Inst" , Replacement:= "", _ LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

---

Citation:

---

Envoyé par halaster08

Bonjour, essaye ceci:

Code:

---

1 2	wb.Sheets("Feuil2").Range("C1:C" & i + 1).Replace What:="Date Inst" , Replacement:= "", _ LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

---

---

ça marche parfaitement
merci beaucoup!