2011-05-20 93 views
-1

我想知道是否有人可以幫我解決以下問題。在Excel電子表格中,我有以下內容。Excel複製格式

Column A   Column B     Column C 


Header 1   detail       detail 
        detail       detail 
Count 



Header 2   detail       detail 
        detail       detail 
Count 


Grand Total 

有什麼辦法一個完全非技術人員使用的標題1和標題2格式,而無需插入一行,並做手工來創建頭3?即

Column A   Column B     Column C 


Header 1   detail       detail 
        detail       detail 
Count 



Header 2   detail       detail 
        detail       detail 
Count 



Header 3   detail       detail 
        detail       detail 
Count 


Grand Total 

由於

+0

你想保留數字格式或單元格的顏色和類似的東西? – jonsca 2011-05-20 11:05:38

+0

是的格式仍然是需要的。 – damien535 2011-05-20 15:53:32

+0

目前尚不清楚OP是否希望通過手動插入,手動格式或兩者兼而有之進行保存。 – 2013-12-10 13:10:27

回答

0

這是非常粗略的,但它是十一個首發:

創建工作簿中的此宏。每次運行它時它會創建一個新的行,通過右鍵中的「X列」

Private m_intHeaderCount As Integer 

Sub InsertRow() 
    Dim intRowToInsert As Integer 
    m_intHeaderCount = m_intHeaderCount + 1 
    intRowToInsert = ((m_intHeaderCount - 1) * 3) + 1 
    Rows(CStr(intRowToInsert) & ":" & CStr(intRowToInsert)).Select 
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove 
    Range("A" & CStr(intRowToInsert + 1)).Select 
    ActiveCell.FormulaR1C1 = "Column " & CStr(m_intHeaderCount) 
    Range("A1").Select 
End Sub 
2

只是複製單元格放(通過CTRL + ç或通過編輯菜單),並使用Paste Special(可點擊目標單元格)會彈出一個對話框,告訴你想要複製到新的單元格(值,公式,格式等)。

+0

我想這允許複製格式(例如),但它不能保存手動插入行,因爲OP可能已經請求(實際上不清楚他是否想要保存手動插入,手動格式或兩者)。 – 2013-12-10 13:08:40