' Copy range on wb1
wb1.Sheets("Detail").Range("B" & j & ":BS" & j).Copy
' Paste special values only to range on wb2
wb2.Sheets("Detail").Range("B" & i & ":BS" & i).PasteSpecial Paste:=xlPasteValues
' Copy row above
wb2.Sheets("Detail").Range("B" & (i - 1) & ":BS" & (i - 1)).Copy
' Paste special formats only
wb2.Sheets("Detail").Range("B" & i & ":BS" & i).PasteSpecial Paste:=xlPasteFormats