Hallo liebes Forum,
habe eine einfache Frage.
Möchte beim anklicken einer Zelle einen Text einbenden lassen und die Zelle blockieren.
Hallo liebes Forum,
habe eine einfache Frage.
Möchte beim anklicken einer Zelle einen Text einbenden lassen und die Zelle blockieren.
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Locked Then MsgBox "Pfoten weg!", vbCritical
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Text As String
Text = "Pfoten weg, weil"
MsgBox Text
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "Sie haben folgende Zelle(n) ausgewählt: " & Target.Address(0, 0)
End Sub
Gruß Daniel
Zellen vorbereiten:
VBA-Editor öffnen:
VBA-Code einfügen:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "Pfoten weg, weil das darf nur ich ;-)"
ElseIf Target.Address = "$A$2" Then
MsgBox "Pfoten weg, weil das darf nur Harald"
End If
End Sub
Schutz aktivieren (optional):
Problem: Die Meldung erscheint bei jedem Klick auf eine Zelle.
If Target.Address
) korrekt auf die gewünschten Zellen verweisen.Problem: Ich kann die Zellen nicht formatieren.
Kommentare verwenden:
Infotext in Zelle:
Beispiel für eine Excel-Datei:
Verwende benutzerdefinierte Formate, um den Text in Zellen nur anzuzeigen, wenn bestimmte Bedingungen erfüllt sind.
VBA optimieren:
Fehlermeldungen anpassen:
1. Kann ich mehrere Zellen mit unterschiedlichen Hinweisen gleichzeitig steuern?
Ja, das ist möglich. Du kannst die If
-Bedingungen im VBA-Code entsprechend anpassen, um verschiedene Hinweise für mehrere Zellen zu definieren.
2. Ist der Blattschutz notwendig, um den Hinweistext anzuzeigen? Nein, der Blattschutz ist nicht erforderlich, um den Hinweistext einzublenden. Er dient lediglich dazu, die Zellen vor Änderungen zu schützen.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen