Marinos经常处理CSV文件。在他的案例中，CSV文件是由自定义应用程序创建的，他发现他甚至可以在其中包含公式。因此，如果CSV文件的一行包含“ ,, Total：，= SUM（D5：D13）,,,,”，该公式将被评估并且一切都很好。

但是，Marinos想要做的一件事是在CSV文件中指出将单个单元格导入Excel后应如何证明其合理性。

他似乎记得，在Lotus 123中，他可以使用前缀字符来指示单元格的对齐方式（’表示左边，^表示中间，“

表示右边”），他认为在Excel

||；导入的数据的对齐基于系统默认值，例如，文本左对齐，数字右对齐。但是，可以添加前缀字符，然后可以稍后使用宏“解析”以应用所需的对齐方式，例如，可以将“ <”用于左侧，将“ ^”用于中心，将“>”用于右侧。当Excel导入CSV文件时，这些字段被视为文本，然后可以运行此宏以搜索前导对齐字符并执行所需的操作：

Sub SetJustification()

Dim rCell As Range

For Each rCell In ActiveSheet.UsedRange         With rCell             Select Case Left(.Value, 1)

Case "<"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignLeft                 Case "^"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignCenter                 Case ">"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignRight             End Select         End With     Next     Set rCell = Nothing End Sub

|| |。 ||||宏检查工作表中的每个单元格，如果该单元格以对齐字符开头，则该字符将被删除，并进行正确的对齐被申请;被应用。

注意：

如果您想知道如何使用此页面（或_ExcelTips_网站上的任何其他页面）中描述的宏，我准备了一个特殊页面，其中包含有用的信息。

链接：/ excelribbon-ExcelTipsMacros [点击此处在新的浏览器标签中打开该特殊页面]。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧（8709）适用于Microsoft Excel 2007、2010、2013、2016、2019和Office 365中的Excel。您可以在此处找到适用于Excel的较早菜单界面的本技巧的版本：

链接：/ excel-Aligning_Cells_when_Importing_from_CSV [从CSV导入时对齐单元格]。