salut à tous
ci-joint mon programme
je veut changer le montant 2.500.200,00 par une variable que je saisie dans la cellule A1 dans la feuille Nabil
mes salutations
ci-joint mon programme
| Sub cherche() |
| Dim x As Range |
| Dim x1 As String |
| Dim x2 As String |
| Dim r As String |
| Sheets("nabil").Select |
| r = Range("A1").Value |
| Sheets("DBF").Select |
| Range("A1").Select |
| Set x = Range("A1:C20000").Find("*2.500.200,00", , xlValues, xlWhole, , , False) |
| je veut changer le montant 2.500.200,00 par une variable que je saisie dans la cellule A1 dans la feuille Nabil |
| x1 = x.Row + 2 |
| x2 = x.Row - 31 |
| Sheets("DBF").Select |
| Range("A" & x1 & ":C" & x2).Select |
| End Sub |
je veut changer le montant 2.500.200,00 par une variable que je saisie dans la cellule A1 dans la feuille Nabil
mes salutations