Office: Excel Protokoll begrenzen

Helfe beim Thema Excel Protokoll begrenzen in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Guten Tag zusammen, ich habe für ein Excel-Tabellenblatt ein Modul das mir "Protokoll" über Veränderungen führt. Tabellenblatt1 = Eingabe Formular... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Silverstream, 6. April 2022.

  1. Silverstream Erfahrener User

    Excel Protokoll begrenzen


    Guten Tag zusammen,

    ich habe für ein Excel-Tabellenblatt ein Modul das mir "Protokoll" über Veränderungen führt.

    Tabellenblatt1 = Eingabe Formular
    Mit folgendem Befehl: ProtokollSchreiben Target

    Tabellenblatt2 (tblProtokoll) = Protokoll Blatt

    Modul:
    Sub ProtokollSchreiben(ByVal Target As Range)
    Dim rngP As Range

    If Not Target.Parent Is tblProtokoll Then
    Set rngP = tblProtokoll.UsedRange 'benutzten Bereich ermitteln, damit die letzte Zeile gefunden wird
    Set rngP = rngP.Offset(rngP.Rows.Count) 'um bisherige Zeilenzahl verschieben
    Set rngP = rngP.Resize(1) 'auf eine Zeile reduzieren


    'jetzt schreibe ich die Informationen hinein:
    rngP.Cells(1).Value = Target.Parent.Name
    rngP.Cells(2).Value = Target.AddressLocal
    rngP.Cells(3).Value = Target.Parent.Cells(Target.Row, 1).Value
    rngP.Cells(4).Value = Target.Parent.Cells(Target.Row, 3).Value
    rngP.Cells(5).Value = Target.Value
    rngP.Cells(6).Value = Now()
    End If
    End Sub

    Sobald ich also in Blatt 1 etwas verändere schreibt es mir ins Blatt2 (ProtokollBlatt) die Veränderungen.


    Mein Frage:
    Kann ich das auf bestimmte Spalten begrenzen?
    Sprich das Makro soll nur ausgeführt werden wenn sich ein Wert in Spalte A oder C ändert?

    Danke schonmal

    Grüße

    Silver
     
    Silverstream, 6. April 2022
    #1
  2. Exl121150 Erfahrener User
    Hallo Silver,

    du hast uns etwas Entscheidendes unterschlagen, nämlich das Event-Callback-Makro, das auf das Change-Event entweder der Arbeitsmappe oder des Arbeitsblattes "Blatt 1" reagiert.
    Es müsste entweder im Codemodul "DieseArbeitsmappe" (bzw. "ThisWorkbook") oder im Codemodul "Blatt1" (bzw. "Tabelle1" bzw. "Sheet 1") enthalten sein.
    Genau dieses Makro müsste angepasst werden, damit nur geänderte Target-Ranges, die sich in Spalte A bzw. C von Blatt 1 befinden, protokolliert werden.
     
    Exl121150, 6. April 2022
    #2
    1 Person gefällt das.
  3. Silverstream Erfahrener User
    Danke für die schnelle Antwort,

    jop in der Tabelle1 steht:
    ProtokollSchreiben Target
     
    Silverstream, 6. April 2022
    #3
  4. Exl121150 Erfahrener User

    Excel Protokoll begrenzen

    Hallo,

    im Codemodul von Arbeitsblatt "Tabelle1" habe ich das Change-Event-Behandlungsmakro wie folgt geändert:
    Code:
    Option Explicit
    
    Private Sub Worksheet_Change(ByVal Target As Range)
       Dim SpNr As Long
       SpNr = Target.Column
       If SpNr = 1 Or SpNr = 3 Then
          ProtokollSchreiben Target
       End If
    End Sub
    

    d.h. nur wenn in Spalte A bzw. C eine Zellwertänderung eintritt, wird das Protokollmakro ausgeführt.

    In alle verwendeten Codemodule habe ich als erste Zeile "Option Explicit" eingefügt.
    Geänderte Datei liegt bei.
     
    Exl121150, 6. April 2022
    #4
    1 Person gefällt das.
  5. Silverstream Erfahrener User
    Recht Herzlichen Dank!
     
    Silverstream, 6. April 2022
    #5
Thema:

Excel Protokoll begrenzen

Die Seite wird geladen...
  1. Excel Protokoll begrenzen - Similar Threads - Excel Protokoll begrenzen

  2. Zahlenformat

    in Microsoft Excel Hilfe
    Zahlenformat: Excel in der Schweizer Formatierung hat Zahlen wie z.B.: 10'000.00. Ein Apostroph für's 1000-er Trennzeichen. Einen Punkt nach der Ganzzahl. Mit Office 2021 kann ich nun nicht mehr nach...
  3. Excel-Zellbereich mit Formatierung aber ohne Formeln nach Visio

    in Microsoft Excel Hilfe
    Excel-Zellbereich mit Formatierung aber ohne Formeln nach Visio: Hallo, ich möchte einen Zellbereich aus Excel in eine Visio-Datei einbinden. Zur Zeit mache ich das so: Per Makro wird der gewünschte Bereich in Excel kopiert: Sub Rack_A() ' ' Rack A Makro '...
  4. Excel Tabelle online stellen

    in Microsoft Excel Hilfe
    Excel Tabelle online stellen: Ich möchte eine Excel Tabelle, hier en Dienstplan, für die Mitglieder online stellen. Die Tabelle soll von jedem Mitglied bearbeitet werden können. Kostenlose Lösungen bitte.
  5. Bedingte Fomatierung immer 1. Montag im Monat

    in Microsoft Excel Hilfe
    Bedingte Fomatierung immer 1. Montag im Monat: Hallo zusammen bei einer Checkliste muss ich gewisse Arbeiten nicht Wöchentlich, sondern monatlich ausführen. Jetzt suche ich eine Formel, damit es mir automatisch zBsp. den 1. Montag oder 2....
  6. Excel Summe bilden wenn bestimmtes Wort und Zahl in eine Zelle vorhanden

    in Microsoft Excel Hilfe
    Excel Summe bilden wenn bestimmtes Wort und Zahl in eine Zelle vorhanden: Hallo liebe Gemeinde, ich habe ein Problem. Ich möchte eine Summe bilden, wenn ein bestimmtes Wort in der Zelle vorhanden ist (die Zahl für die Summe ist ebenfalls in dieser Zelle): jede Zeile...
  7. Format Übertragung im Microsoft Word und Excel

    in Microsoft Word Hilfe
    Format Übertragung im Microsoft Word und Excel: Die neue Funktion der Übertragung des Formats wird dazu gebraucht, um Formatierungen von Textbausteinen auf andere Texte im Microsoft Office 2021 Professional Plus anzuwenden. Damit werden mehrere...
  8. Telefonnummer Formatieren

    in Microsoft Excel Hilfe
    Telefonnummer Formatieren: Hallo Zusammen Ich habe gesehen, dass es schon Beiträge zu dem Thema gibt, aber leider bin ich nicht besonders gut im Umwandeln von Formeln. Ich hoffe, Ihr könnt mir helfen. Ich habe eine Liste...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden