在Excel中左右对齐文本?

时间:2017-07-17 20:30:04

标签: excel vba

我有一个工作簿,我需要将文本(从单元格)对齐到左边和右边。到目前为止,我有这个,但我不知道如何继续。

Sub M()

ActiveSheet.PageSetup.CenterHeader = ActiveSheet.Range("A1") & " " & 
ActiveSheet.Range("B1")

End Sub

我想知道如何覆盖标题各部分中文本的对齐方式,但在本例中,我需要在左右标题中左对齐文字。

5 个答案:

答案 0 :(得分:3)

要在Excel中执行此操作,请选择对齐所需的单元格部分。然后,为左键输入 alt + H + A + L alt +中心为 H + A + C alt + H + A + R 为右。

但是,根据您的问题,您似乎希望在VBA而不是Excel中执行此操作。如果是这种情况,请改为:

Range(myRange).HorizontalAlignment = xlLeft代表权利,和 var view = keystone.View(req, res); 表示左侧,其中myRange是单元格的范围。

答案 1 :(得分:2)

我将您的问题解释为"我希望将一个单元格的值作为标题的左侧部分,将另一个单元格的值作为标题的右侧部分"

如果是这样,你可能想要:

Sub M()
    With ActiveSheet.PageSetup
        .LeftHeader = ActiveSheet.Range("A1").Value
        .CenterHeader = ""
        .RightHeader = ActiveSheet.Range("B1").Value
    End With
End Sub

答案 2 :(得分:1)

Range的Horizo​​ntalAlignment属性应该是您要查找的内容。 xlLeft或xlRight是左对齐或右对齐的值。

Range.HorizontalAlignment = xlLeft 

Range.HorizontalAlignment = xlRight

E.G。

Sub M()

ActiveSheet.PageSetup.CenterHeader = ActiveSheet.Range("A1") & " " & 
ActiveSheet.Range("B1").HorizontalAlignment = xlRight

End Sub

将B1细胞对齐到右边。

答案 3 :(得分:1)

我发现您可以使用.api居中/左/右对齐。

  • 将单元格的Horizo​​ntalAlignment属性的值设置为:
    • 居中对齐,我们将Horizo​​ntalValue设置为-4108;
    • 右对齐,我们将Horizo​​ntalValue设置为-4152;
    • 左对齐,我们将Horizo​​ntalValue设置为-4131;

会是什么样子

{{1}}

答案 4 :(得分:0)

您可以使用Range("A1").HorizontalAlignment = xlLeft... = xlRight

当然,根据需要调整范围。