2015-12-01 32 views
-1

我有两个activeX复选框(checkbox7和checkbox10),我希望tickbox旁边显示的标题用Sheet1单元格J13的值进行更改。 J13可以通过IF语句更改数值更改activeX复选框标题的单元格值excel

我试过几件事情。尝试使用我在网上找到的代码,但它是从头创建多个复选框,然后更改标题。我试图隔离他们改变标题并复制它的部分,但那对我没有任何帮助。

这是我现在有:

>  Sheets("Customer View").OLEObjects("CheckBox7").Object.Caption = Sheets("Customer View").Range("J13").Value 
    Sheets("Customer View").OLEObjects("CheckBox10").Object.Caption = Sheets("Customer View").Range("J13").Value 

感谢

+0

你尝试过什么吗?并请分享更多细节。 – Linga

+0

您是否尝试过提供的答案? – EEM

+0

我还没有试过提供的答案。我通过删除标题并简单地链接底层单元,暂时解决了问题 – Klister

回答

0

我最终只是去用最简单的解决方案:保留复选框空白的标题和复选框的位置,使它线与空单元格。然后,我只是使用该单元格来显示我想要的文字。

0

假设代码驻留在片材容纳Customer View在你的程序中插入此代码的工作簿。

With ThisWorkbook.Sheets("Customer View") 
    .CheckBox7.Caption = .Range("J13").Value2 
    .CheckBox10.Caption = .Range("J13").Value2 
End With 
相关问题