这只是我的代码的一部分。来自此处文本框的值已被复制到“银行证明”工作表中的特定单元格中。无论我在文本框中输入的文本长度如何,我都需要确保专门安装了单元格C5。我尝试与单元格交换范围无济于事。这个问题看起来很简单,但我不知道为什么它不起作用...
Dim counterparty As String
counterparty = Sheet1.txt1.Text
Range("C5").Value = counterparty
Sheets("Bank Certification").Select
Range("C5").Select
Selection.AutoFit
最佳答案
尝试
Dim counterparty As String
counterparty = Sheet1.txt1.Text
Range("C5").Value = counterparty
Sheets("Bank Certification").Select
Columns("C:C").Autofit