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 = xlHAlignCenter             End Select         End With     Next     Set rCell = Nothing End Sub

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

注意：

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

点击此处在新的浏览器标签中打开该特殊页面。

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

本技巧（3131）适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面（Excel 2007及更高版本）找到本技巧的版本：

从CSV导入时对齐单元格。