Collapse column

Beiträge anzeigen

Diese Sektion erlaubt es dir alle Beiträge dieses Mitglieds zu sehen. Beachte, dass du nur solche Beiträge sehen kannst, zu denen du auch Zugriffsrechte hast.


Nachrichten - Maltitol

Seiten: [1]
1
Excel / Excel sehr langsam bei vielen Steuerelementen...
« am: Januar 25, 2019, 11:00:34 Vormittag »
Guten Morgen zusammen,
ich habe ein Problem mit meiner Exceltabelle in der ganz viele Steuerelemente vorhanden sind, und zwar ist Excel schnarch langsam geworden weil die ganzen Steuerelemente immer aufgebaut werden müssen. Es geht um ein eine Checkbox wo ein Haken drin ist oder nicht.

Dies würde ich gerne ändern:
Bei einem Klick in eine Zelle soll die Zelle einfach mit einem Wingding Symbol gefüllt werden.

Dafür habe ich im Netz folgenden Code gefunden:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
    If Range("a1") <> "" Then
        If Asc(Left(Range("a1"), 1)) = 253 Then Range("a1") = Chr(254) Else Range("a1") = Chr(253)
    Else: Range("a1") = Chr(253)
    End If
End If

Das Funktioniert in der Zelle A1 auch sehr gut. Aber wie kann ich den Code umschreiben das er auf einen Bereich von ich sag mal A1 bis C5 gilt ?

Hat da jemand eine Idee?

Ich wäre über jede Hilfe sehr Dankbar. Ich bin noch neu in der VBA Programmierung.

Viele Grüße

Seiten: [1]