[英]Need help in Excel macro for merged cells
你可以使用.MergeCells = False看看下面這個例子:
Sub merge_Bouton1_Clic()
With Range("A1:C1")
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Range("A1").Copy
Range("B1:C1").PasteSpecial xlPasteValues
Application.CutCopyMode = xlCopy
End Sub
[結果]:
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.