首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VBA >

求教 Excel 行转列,该怎么解决

2012-02-11 
求教 Excel 行转列现有列表想把行列互换里面单元格有公式copy选择性复制的话原表格还在,单元格内容的公式

求教 Excel 行转列
现有列表想把行列互换
里面单元格有公式
copy选择性复制的话原表格还在,单元格内容的公式位置也改变了。
请问 有什么其他方法实现

[解决办法]
复制->选择性粘贴->1)勾选公式和数字格式
2)勾选转置
[解决办法]
我也有此问题。
[解决办法]
[code=VBScri]
For b = 1 To 16
    For a = 1 To 12
      Sheet2.Cells(a + 3 + 12 * (b - 1), 3) = Sheet1.Cells(2 + 5 * (b - 1), a + 1)
      Sheet2.Cells(a + 3 + 12 * (b - 1), 4) = Sheet1.Cells(3 + 5 * (b - 1), a + 1)
      Sheet2.Cells(a + 3 + 12 * (b - 1), 5) = Sheet1.Cells(4 + 5 * (b - 1), a + 1)
      Sheet2.Cells(a + 3 + 12 * (b - 1), 6) = Sheet1.Cells(5 + 5 * (b - 1), a + 1)       
Next
Next[/code]
代码供你参考,把表格1的值赋值给表格2。
[解决办法]
对于公式你想如何变化?举例说明。

QQ群 48866293 OFFICE应用挖掘 
MS OFFICE(ACCESS\EXCE\WORD等应用技术探讨与交流!技术群,请阅群论坛中的《踢人规则》

热点排行