MS Excel / VBA help thread

This will be quite cumbersome to achieve in Excel, as you will need to explicitly check each cell in turn and append its location to a string. However, it's pretty straightforward with a few lines of VBA.

This (pretty poor) code makes a list in column A of each blank cell (by column number) in the row (from col B to col U) for rows 1-28. Should be pretty easy to modify

[code]

Sub thingy()

For i = 1 To 28
myStr = ""
For Each c In Range("B" & i & ":U" & i)

If c = "" Then myStr = myStr & ", " & c.Column

Next
Range("A" & i).Value = myStr
Next i

End Sub
[/code]