Try this
Data ... Get Data .. From Other Sources ... Blank Query .... Advanced Editor ...
Paste below over everything in box
let Source = Folder.Files("C:\directory\subdirectory\"),
#"Filtered Rows" = Table.SelectRows(Source, each ([Extension] = ".csv")),
#"Removed Other Columns" = Table.SelectColumns(#"Filtered Rows",{"Content", "Name"}),
CSVtoTable= Table.TransformColumns(#"Removed Other Columns", {{"Content", each Csv.Document(_)}}),
MaxColumns = List.Max(List.Transform(CSVtoTable[Content], each Table.ColumnCount(_))),
#"Expanded Content" = Table.ExpandTableColumn(CSVtoTable, "Content", List.Transform({1..MaxColumns}, each "Column" & Number.ToText(_)))
in #"Expanded Content"
Change row 1 to reflect the path where your files will be stored
Hit 'Done'
What it does is
(a) read in all files in your specified location (b) filter for CSV files (c) erase extra columns (d) Convert each CSV file into its own table (e) count how many columns the tables have so that we know how many columns to expand to (f) expand the tables
Complete any additional transformations you need then do Close And Load