Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1972to1976
1972to1976
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Arbeitszeiten löschen,danke im Voraus...

Forumthread: Arbeitszeiten löschen,danke im Voraus...

Arbeitszeiten löschen,danke im Voraus...
21.04.2024 16:08:47
matthias
Hallo zusammen,
habe meine Musterdatei soweit fertig, Formatierung übernommen etc..
Nun möchte ich gern, das im jeweiligen Monat also je Tabelle die Zeiten der Arbeitstage gelöscht werden,
die in der Matrix Y2-Z7 leer sind.
Z.B. Jan der Mo und der Mi
diese beiden Tage müssen in der Spalte B von B9 bis B39 gesucht werden und
dann immer die Zellen von E-F und die Zellen von Zellen J-K gelöscht werden.


https://www.herber.de/bbs/user/168899.xlsm

mfg matthias
Anzeige

14
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Arbeitszeiten löschen,danke im Voraus...
21.04.2024 17:08:56
Niclaus Wurthberg
Hallo Matthias
In Deinen Tabellen stimmen einige Summen-Formeln nicht! Schau mal an die Zeile 40 in den Spalten H, M, N und P!
In T40 stimmt stimmt die Formel.
Und hast Du Dir mal überlegt, wenn die Summe der Soll-Stunden (P40) grösser ist als die Summe der Ist-Stunden (N40)?
Wenn also z. B. in Z2:Z7 überall 10:00 h erfasst wären?
Eine Lösung sehe ich, wenn man in Spalte T mit Industriezeit arbeiten würde!
Viele Grüsse aus der Schweiz
Niclaus

PS: Mit Interesse habe ich die Beiträge zu Deiner Frage von gestern "studiert": "Warum Verweis zeigt Falsch an"
Anzeige
Hallo zusammen leider noch nicht komplett
21.04.2024 18:20:32
matthias
Hallo Niklaus,
habe die Summenformel ergänzt, stimmen jetzt außer in Spalte T,
da lasse ich halt die Summe weg, ich habe keine Ahnung von Industriezeiten, leider.
Was ist den mit der Löschung für z.B. Mo oder Mi, könnte aber auch ein anderer Tag sein.
z.B. Di, Mi und Fr

mfg matthias

Anzeige
AW: Anbei verbesserte Tabelle
21.04.2024 19:09:16
Eifeljoi 5
Hallo

Ich sehe keine Verbesserung!

Ich Frage mich:
Was war an meiner Datei richtig?
Warum jetzt noch Spalte T steht doch alles in Spalte R??
Anzeige
Guten Morgen, bitte, vielleicht hat jemand eine Idee...
22.04.2024 08:57:22
matthias
Guten Morgen,
erst mal zu Eifeljoi 5, in der Spalte T geht es darum, die Zeiten zu addieren, das klappt
ja jetzt mit der Industriezeit.
Aber viel WICHTIGER ist das was ich im 1. Beitrag geschrieben habe, das LÖSCHEN
in Bezug auf die Matrix.
Userbild

mfg matthias
Anzeige
AW: Guten Morgen, bitte, vielleicht hat jemand eine Idee...
22.04.2024 09:46:45
schauan
Hallöchen,

ich biete mal eine Formellösung mit Hilfsspalte.
- Schreibe in AF9 neben die Wochentage die Formel =TEXT(AE9;"TTT") und ziehe sie runter
- schreibe in Z2 die Formel =WENN(SUMMEWENN($AF$9:$AF$40;Y2;$N$9:$N$40)=0;"";"10:00:00") und ziehe sie runter

Wenn Y2 auch weg soll, müsstest Du für Z2 den Bezug Y2 in "Mo" ändern. Die Formel in Y2 wäre dann
- =WENN(SUMMEWENN($AF$9:$AF$40;"Mo";$N$9:$N$40)=0;"";"Mo")
Anzeige
AW: Guten Morgen, bitte, vielleicht hat jemand eine Idee...
23.04.2024 20:23:37
Eifeljoi 5
Hallo

Warum löschen? Oder verstehe ich nur Bahnhof?
Hallo, ist doch erledigt …. -)
23.04.2024 22:12:26
matthias
Leider keinen Erfolg
22.04.2024 10:31:51
matthias
Guten Morgen Schauan,
ehrlich gesagt, keine Ahnung, anbei die Datei.
Weiß nicht weiter...

https://www.herber.de/bbs/user/168916.xlsm
mfg matthias
Anzeige
AW: Leider keinen Erfolg
22.04.2024 12:16:38
hary
Moin
Probier mal an einer Testmappe. Es geht nur um die Schleifen. Alles andere hab ich mal auskommentiert. 
Public Sub mw_Alle_Monate_Arbeitszeiten_löschen()

Dim i As Long, ii As Long, iii As Long

Dim MappNam As String

'  Call Admin_Schutz_Alle_Direkt_raus

'    ActiveSheet.Unprotect (getStrPasswort)

'    Application.EnableEvents = False

'    ActiveSheet.Application.ScreenUpdating = False

'    MappNam = ActiveSheet.Name

   ' Sheets(i).Unprotect (getStrPasswort)

    For i = 1 To 12

       With Sheets(i)

        For ii = 2 To 7

          For iii = 9 To 39

            If .Cells(ii, "Z") = "" And .Cells(iii, "B").text = .Cells(ii, "Y") Then

              .Cells(iii, 5).Resize(1, 2).ClearContents

               .Cells(iii, 10).Resize(1, 2).ClearContents

            End If

          Next iii

        Next ii

      End With

    Next i

'     Worksheets(MappNam).Select

'     ActiveSheet.Range("H2").Select

'     Application.EnableEvents = True

'     ActiveSheet.Application.ScreenUpdating = True

'     ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios _

'         :=True, Password:=getStrPasswort

'

'    Call AllE_Tabellen_Schützen_mw

End Sub

gruss hary
Anzeige
AW: Leider keinen Erfolg
22.04.2024 13:51:44
schauan
Hallöchen,

hast Du die beiden Dateien mal verglichen?
Wenn Deine Wochentage nicht mehr in AE stehen sondern nun in AO, wäre "Schreibe in AF9 neben die Wochentage..." nicht mehr AF sondern - was kommt nach AO ...?
Hary SPITZE !
22.04.2024 12:27:12
matthias
Hallo Hary,
läuft einwandfrei, SPITZE.
Herzlichen Dank, das sind Makros, eine Nummer zu groß für mich.

mfg matthias
Anzeige
AW: noch 'ne Kleinigkeit
22.04.2024 14:05:14
hary
Moin
Fuer Modul: Sub A_Samstage_und_Sonntage_färben
Du brauchst die Blaetter nicht zweimal durchlaufen.
Geht auch so. Und ohne select. 

Public Sub A_Samstage_und_Sonntage_färben_mw()

Dim c  As Range, bereich As Range

Dim i As Integer

    For i = 1 To 12

      With Sheets(i)

        Set bereich = .Range("c9:c39")

             .Unprotect (getStrPasswort)

        With bereich.Font

            .ThemeColor = xlThemeColorLight1

            .TintAndShade = 0

        End With

      For Each c In bereich

        If IsDate(c.Value) Then

            If Weekday(c.Value) = 1 Then

                c.Font.Color = 255

            ElseIf Weekday(c.Value) = 7 Then

                c.Font.Color = 255

            End If

        End If

      Next c

     End With

    Next i

End Sub

gruss hary
Anzeige
AW: noch 'ne Kleinigkeit auch hier DANK Hary ! -)
22.04.2024 14:20:55
matthias

Forumthreads zu verwandten Themen

@ Tino - brauche Hilfe bei einer deiner Formeln
oblivion

Hallo, ich habe eine Frage an dich. Du hast mir die Formel erstellt in A16.
Ich habe die Datei mal hochgeladen und in Blatt "Beispiel" Spalte A etwas hereingeschrieben.
Danke für deine Hilfe.
Gruß Oblivion
https://www.herber.de/bbs/user/54685.zip
17.08.2008 21:06:00
Thread-ID: 1002466
4 Beiträge
Es wird nur die Formel angezeigt, nicht der Text
Oswald

Hallo an die guten Geister,
hab mal wieder ein Problem.
In der angeängten Datei in B41 hatte ich das Problem das nicht der Text angezeigt wird sondern die Formel.
https://www.herber.de/bbs/user/54704.xls
Habe ich dadurch gelöst das ich das Selbe noch mal in einer anderen Datei...
18.08.2008 14:47:05
Thread-ID: 1002609
4 Beiträge
smtp Exchange Server - Nur Angezeigter Name
chris

Hallo zusammen, leider habe ich hier keine Antwort bekommen.
Vielleicht wurde mein beitrag übersehen.
oder gibt es keine Lösung ?
Würde mich über Hilfe sehr freuen !!
Vielen dank gruß Chris
https://www.herber.de/forum/messages/1005350.html
29.08.2008 07:12:09
Thread-ID: 1005627
17 Beiträge
Formel zeigt falsches Ergebnis an?
Christina

Hallo,
für mich ein Rätsel.
Weshalb wird in B30 eine 1 angezeigt, weshalb bleibt die Zelle nicht leer?
Wie ist die Formel zu ändern?

Gruß
Christina Verena
08.09.2008 20:44:28
Thread-ID: 1008248
3 Beiträge
Formel, Index oder Vergleich
Kurt

Guten Abend Zusammen,
ich habe ein kleines Problem, ich möchte in der Zelle "O10" eine Zahl eingeben
aus den Zellen mit gelben Hintergrund.
Dann soll der Preis gefunden werden und reingesetzt, rechts daneben.
Ich habe mal ein Muster beigefügt:
https://www.herber.de/bbs/user/...
06.10.2008 18:26:46
Thread-ID: 1014519
14 Beiträge
Anzeige
verschachtelte Wenn-Funktion?
Karin

Hallo zusammen,
in einer Spalte stehen Nachnamen. Nun soll in einer weiteren Spalte die E-Mail-Adresse für diesen Namen angezeigt werden. Mit einer mit "&" verschachtelten Wennfunktion komme ich nicht weiter. Es kommt die Meldung "Formel zu lang". Den gleichen Effekt habe ich mit der Fu...
18.10.2008 17:41:43
Thread-ID: 1017371
7 Beiträge
Und() bzw. ODER() in Matrixformeln
Sibylle

Hallo,
sollen in einer Matrixformel 2 Bedingungen durch UND() verknüpft werden, funktioniert dies nicht.
Was ist die Ursache?
Wichtiger: wie sieht die Lösung aus?
Gruß
Sibylle
13.02.2009 11:02:00
Thread-ID: 1050412
9 Beiträge
Anzeige
verschachtelte WENN Funktion
Yusuf

Moin, ich habe eine verschachtelte Wenn Funktion
=WENN(Z(28)S(-6)="Yes";"Issue created";WENN(Z(26)S(-6)="No";"No Issue";WENN(Z(26)S(-6)="Yes"; "Create Issue";"")))
Jetzt moechte ich gerne beim ersten Wenn eine zweite bedingungen einbauen, jedoch komme ich nicht drauf, wo das UND eingeb...
23.07.2009 11:20:29
Thread-ID: 1090739
3 Beiträge
Anzeige
WENN UND ODER in einer Formel
Claudia

Hallo an alle Helfer,
ich verstehe es einfach nicht mit einer WENN / UND / ODER Formel umzugehen und im Archiv habe ich zwar vieles gefunden, kann es aber irgendwie nicht richtig anwenden.
Mein Problem ist folgendes:
In den Spalten F und G stehen die Bedingungen, weibl., männl.(in S...
02.09.2009 21:55:04
Thread-ID: 1100197
4 Beiträge
Anzeige
verschachtelte wenn funktion
meixner

Hallo zusammen,
eine banale wenn Funktion macht mir Probleme.
Funktion soll sagen: wenn A8 ist ungleich 7 und wenn A8 ist ungleich 3 dann j8*h8/n8, ansonsten 0.
Kann mir jmd. helfen? Irgendwie klappt die Formel nicht.
Vielen Dank.
Dani
WENN(ODER(A87;A83;);RUNDEN(J8*H8/...
13.11.2009 19:19:33
Thread-ID: 1117032
3 Beiträge
Formel statt fixer Wert per Makro anzeigen | Herbers Excel-Forum
meixner
Hallo zusammen,
habe ein Problem mit folgendem Makro:
Habe ein Tabelle mit 30 Aktien. Makro sucht eine bestimmte Aktie aus diesen 30 heraus z.B Zeile 30.
Ich möchte dann aus B30 die Formel an eine andere Stelle kopieren. In B30 steht =Data!$V37 aber ein Aktienpreis wird angezeigt, dass...
08.01.2010 15:56:57
Thread-ID: 1128330
4 Beiträge
Verschachtelte WENN Funktion gibt Text nicht aus
Martin

Hallo zusammen,
kann mir jemand sagen warum untenstehende Formel leider nur die Fehlermeldung #WERT! auswirft?
Die Bezüge sind alle korrekt und das Feld, das die Formel enthält hat das Format "Standard".
Ich habe dieselbe Formel in leicht abgewandelter Form bereits erfolgreich in...
19.05.2010 16:31:30
Thread-ID: 1157883
7 Beiträge

Beliebteste Forumthreads (12 Monate)

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