Excel Programmierung

[WillWissen]

Hi,

Nein, es ist nicht verständlicher. Lade bitte eine abgespeckte Beispieldatei hoch und trage darin händisch ein, welcher Datensatz als doppelt gewertet wird und warum. So ca 25 bis 20 Datensätze sollten es sein. Nach Möglichkeit mit allen erdenklich vorkommenden Varianten.

[GMG-CC]

Günter,
Beschreibung der Anforderung und die Bemerkungen bei den "Zeilen" widersprechen sich.
ICH jeden Fall werde für diesen Beitrag nichts mehr machen, denn wenn der TE derartig ignorant ist, trotz Aufforderung keine vernünftige Daten-Grundlage (*.xlsx) zu liefern, laufe ich ihm nicht hinterher. Ich bin schließlich kein Hund, der seinem Herchen immer hinterher läuft, egal wie der sich benimmt ...

[atilla]

Hallo,

dieser Satz:

Die Spalte Kontakt enthält immer Name, Vorname Telefonnummer.

war für mich entscheidend, und das wollte ich die Ganze Zeit wissen.

Hier eine Formellösung mit zwei Hilfsspalten:
(geht sicher auch mit einer Hilfsspalte, aber da müsste dann Summenprodukt ran. So ist es Ressourcen schonender)

Arbeitsblatt mit dem Namen 'Tabelle2'   A B C D E F 2 Datum       Uhrzeit   Dauer   Kontakt ID Löschen 3 27. Dez 15:39 00:00 AMT 60029xxxxxx 15:39#AMT 60029xxxxxx 1 4 27. Dez 15:39 01:05 AMT 60029xxxxxx 15:39#AMT 60029xxxxxx 0 5 27. Dez 15:23 00:00 Kirschner XXXX 11xxx 15:23#Kirschner XXXX 11xxx 1 6 27. Dez 15:23 00:00 Kirschner XXXX 11xxx 15:23#Kirschner XXXX 11xxx 0 7 27. Dez 15:16 00:00 AMT 231945xxxx 15:16#AMT 231945xxxx 0

Zelle Format Wert A3 TT. MMM 27.12.2017 B3 hh:mm 0,652083333333333 C3 hh:mm 0

Zelle Formel E3 =TEXT(B3;"hh:mm")&"#"&D3 F3 =(ZÄHLENWENN(E3:$E$7;E3)>1)*(C3=0)

Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg

Dann brauchst du nur nach der 1 in Spalte F zu filtern und diese Zeilen löschen.

Falls Du immer noch auf VBA bestehst, dann melde Dich noch einmal.

Edit:
Habe mir das noch einmal angesehen, und muss feststellen, dass bei mehreren Vorkommen das so, wie ich es gemacht habe, nicht reicht.
Aber ist jetzt spät geworden. Mal schauen ob ich es morgen hinbekomme. Vielleicht hat aber jemand anderes schon eine Lösung.

[BassRider]

Hallo zusammen, 

meine Absicht ist es nicht hier wen hinterher Laufen zulassen, ich werde morgen die Datei Hochladen, habe mein Dienstlaptop leider nicht dabei. 

Bis dahin Danke

Bass

[BassRider]

Hallo zusammen,

ich habe euch jetzt eine Beispiel xlsx hinzugefügt und auch in der Excel farbig hinterlegt, was ich wie meine.

Ich hoffe das hilft weiter.


Grüße

Bass

[atilla]

Hallo,

Daten nach den ersten drei Spalten aufsteigend sortien, dann geht es, fast so, wie ich gestern schon gezeigt habe:

Arbeitsblatt mit dem Namen 'Tabelle1'

A

B

C

D

E

F

G

H

I

J

K

L

1

Datum

Uhrzeit

Dauer

Kontakt

Bemerkung

2

27. Dez

15:39

00:00

AMT

6002937400

Löschen

Hier muss der Eintrag mit der Dauer 0:00 gelöscht werden.

15:39#AMT

1

3

27. Dez

15:39

01:05

AMT

006002937400  (+4971112711300)

Behalten

15:39#AMT

0

4

27. Dez

15:23

00:00

Kirschner Martin

11149  (11300)

Behalten

Hier bei Einträgen mit Doppelt 0:00 Minuten ist es egal welcher Eintrag gelöscht wird!

15:23#Kirschner Martin

1

5

27. Dez

15:23

00:00

Kirschner Martin

11149  (17407)

Löschen

15:23#Kirschner Martin

0

6

27. Dez

15:16

00:00

AMT

2319452109

Löschen

Hier muss der Eintrag mit der Dauer 0:00 gelöscht werden.

15:16#AMT

1

7

27. Dez

15:16

01:30

AMT

002319452109  (+4971112711300)

Behalten

15:16#AMT

0

8

27. Dez

14:12

00:00

Krug Dominik

73933

Behalten

14:12#Krug Dominik

0

9

27. Dez

13:41

00:00

Iwanow Gennadi

17017

Löschen

Hier muss der Eintrag mit der Dauer 0:00 gelöscht werden.

13:41#Iwanow Gennadi

1

10

27. Dez

13:41

03:03

Iwanow Gennadi

17017  (+4971112711300)

Behalten

13:41#Iwanow Gennadi

0

11

27. Dez

13:28

00:00

Stehle Cordula

+4971112719909  (+4971112711300)

Löschen

Hier bei Einträgen mit Doppelt 0:00 Minuten ist es egal welcher Eintrag gelöscht wird!

13:28#Stehle Cordula

1

12

27. Dez

13:28

00:00

Stehle Cordula

19909  (17407)

Behalten

13:28#Stehle Cordula

0

13

27. Dez

13:28

00:00

Gebel Klaus

17407

Behalten

Hier bei Einträgen mit Doppelt 0:00 Minuten ist es egal welcher Eintrag gelöscht wird!

13:28#Gebel Klaus

1

14

27. Dez

13:28

00:00

Gebel Klaus

17407  (+4971112711300)

Löschen

13:28#Gebel Klaus

0

15

27. Dez

13:27

00:00

Stehle Cordula

19909  (17407)

Behalten

Hier bei Einträgen mit Doppelt 0:00 Minuten ist es egal welcher Eintrag gelöscht wird!

13:27#Stehle Cordula

1

16

27. Dez

13:27

00:00

Stehle Cordula

19909  (+4971112711300)

Löschen

13:27#Stehle Cordula

0

17

27. Dez

12:51

00:00

Stroh Juergen

11230

Behalten

Hier muss der Eintrag mit der Dauer 0:00 gelöscht werden.

12:51#Stroh Juergen

1

18

27. Dez

12:51

00:30

Stroh Juergen

11230  (+4971112711300)

löschen

12:51#Stroh Juergen

0

19

27. Dez

12:36

00:00

Rautenberg Rainer

19792

Behalten

Hier muss der Eintrag mit der Dauer 0:00 gelöscht werden.

12:36#Rautenberg Rainer

1

20

27. Dez

12:36

00:30

Rautenberg Rainer

19792  (+4971112711300)

Löschen

12:36#Rautenberg Rainer

0

21

27. Dez

12:21

00:00

Scholz Martin

19715

Löschen

Hier muss der Eintrag mit der Dauer 0:00 gelöscht werden.

12:21#Scholz Martin

1

22

27. Dez

12:21

00:47

Scholz Martin

19715  (+4971112711300)

Behalten

12:21#Scholz Martin

0

23

27. Dez

11:47

00:00

AMT

17661003450

behalten

11:47#AMT

0

Zelle	Formel
K2	=TEXT(B2;"hh:mm")&"#"&D2
L2	=WENN(UND(ZÄHLENWENN(K2:$K$23;K2)>1;C2=0);1;0)

Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg