Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveSheet.Shapes(1).TextFrame2.TextRange.Characters.Text = Target.Text End Sub
excel单元格数据与文本框数据同步
猜你喜欢
转载自www.cnblogs.com/taoyuanming/p/11390217.html
今日推荐
周排行