我想为按钮编写正确的代码,以便发送"或者"粘贴"或"选择"无论是在单元格F9中还是"发送它"或者"粘贴"或任何细胞D9。
以下是点击按钮内部代码的一部分,第二行(最后一行)是我遇到问题的部分:
ActiveCell.Offset(0, 1).Value = Me.cboDept3.Text 'set col
ActiveCell.Offset(0, 3).Value = Range("F9").Select 'set col
答案 0 :(得分:0)
使用值而不是.Select
ActiveCell.Offset(0, 1).Value = Me.cboDept3.Text 'set col
ActiveCell.Offset(0, 3).Value = Range("F9").Value 'set col