xladept, who is "Nanner?"

This worked, too! Thanks! However, I am not too familiar with the "Sub SplitLongData(): Dim D" statement.