当前位置:编程学习 > VB >>

如何把合并的单元格值赋给没有合并的单元格。

各位大虾行好吧。
在同一个工作薄中,其中一个SHEET1中A1:A6,A7:A13.....是各个单元格合并的,那么如何把SHEET1中的A1:A6,A7:A13.../值赋给SHEET2中的A5,A6....?。

我写一段VB 可是出现的结果是把SHEET2的A1:A6自动合并后才把SHEET1中的A1:A6的值赋过去了。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Sheet1.Range("A1:A6").Copy Destination:=Sheet4.Range("A5")
End Sub

谢谢!! --------------------编程问答-------------------- 合并单元格的值保存在合并区域的第一个单元格里,sheet2.cells(5,1).value=sheet1.cells(1,1).value。 --------------------编程问答-------------------- 好像行,运行无反应,能把合部的代码贴上吗?
谢谢 --------------------编程问答--------------------

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Sheet4.Range("A5") = Sheet1.Range("A1:A6").Value
 Sheet4.Range("A6") = Sheet1.Range("A7:A13").Value
End Sub

补充:VB ,  VBA
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,