Excel Wiedervorlage mit Untertabelle

Die Wiedervorlage stellt im Büroalltag hohe Anforderungen an diejenigen Personen, die eine große Anzahl von Vorgängen zu verwalten haben.

Eine gute Wiedervorlage berücksichtigt u.a. folgende Arten der Wiedervorlage:

Sicherlich gibt es Software-Produkte, die auch ganz besondere Einzelfälle berücksichtigen. Der Aufwand sich in diese Systeme einzuarbeiten ist jedoch sehr groß und in vielen Fällen werden die Funktionen am Ende deshalb nicht benutzt.

Die hier vorgestellte Excel-Datei arbeitet mit nur zwei Tabellenblättern:

Die nachfolgende Datei enthält die praktische Lösung. Bitte beachten Sie, dass die Datei in Tabellenblatt „Aufgaben“ ein VBA-Makro enthält, um die Doppelklick-Funktion auslösen zu können. Sie erhalten daher beim ersten Start eine Sicherheitswarnung, die Sie bestätigen müssen.

Download der Excel-Datei "Wiedervorlage mit Untertabelle " hier klicken.

Wenn Sie Fragen zur Bedienung haben, können Sie sich gerne per E-Mail an den Autor wenden.

Quellcode des Tabellenblatt „Aufgaben“

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   
  If Target.Column = 1 Then
     Tabelle3.Range("A2").Value = Target.Value
     Target.Copy
  End If

'Alternative Variante mit Doppelklick
'Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   
  ' Tabelle3.Range("A2").Value = Target.Value
  ' Target.Copy
  ' Cancel = True

  If Tabelle2.AutoFilterMode Then
     Tabelle2.AutoFilterMode = False
  End If
  
  If Not ActiveSheet.AutoFilterMode Then
     Tabelle2.Range("A1").AutoFilter
     Tabelle2.Range("A1").AutoFilter 1, Tabelle3.Range("A2").Value
  End If


End Sub

Erläuterung:


Autor: Andreas Heil
Artikel aktualisiert am: -
Artikel erstellt am: 10.05.2024