【发布时间】:2019-02-01 19:36:35
【问题描述】:
我有一张运行着数百个用户窗体和宏的工作表。当我在用户窗体的文本框中或直接在有问题的单元格中输入数字时,它会用一个值填充一个单元格,但是在我单击文本框后,该单元格会自动变为 TRUE。如果我用预期值覆盖 TRUE 值,则单元格将更改为数字,但是引用此单元格的方程式无法识别此值。我只在几个单元格上遇到问题,其余的似乎不受此影响,并且都有相同的引用、宏等引用它们。
对可能导致此问题的原因或解决此问题的方法有任何建议吗?我尝试过创建新工作表、从没有此问题的区域复制等,但我一直遇到此问题。
这是适用于受影响区域的代码的 sn-p:
'Element Deficiency Matrix (1a to 3k)
With Worksheets("Abutment Data")
For Each row In .Range("A2:J4").Rows
For Each cell In row.Cells
Set check = Me.MultiPage1.Pages(0).Controls.Add("Forms.Textbox.1")
With check
.ControlSource = "'" & cell.Parent.Name & "'!" & cell.Address(RowAbsolute:=False, ColumnAbsolute:=False)
.Left = Left
.Font.Size = 6
.Top = Top
.Width = 20
.Height = 12
.BackColor = &HF6F6F6
.BackStyle = fmBackStyleOpaque
.BorderStyle = fmBorderStyleSingle
.SpecialEffect = fmSpecialEffectFlat
Left = Left + 24
End With
Next
Left = 28
Top = Top + 24
Width = Width
Next
End With
谢谢。
【问题讨论】:
-
我猜你在
ControlSource引用的单元格中有公式和/或在引用和更改同一个单元格的不同单元格中有一个公式,和/或你Worksheet_Change事件中发生了一些事情,该事件在文本框设置后更改了值。 -
感谢您的建议!我检查了 Worksheet_Change 并没有发现任何东西。受影响的单元格中没有公式,也没有先例公式。我跟踪了所有从属单元格,也没有发现任何影响它的公式。