So ändern Sie die Beschriftung des ActiveX-Kontrollkästchens für den Zellenwert Excel

1016
Klister

Ich habe zwei ActiveX-Ankreuzfelder (Ankreuzfeld7 und Ankreuzfeld10) und ich möchte, dass die neben dem Ankreuzfeld angezeigte Beschriftung mit dem Wert der Zelle J13 von Sheet1 geändert wird. J13 kann den Wert durch eine IF-Anweisung ändern

Ich habe ein paar Dinge ausprobiert. Ich habe versucht, einen Code zu finden, den ich online gefunden habe, aber es war das Erstellen mehrerer Kontrollkästchen von Grund auf und das Ändern der Beschriftung. Ich habe versucht, den Teil zu isolieren, an dem sie die Bildunterschrift ändern und sie duplizieren, aber das hat mir nichts gebracht.

Das habe ich jetzt:

> 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 

Vielen Dank

0

2 Antworten auf die Frage

0
Gary's Student

In der Funktion Range () fehlen einige Anführungszeichen :

Sub qwerty() With Sheets("Customer View") .OLEObjects("CheckBox7").Object.Caption = .Range("J13").Value End With End Sub 
Whoops, ich habe es geändert, aber es funktioniert immer noch nicht. Ich bekomme keine Fehler, es macht einfach nichts. Klister vor 8 Jahren 0
0
Klister

Ich habe schließlich die einfachste Lösung gewählt: Lassen Sie die Beschriftung der Checkbox leer und positionieren Sie die Checkbox so, dass sie mit einer leeren Zelle in einer Reihe steht. Dann verwende ich diese Zelle, um den gewünschten Text anzuzeigen.