Chr

[nosense]

If Cells(i, 6) = Sheets("Machining").Range("j10") And Sheets(tab1).Cells(i, 12) = "As wound" Then
Let myrange = "f" & i + 1 & ":" & "f" & i + gr

For Each cell In Range(myrange)
cell.Value = Sheets("Machining").Range("J10") & "." & Chr(56 + i)
i = i + 1

Next cell
End If

[FDibbins]

1. Is there a question in there some where?

2. Please use code tags when posting code

3. Please rename your thread to something that actually describes your problem

[shg]

Please take a few minutes to read the forum rules, and then amend your thread title accordingly and edit your post to add CODE tags.

You might also consider telling us what you're trying to do, and what your question is.

Thanks.