try this:
![]()
dim count as long Application.cutcopymode = False activecell.offset(1,2).formulaR1C1 = "=IF(((COUNTIF(RC60:RC69,R2C94))>0),R2C98,"""")" 'i had to place this out of the loop because your offset is different from the rest for count = 2 to 9 activecell.offset(0,1).formulaR1C1 = "=IF(((COUNTIF(RC60:RC69,R3C94))>0),R" & count & "C98,"""")"
Bookmarks