XL 2016 Chercher une valeur à partir d'une variable

ninos06

XLDnaute Nouveau
salut à tous
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
 

Pièces jointes

  • N1.xlsm
    23 KB · Affichages: 1

Discussions similaires

Réponses
2
Affichages
129

Statistiques des forums

Discussions
311 735
Messages
2 082 024
Membres
101 873
dernier inscrit
excellllll