Remove entire lines of data that includes "x"

[dssprop]

For example can I highlight an entire section or even an entire page and state remove all line items that include the letter "Z" or that include a space
Example:
I put a command that says remove line items with a space. Line number 4 will be completely deleted because it has a space

1. cookiesnmilk
2. pbnjelly
3. chipsnsalsa
4. chips and salsa

Seems to me like that is possible. Does anyone have any suggestions on how to get that done?

 

[Michael M]

Which column is the data in ??

 

[dssprop]

All the data is in a vertical column could be ABCD... I am hoping I can just click and highlight the entire column and delete entire lines that contain a character space, The report I have shows a person first and last name on one line than the it shows their user name on the next line. So I am going through 1 by 1 and deleting the names because all I need in this report is user name.

 

[Michael M]

Ok, you can use rhis method to decide which column you need to check, without the nneed to select that column
This will delete any row that has a space or a "Z" in the text

Sub MM1()
Dim lr As Long, r As Long, c As String
c = Application.InputBox("Please Insert Column Letter to Search")
lr = Cells.Find("*", , xlValues, , xlRows, xlPrevious).Row
For r = lr To 1 Step -1
If InStr(Cells(r, c), " ") Or InStr(Cells(r, c), "Z") Then
    Rows(r).Delete
End If
Next r
End Sub

If you just want to check for a space ONLY use

Sub MM1()
Dim lr As Long, r As Long, c As String
c = Application.InputBox("Please Insert Column Letter to Search")
lr = Cells.Find("*", , xlValues, , xlRows, xlPrevious).Row
For r = lr To 1 Step -1
 If InStr(Cells(r, c), " ") Then
    Rows(r).Delete
End If
Next r
End Sub