请高手帮忙:求一段excel vba 宏代码

2024-11-08 08:50:51
推荐回答(2个)
回答(1):

Sub abc()
Set x = Application.InputBox("请选择一个单元格", Type:=8)
MsgBox "这个单元格的值是" & x.Value
End Sub
运行后,会弹出一个输入窗口,用鼠标选择一个单元格后按“确定”按钮,代码会继续执行。

回答(2):

1.在数据区域按ctrl+*选定整个数据区域,复制
2.在一个空表A1点右键 选择性黏贴 转置 确定