VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Der Einsatz der SVERWEIS-Funktion in einem Ausgabeblatt

Gruppe

Funktion

Bereich

SVERWEIS

Thema

Der Einsatz der SVERWEIS-Funktion in einem Ausgabeblatt

Problem

Beispiel für ein Ausgabeblatt. Die Steuerung erfolgt über ScrollBars.

Lösung

Darstellung nur anhand einer Beispielarbeitsmappe möglich.




ClassModule: Tabelle1

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
   Dim var As Variant
   If Target.Address <> "$A$1" Then Exit Sub
   Application.EnableEvents = False
   On Error GoTo ERRORHANDLER
   var = Target.Value
   Application.Undo
   Range("A2").Value = Range("A1").Value
   Target.Value = var
ERRORHANDLER:
   Application.EnableEvents = True
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Funktion und SVERWEIS