標題: [發問] 輸入下一格複製上一格的格式(二個表格名稱) [打印本頁]

---

作者: kkooo15    時間: 2016-12-20 19:59     標題: 輸入下一格複製上一格的格式(二個表格名稱)

輸入下一格複製上一格的格式
我發現格式會複製..但底色不會複製
因為表有二個名稱.只會前面動後面不動

[attach]26126[/attach]

---

作者: kkooo15    時間: 2016-12-27 21:15

回復 1# kkooo15


Sub 巨集1()

    Range("施工[[#Headers],[報價日期]]").Select
    Selection.End(xlDown).Select
    Range("B6").Select
    ActiveCell.FormulaR1C1 = "1"
    Range("B4").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlToRight)).Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False
    Selection.End(xlDown).Select
End Sub

為什麼無法將格式複製....

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)