Merhaba arkadaslar. Hucrede yazan belirli yazilara gore kutudaki renk degismektedir. fakat ben ayrica patern degisimide eklemek istioyorum.
If Worksheets("Status").Cells(c, 1).Value = "J20" And Worksheets("Status").Cells(c, 9).Value = "At Site" Then Worksheets("HCK").Shapes(Cells(c, 3).Value).Fill.ForeColor.RGB = RGB(255, 255, 0)
kullanidgim kod yukardaki gibidir. Nasil bir degisliklik yaparsam cizgili oatern eklemis olurm.
simdiden yardimlariniz icin tesekkur ederim
If Worksheets("Status").Cells(c, 1).Value = "J20" And Worksheets("Status").Cells(c, 9).Value = "At Site" Then Worksheets("HCK").Shapes(Cells(c, 3).Value).Fill.ForeColor.RGB = RGB(255, 255, 0)
kullanidgim kod yukardaki gibidir. Nasil bir degisliklik yaparsam cizgili oatern eklemis olurm.
simdiden yardimlariniz icin tesekkur ederim