Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Bewerten Sie hier bitte das Excel-Portal
Home Zurück Vor
Download Beispiel-Arbeitsmappe

Thema

Bei Eingabe von "x" Zelle unterhalb in fett

Gruppe

Change

Problem

Wie kann ich veranlassen, dass bei der Eingabe eines x die Zelle unterhalb als fett formatiert wird und diese Formatierung bei einer anderen Angabe wieder aufgehoben wird?

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.

ClassModule: Tabelle2

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column > 2 Then Exit Sub
   If Target.Value = "x" Then
      Target.Offset(2, 0).Font.Bold = True
   Else
      Target.Offset(2, 0).Font.Bold = False
   End If
End Sub

Beiträge aus dem Excel-Forum zu den Themen Ereignis und Change

Msg mit 2 Ereignissen +Cancel
Ereignisprozedur
Worksheet_Change auf 2 Zellen anwenden
Mit Change() o. Calculate() Filtern und Drucken
Grafik nach Change in Exceltabelle laden
Makro für ereignisabh. Druck verschiedener Seiten
UF Activate / Initialize Ereignis
Namen definiert- in Ereignis verwenden?
Mail Exchange Server
Workbook_SheetChange löscht Zwischenspeicher ...
On Worksheet Change - simulieren?!
ChangeFileAccess
Zeilen aus- einblenden als Ereignis?
Welches Ereignis ist das richtige ??
Ereignis Arbeitsblatt sperren abfangen
Worksheet_SelectionChange
Ereignisprozedur f. Multipage-Reiter
Frage zum Change ereignis
Fehler bei Changelink
Worksheet_SelectionChange bzw. Interior
Change
Kein Change in Combobox erlauben(wenn false)
Überprüfung von Zellen mit Worksheet change
SheetChange_Endlosschleife
Change-Ereignis in Combobox unterdrücken
Combobox Ereignis
Userform, Ereignis deklarieren im Klassenmodul
Bei "Worksheet_Change" aktuelles Datum in J3
Worksheet_Activate() / Worksheet_Change()
Warum kann ich nicht Worksheet_Change
Welches Diagramm-Ereignis?
Bestimmtes Ereignis in Spalte zählen
Command Button Ereignis
Ereignis von Laufzeit-Checkbox
change-ereignis bei dynamischen Controls / Teil 2
Change Ereignis verhindern
Workcheet-Change / Schleife.....
change-ereignis bei dynamisch erstellten Controls
Worksheet_Change auf Spalten beschränken
Worksheet_Change ohne aktive Zelleingabe
Private Sub Worksheet_Change(ByVal Target As Range
For Each CheckBox, Change Value
Change(ByVal Target as range
ComboBox.Change - ComboBox.Load Problem
Zwei Mal If inersect Ranges nach Worksheet change
Schaltfläche - Ereignis erst nach Bestätigung ausl
SelectionChange - Change - Reihenfolge?
Schleife bei Worksheet_Change
Objekt_Error - Ereignis in UserForm
"Private Sub Worksheet_Change" deaktivieren