intégration de la formule INPUTBOX
Bonjour,
Je suis un grand debutant en VBA excel et dans un macro que j'ai commencer à créer, je souhaiterai que celle-ci chercher dans mon tableau excel toutes les cases comportent les valeur "444" et qui en met en gras, jusqu'ici ça va. Mais par contre,je veux inséré un imputbox qui me demande la valeur que je souhaite chercher, car "444" est une valeur qui peut changer.
(ci-dessous un extrait du code).
PS : si vous pouvez aussi m'indiquez comment inséré des ligne codes dans une discussion ;)
Code:
1 2 3 4 5 6 7 8
| Selection.Replace What:="17 0094", Replacement:="17 0094", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=True
With Application.FindFormat.Font
.FontStyle = "Gras"
.Subscript = False
.TintAndShade = 0
End With |