Macro won't work to delete blank spaces

[dilleyo725]

Hello,

I'm trying to run a macro to delete blank values before and after data that I copied (from our online system) and pasted into excel, however it will not work. I've tested on values that I've manually entered in and put spaces before and after and it seems to run fine, which leads me to believe that the code works fine. Is there something in the data from copying from the web and pasting into excel that's causing the problem?

I also tried clearing all formats and also tried using a trim function but still no luck.

Also, does anyone have a macro to remove blank spaces from uneven data strings?
I appreciate any help on this.

edit: I just tested it on my computer at home, using Excel 2007, and it seems to be working. Would the macro code be different for different versions of excel?

 

[Prashod]

I use this one to delete empty rows<?xml:namespace prefix = o ns = "urn:schemas-microsoft-comfficeffice" /><o></o>
you might want to play around this one<o></o>
<o></o>
Sub Delete()
Dim a As Long
For a = Cells(Rows.Count, 5).End(xlUp).Row To 1 Step -1
If InStr(Cells(a, 5), "") = 0 Then
Rows(a).EntireRow.Delete
End If
Next a
End Sub<o></o>
<o> </o>
FYI<o></o>
it looks in the 5th column and if the cell is empty in that column it deletes the complete row<o></o>