Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1364to1368
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1364to1368
1364to1368
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA - zählen wie oft Zelle kopiert wurde

VBA - zählen wie oft Zelle kopiert wurde
23.06.2014 13:10:23
tobwo
Hallo liebe Profis,
ich stehe vor folgendem Problem: Kann ich per VBA erkennen, wie oft eine Zelle kopiert (CTRL+C) wurde und diese Zahl ein einer Zelle aktuell - idealerweise nach "Kopier-Tag" abbilden?
In Spalte C (C2:C32) sind die Werte.
Ab Spalte F (Datum 01.01. - 31.12.) möchte ich sehen, wie oft der Wert am jeweiligen Tag kopiert wurde.
Bsp.:
C2 wurde am 16.06. 15x kopiert, dann steht in FP2 (=16.06.) 15.
C2 wurde am 17.06. 8x kopiert, dann steht in FQ2 8
usw.
Geht sowas...?
Freu mich auf Feedback

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - zählen wie oft Zelle kopiert wurde
23.06.2014 16:17:41
Daniel
Hi
direkt mit Zellen schwierig.
der einfachste Workaround wäre wohl, das Blatt generell auszublenden und die Werte in einer Userform mit Listbox anzuzeigen. Der Anwender wählt dann einen Wert aus und das Makro des Buttons kopiert dann den Wert und macht die entsprechende Eintragung
Gruß Daniel

AW: VBA - zählen wie oft Zelle kopiert wurde
23.06.2014 17:49:58
tobwo
hmm, ich kann die Werte leider nicht ausblenden und über ne Listbox arbeiten, da ich auch Ergänzungen in anderen Spalten habe und nicht an jedem Tag jeder Wert kopiert werden soll...
Trotzdem DANKE für die Idee, vielleicht hat ja noch jemand anders eine Lösung?

Anzeige
AW: VBA - zählen wie oft Zelle kopiert wurde
24.06.2014 10:37:35
Nepumuk
Hallo,
teste mal (die Anzahl der Kopiervorgänge wird in Spalte O eingetragen. Die Spalte und den Tabellennamen im Open-Event musst du natürlich anpassen).
' **********************************************************************
' Modul: DieseArbeitsmappe Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private Sub Workbook_Open()
    If ActiveSheet Is Tabelle1 Then _
        Set Tabelle1.LastSelection = Selection
End Sub

' **********************************************************************
' Modul: Tabelle1 Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private mobjLastSelection As Range

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim lngIndex As Long
    Dim blnNotEqual As Boolean
    If Not LastSelection Is Nothing Then
        If Target.Count = LastSelection.Count Then
            For lngIndex = 1 To Target.Count
                If Target(lngIndex).Value <> _
                    LastSelection(lngIndex).Value Then
                    blnNotEqual = True
                    Exit For
                End If
            Next
            If Not blnNotEqual Then
                Application.EnableEvents = False
                Cells(LastSelection.Row, 15).Value = _
                    Cells(LastSelection.Row, 15).Value + 1
                Application.EnableEvents = True
            End If
        End If
    End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Application.CutCopyMode = 0 Then Set LastSelection = Selection
End Sub

Public Property Get LastSelection() As Range
    Set LastSelection = mobjLastSelection
End Property

Public Property Set LastSelection(ByRef probjLastSelection As Range)
    Set mobjLastSelection = probjLastSelection
End Property

Gruß
Nepumuk

Anzeige
AW: VBA - zählen wie oft Zelle kopiert wurde
25.06.2014 12:23:46
tobwo
Hallo Nepumuk,
super, danke, das funktioniert!
ABER: Nur, wenn ich den Wert in der selben Datei einfüge.
Da ich aber in ein anderes Programm kopiere (CTRL+C) zählt es mir den Kopiervorgang nicht (sondern nur das Einfügen).
Gibt's dafür vielleicht auch eine Möglichkeit?

AW: VBA - zählen wie oft Zelle kopiert wurde
25.06.2014 17:18:03
Nepumuk
Hallo,
du kopierst nur aus einer einzigen Tabelle? Alle Mappen in welche du die Zeilen einfügst sind in der gleichen Excelinstanz geöffnet wie die Quellmappe?
Gruß
Nepumuk

AW: VBA - zählen wie oft Zelle kopiert wurde
25.06.2014 18:01:13
tobwo
Ziel ist, aus unterschiedlichen Tabellenblättern einer Datei in eine komplett andere Software zu kopieren.
Deswegen erscheint für mich nur die Möglichkeit zu "zählen", wie oft kopiert und nicht wie oft eingefügt wurde...

Anzeige
AW: VBA - zählen wie oft Zelle kopiert wurde
25.06.2014 18:56:43
Nepumuk
Hallo,
für "in eine komplett andere Software" ? . Das hättest du aber gleich schreiben können, dann hätte ich mir den Code sparen können. Schade wenn eine halbe Stunde Arbeit einfach in die Tonne getreten wird.
Da sehe ich eigentlich nur die Möglichkeit den Tastaturstream zu überwachen. Funktioniert aber nur wenn die "andere Software" kein Kontextmenü zum Einfügen der Zwischenablage hat, ansonsten müssten auch noch alle Childwindows der Anwendung überwacht werden.
Viel Spaß dabei.
Gruß
Nepumuk

299 Forumthreads zu ähnlichen Themen

Mittelwert aus Gruppierten Daten berechnen
Holger

Hallo
Eines schon mal Vorweg. Bin ein Excel Neuling und bitte daher um Verständnis, dass ich mit dieser wahrscheilich sehr einfachen Excel Problematik nicht weiterkomme.
Es geht um folgenden Tabellentyp:
http://www.bilder-space.de/show.php?file=F5RPKSe80cyrouj.jpg
Wie man sieht...
11.08.2008 13:29:00
Thread-ID: 1000835
6 Beiträge
Anzeige
Problem mit Drag&Drop und kopieren (VBA)
Micha

Hallo liebe Spezialisten,
ich habe mal wieder ein Problem und hoffe auf Hilfe :-)
Hier im Forum habe ich den folgenden Code zum deaktivieren von „Drag&Drop“ bekommen.
Private Sub Workbook_Activate() 'Verhindert Drag&Drop (Teil-1) Application.CellDragAndDrop = False End Sub...
17.09.2008 10:34:00
Thread-ID: 1010266
2 Beiträge
Kopieren VBA anstatt einer Formellösung
Bernhard

Hallo liebe Excel-Freunde,
wer kann mir helfen, eine Aufgabenstellung, die ich zwar mit Formeln gelöst habe mit einem VBA Makro zu lösen. Wie kopiere und paste ich Werte aus einer Tabelle1 in eine Tabelle2, abhängig davon ob ein Wert in einer bestimmten Spalte ist. Das Beispiel habe ich zum...
24.09.2008 17:28:00
Thread-ID: 1012129
9 Beiträge
Anzeige
Berechn.PivotField - Orientation per VBA = Fehler
Andreas

Hallo Herber Fans,
ich bin heute erstmalig mit einem Problem konfrontiert worden, welches keiner rationalen Logik zu folgen scheint. Auch im Forum habe ich dazu bisher nichts gefunden und wollte fragen, ob damit schon Erfahrung besteht, oder ich vielleicht auch einfach einen Denkfehler habe...
02.10.2008 15:17:00
Thread-ID: 1013901
3 Beiträge
VBA--Zellen finden/vergleichen/kopieren
Christian

Hallo
einen Beispieldatei ist anbei!!
Bisher konnte ich mit folgendem Code Zellinhalte "täglich" teilen und in neue Zellen kopieren.
Sheets("179").Select Range("B255").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=TRIM(LEFT('tägliche Statistik'!R12C6,FIND(""/"",'täglic...
07.10.2008 10:15:00
Thread-ID: 1014634
3 Beiträge
VBA Zeilen kopieren bis...
Silvi

Hallo,
kann mir bitte mal jemand bei folgendem Makro helfen:
'Rows("2:2").Select
Selection.Copy
Range("A3").Activate
Do Until ActiveCell.Value = ""
ActiveCell.Offset(1, 0).Activate
Loop
ActiveSheet.Paste
Selection.Copy
Selection.PasteSpecial Paste:=xlValu...
13.10.2008 13:13:04
Thread-ID: 1016022
13 Beiträge
PivotChart erstellen per VBA
Windalf

Hallo,
kann mir jemand sagen, wie man ne Pivotchart üblicher Weise per VBA erstellt.
Der Markorekorder hilft mir nicht weiter. Der malt dann nen leeres Chart....
Wenn man nen Pivotchart erstellt ist das nen "normales Chart" dem man die Range von dem was man malen will übergibt oder...
04.11.2008 11:05:00
Thread-ID: 1021518
2 Beiträge
VBA Zellen prüfen, txt kopieren, einfügen in txt
Stevie

Hallo Zusammen,
da ich kaum Erfahrung im Bereich VBA habe hätte ich gerne mal folgendes Problem :)
Ich habe folgenden Code der Variablen in einer Textdatei ersetzt, eine neue Datei speichert und die File anschleißend mittels Batchrutine an einen Drucker schickt.
Hier der bisherige C...
06.11.2008 09:56:19
Thread-ID: 1022167
3 Beiträge
Anzeige

Links zu Excel-Dialogen

ListBox UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
7
1
8
5
2
2
12
1
2
6
4
1
5
2
7
4
8
2
1
2
6
3
3
2