Alternative Formulas of CLEAN

Dhinakaran

Board Regular
Joined
Mar 30, 2016
Messages
54
Office Version
  1. 365
  2. 2021
  3. 2016
Platform
  1. Windows
Hello,

I've a data in my sheet here few of the cells contains few special characters which i need to remove/replace with null. Did try with CLEAN while it didn't work.

Below are the cell contents/samples where ðŸˆâ€ resembles kinda emojis. 💧HYDRATING FOOD: The gravy format and moisture content in this kitten wet cat food support hydration
ðŸˆâ€HEALTH BENEFITS: It supports a healthy immune system. Vitamins & minerals for an effective body system. DHA and Omega 3 fatty acids support healthy brain and vision development.
💧HYDRATING FOOD: The gravy format and moisture content in this kitten wet cat food support hydration. ✅QUALITY INGREDIENTS: Whiskas wet cat food is made with real fish, and it is easy to eat and digest.
ðŸŸDELICIOUS FLAVOUR: This cat food contains delicious mackeral flavour and an appealing aroma. 😺COMPLETE AND BALANCED CAT FOOD: Whiskas Wet Cat Food provides 100% complete and balanced nutrition for kittens (2-12 months).

Appreciate your inputs.


TIA,
 

Excel Facts

Why are there 1,048,576 rows in Excel?
The Excel team increased the size of the grid in 2007. There are 2^20 rows and 2^14 columns for a total of 17 billion cells.
Power Query will do the job
VBA Code:
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type text}}),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Changed Type", "Column1", Splitter.SplitTextByEachDelimiter({":"}, QuoteStyle.Csv, false), {"Column1.1", "Column1.2"}),
    #"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"Column1.1", type text}, {"Column1.2", type text}}),
    #"Added Custom Column" = Table.AddColumn(#"Changed Type1", "Custom", each let splitColumn11 = Splitter.SplitTextByDelimiter("’", QuoteStyle.None)([Column1.1]), splitColumn112 = List.Reverse(Splitter.SplitTextByDelimiter("’", QuoteStyle.None)([Column1.1])) in Text.Combine({Text.Middle(splitColumn11{1}?, 1, 3), Text.Middle(splitColumn11{1}?, 6, 1), Text.Middle(splitColumn11{1}?, 4, 1), Text.Middle(splitColumn112{0}?, 5)}), type text),
    #"Removed Columns" = Table.RemoveColumns(#"Added Custom Column",{"Column1.1"}),
    #"Reordered Columns" = Table.ReorderColumns(#"Removed Columns",{"Custom", "Column1.2"}),
    #"Inserted Merged Column" = Table.AddColumn(#"Reordered Columns", "Merged", each Text.Combine({[Custom], [Column1.2]}, ":"), type text),
    #"Removed Columns1" = Table.RemoveColumns(#"Inserted Merged Column",{"Custom", "Column1.2"})
in
    #"Removed Columns1"
 
Upvote 0

Forum statistics

Threads
1,223,893
Messages
6,175,244
Members
452,622
Latest member
Laura_PinksBTHFT

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top