Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Cursor in bestimmtem Zellbereich in Eieruhr verwandeln

Gruppe

SelectionChange

Problem

Wie kann ich den Cursor immer dann, wenn er sich in den Spalten D:F befindet, in eine Eieruhr verwandeln?

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

ClassModule: Tabelle1

Private Sub Worksheet_SelectionChange( _
   ByVal Target As Excel.Range)
   If Target.Column > 3 And Target.Column < 7 Then
      Application.Cursor = xlWait
   Else
      Application.Cursor = xlDefault
   End If
End Sub