2017-07-17 150 views
2

我有一本工作簿,其中需要將文本(從單元格)對齊到左側和右側。到目前爲止我有這個,但我不知道如何繼續。在Excel中將文本左右對齊?

Sub M() 

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

End Sub 

我想一般知道如何覆蓋在頭部的每個部分文本對齊,但在這種情況下,我需要有左對齊同時在左,右頭文字。

+0

我承擔的貼碼('ActiveSheet.PageSetup.CenterHeader = ActiveSheet.Range( 「A1」)& 「」 &'和'ActiveSheet你的兩條線。範圍(「B1」)')實際上只是程序中的一行代碼。如果不是,它將不會編譯。 – YowE3K

+0

「將文本(從單元格)向左和向右對齊」 - 您的意思是否合理?如果是,那在Excel中不是一個選項。 –

+0

@TimWilliams Excel將「分佈式」作爲**單元格**格式化選項之一。懷疑它是否可以在標題中使用。 – YowE3K

回答

2

我將您的問題解釋爲「我希望將一個單元格的值作爲我的標題的左側部分,並將另一個單元格的值作爲我的標題的右側部分」。

如果是這樣,你可能想:

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

這就是我的意思,對不起!你說什麼工作,但我不能改變標題的每個部分的水平對齊,任何方式來做到這一點? –

+0

@KevinLópez「LeftHeader」應該是左對齊的,「RightHeader」應該是右對齊的。你想要什麼? (我能想到的唯一的事情可能是(a)你希望兩個「部分」集中在頁面的兩半上,或者(b)你想要左側頭部右對齊,右側頭部向左 - (b)可能是「可行的」,但我懷疑是否選項(a)。) – YowE3K

+0

我想知道一般情況下如何覆蓋對齊方式文本在標題的每個部分,但在這種情況下,我需要在右側和左側標題中將文本對齊到左側。 –

0

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

當然,根據需要調整範圍(多個)。

0

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

要在Excel中執行此操作,請選擇對齊所需的單元格部分。然後,類型ALT + ħ + + 大號爲左,ALT + ħ + + Ç爲中心,和ALT + ħ + + R正確。

但是,根據你的問題,你似乎想在VBA而不是Excel中做到這一點。如果是這種情況,請改爲:

Range(myRange).HorizontalAlignment = xlRight對於右側,和 Range(myRange).HorizontalAlignment = xlLeft左側,其中myRange是單元格的範圍。