Hello,

using the code

Dim ArtVolgnummer As String
Dim NieuwArtikelNr As String

ProduktCode = InputBox("Geef de produktsoort op" & Chr(10) & Chr(10) &
"HardWare = hw" & Chr(10) & "SoftWare = sw", "Produktsoort")
Artikelvolgnummer = InputBox("Geef het nieuwe artikelnummer op" &
Chr(10) & Chr(10) & "9999", "Artikelnummer")
NieuwArtikelNr = ProduktCode & Artikelvolgnummer

Sheets("hoofdblad").Select
Range("A1").End(xlDown).Offset(1, 0).Formula = NieuwArtikelNr

I fill a cell on a worksheet with a value that looks like sw9999 or
hw9999

Now I would like yhat whole ROW to turn yellow if SW is found in the
NieuwArtikelNr or ProduktCode.

How would one do that?

Thnx for thinking!

Grtz Henro