Save you some typing... use find and replace with your column name.
Table.ReplaceValue(#"Col 1", each [YOURCOLUMN],
each if [YOURCOLUMN] ="STREET" then "ST"
else if [YOURCOLUMN] ="ROAD" then "RD"
else if [YOURCOLUMN] ="DRIVE" then "DR"
else if [YOURCOLUMN] ="COURT" then "CT"
else if [YOURCOLUMN] ="LANE" then "LN"
else if [YOURCOLUMN] ="BOULEVARD" then "BLVD"
else if [YOURCOLUMN] ="EXPRESSWAY" then "EXPY"
else if [YOURCOLUMN] ="EXTENSION" then "EXT"
else if [YOURCOLUMN] ="FREEWAY" then "FWY"
else if [YOURCOLUMN] ="HIGHWAY" then "HWY"
else if [YOURCOLUMN] ="ROUTE" then "RTE"
else if [YOURCOLUMN] ="TERRACE" then "TER"
else if [YOURCOLUMN] ="TRAILER" then "TRLR"
else if [YOURCOLUMN] ="AVENUE" then "AVE"
else if [YOURCOLUMN] ="CIRCLE" then "CIR"
else if [YOURCOLUMN]="PARKWAY" then "PKWY"
else if [YOURCOLUMN]="EXPRESSWAY" then "EXPY"
else if [YOURCOLUMN]="TRAIL" then "TRL"
else if [YOURCOLUMN] ="APARTMENT" then "APT"
else if [YOURCOLUMN]="BUILDING" then "BLDG"
else if [YOURCOLUMN]="FLOOR" then "FL"
else if [YOURCOLUMN]="SUITE" then "STE"
else if [YOURCOLUMN]="CIRCLE" then "CIR"
else [YOURCOLUMN],Replacer.ReplaceText, {"YOURCOLUMN"})