Delete a specific text in Raw Data

[Moogle03]

I have a set of raw data I export everyday. When I export the data, all the raw data is on 1 column. I have a row that says "2 tickets" and need to delete the "ticket" and "tickets" text before I can add to my access database. I only want the numbers to be intact.

I do not care of the "mobile ticket" will be delete to "mobile."

I have never used VBA or Macros before so any help would be greatly appreciated.


Example:

Lower 109
CC
$20.90
/EA
2 Tickets
Mobile Ticket
5/30/2019
Upper 109
D
$55.90
/EA
1 Ticket
Mobile Ticket
5/29/2019
Floor
1
$100.90
/EA
5 Tickets
Mobile Ticket
5/28/2019

 

[Fluff]

Hi & welcome to MrExcel.
You can do this with the standard Replace funtion in Xl, Ctrl H, but if you want a macro try

Sub Moogle03()
   Range("A:A").Replace "ticket*", "", xlPart, , False, , False, False
End Sub