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

Wochenenddaten auf bestimmter Maschine ausblenden

Forumthread: Wochenenddaten auf bestimmter Maschine ausblenden

Wochenenddaten auf bestimmter Maschine ausblenden
Anne
Hallo an alle,
ich habe folgendes Problem:
ich lasse folgendes Makro ablaufen. Ist es danach oder ggf. durch Umprogrammierung des vorhandenen Makros möglich, die Daten von Maschine 1 (Ma1) am Wochenende nicht anzuzeigen (also von Freitag Nachschicht bis Sonntag Spätschicht wird nicht gearbeitet und des-halb sollen da auch keine Daten angezeigt werden)?
https://www.herber.de/bbs/user/67242.xls
Über Lösungsvorschläge würde ich micht sehr freuen!
LG
Anzeige
AW: Wochenenddaten auf bestimmter Maschine ausblenden
16.01.2010 15:37:44
fcs
Hallo Anne,
die Datei kommt mir doch bekannt vor :-)
Ich hab dir mal eine Wochenend-Funktion integriert, die du bei Bedarf auf andere Maschinen erweitern kannst.
Text-Datei mit Prozeduren: https://www.herber.de/bbs/user/67260.txt
Gruß
Franz
Anzeige
AW: Wochenenddaten auf bestimmter Maschine ausblenden
18.01.2010 11:33:02
Anne
Hallo Franz,
das scheint ja mal wieder einwandfrei zu funktionieren.
Vielen Dank für deine nochmalige Hilfe!
Gruß Anne
AW: Wochenenddaten auf bestimmter Maschine ausblenden
18.01.2010 11:54:05
Anne
Hallo Franz,
ich hab dann doch nochmal ne blöde Frage, wo genau erweitere ich das Makro auf mehrere Maschinen?
Gruß Anne
AW: Wochenenddaten auf bestimmter Maschine ausblenden
18.01.2010 18:21:21
fcs
Hallo Anne,
in der Function Wochenende kannst du Wochendpläne für weitere Maschinen definieren.
Wenn die Maschine am Wochende das gleich Nicht-Produktionsschema hat wie Ma1 dann z.B.: 
    Case "Ma1", "Ma2" 'Maschine(n) ohne Wochenendproduktion

Hat die Maschine ein anderes Schema, dann muss du einen kompletten zusätzlichen Case Block erstellen. z.B. 
    Case "MaX" 'Maschine(n) ohne Wochenendproduktion
'Wochentag des Tags in Spalte 1 prüfen
Select Case Weekday(.Cells(Zeile, 1).Value, vbSunday)
Case vbFriday 'Nach Frühschicht ist Schluß
Select Case Schicht
Case "Spät", "Nacht":        Wochenende = True
End Select
Case vbSaturday
'Keine Produktion für alle 3 Schichten
Wochenende = True
Case vbSunday 'No work on Sundays
Select Case Schicht
Case "Früh", "Spät", "Nacht": Wochenende = True
End Select
Case Else
End Select

Gruß
Franz
Anzeige
AW: Wochenenddaten auf bestimmter Maschine ausblenden
19.01.2010 08:43:56
Anne
Hallo Franz,
nochmals vielen Dank für deine schnelle Antwort!
Das funktioniert auch wieder sehr gut. Ich nutze jetzt deinen ersten Vorschlag. Mein Problem ist, dass danach noch im Makro Sachen ablaufen müssen und ich grad keine Möglichkeit finde,dass diese Funktionen im Anschluss ablaufen. Nach "End function" kann ich ja kein Call Modul1.Makro 1 ausführen und davor auch nicht,weil das Makro sonst immer wieder und wieder ausgeführt wird. Hast du zufällig auch dafür eine Lösung für mich?
Gruß Anne
Anzeige
AW: Wochenenddaten auf bestimmter Maschine ausblenden
19.01.2010 10:01:11
fcs
Hallo Anne,
weitere Makros muss du in der Haupt-Routine aufrufen und zwar vor oder nach einer der Next-Anweisungen am Ende je nachdem welche Bearbeitung abgeschlossen sein muss bevor das makro startet.
Gruß
Franz 
              End If
End If
End If
Call MakroXXX 'wenn eine Zelle im Auswerteblatt ausgefüllt wurde
Next
End With
Call MakroXXX 'wenn eine Zeile der Ausgangsdaten ausgewertetet ist
Next
End With
Call MakroXXX 'wenn alle Zeilen der Ausgangsdaten ausgewertetet sind
End Sub

Anzeige
AW: Wochenenddaten auf bestimmter Maschine ausblenden
19.01.2010 10:30:39
Anne
Hallo Franz,
du bist mir echt eine super große Hilfe!Vielen, vielen Dank!
Jetzt geht alles einwandfrei.
Gruß
Anne
;

Forumthreads zu verwandten Themen

VBA Zeilen ein/ausblenden + weiters Problem
oblivion

hallo, ich hab mal wieder ein kleines und ein etwas größeres Problem
erstmal zum kleinen. wie bekomme ich es mit hilfe von einem vba hin, wenn ich ein kontrollkästchen mit einem Hacken versehe, dann bestimmte Zeilen (Sagen wir mal Zeile 20 bis 30), die ich vorher versteckt hatte, nun zum vo...
10.08.2008 00:22:06
Thread-ID: 1000558
3 Beiträge
MsgBox abfolge mit BlätterAusblenden
Eggi

Hallo Zusammen
Habe ein wenig mühe damit das Makro BlaetterAusblenden am richtigen Ort zu plazieren.
Es soll so ablaufen: Msgbox "Formulare zurücksetzen ja/nein. falls nein *BlaetterAusblenden* falls ja weiter zu msgbox "Wollen Sie wirklich... (diese Abfrage ist nur zur letzen nochmali...
15.08.2008 15:23:51
Thread-ID: 1002204
10 Beiträge
Spalten Ausblenden in freigegebener Arbeitsmappe
Marco

Hallo,
ich möchte gerne in einer freigegeben Arbeitsmappe bestimmte Spalten per Klick auf ein Symbol aus- und wieder einblenden können.
Mein Problem ist der Blattschutz in der freigegebenen Arbeitsmappe. Aufgrund meiner bescheidenen VBA-Kenntnisse, weiß ich nicht, an welcher Stelle des...
17.08.2008 22:56:20
Thread-ID: 1002488
3 Beiträge
Zelle nichtleer, dann Spalten ausblenden
kellerkind42

hallo.
Ich tue mich sehr schwer mit folgendem Wunsch:
Im Spaltenbereich A-Z:
Im Zeilenbereich 10 -20:
z.B:
Steht in Spalte C etwas in Zeile 10 oder 11 oder 12.... dann Blende diese Spalte aus!
Kann mir bitte jemand auf die Sprünge helfen?
Gruß Reinhardt.
20.08.2008 07:29:00
Thread-ID: 1003062
6 Beiträge
Einzelne Tabellen ausblenden
Peter

Hallo,
hab folgendes Problem. Ich habe eine Arbeitsmappe mit 15 Arbeitsblättern. Von diesen 15 AB sollen jedoch nur die Tabellen 1-10 sichtbar sein. Der Code, den ich mir gebastelt habe funktioniert leider nicht. Vielleicht stehe ich auch einfach nur auf dem Schlauch.
Hier der Code:
...
20.08.2008 22:33:32
Thread-ID: 1003334
7 Beiträge
Bei Ausdruck Leerzeilen ausblenden
Christian

Guuuuten Morgen zusammen,
ich suche seit einer knappen Stunde eine Lösung für folgendes, wohl sehr einfaches Problem, finde aber nur Spezial-Lösungen, die ich leider nicht entsprechend reduziert bekomme:
Habe eine Tabelle von A1 bis K59; Leerzeilen können im Bereich 8 bis 47 vorkommen;...
27.08.2008 09:08:00
Thread-ID: 1004971
15 Beiträge
Anzeige
Worksheet über Codename ein/ausblenden
Reinhard

Hallo Wissende,
geht es auch direkt ein Worksheet anhand des Codenamen ein/auszublenden?
Eine Schleife kriege ich hin, die alle Blätter durchläuft und wenn der gesuchte Codename gefunden ist dieses Blatt/Worksheet aus/einblendet.
Meine Frage ist also, geht das auch ohne Schleife?
28.08.2008 16:28:02
Thread-ID: 1005518
6 Beiträge
Anzeige
Ausblenden von Spalten abhängig vom Autofilter
Spalten

Ich möchte gerne bestimmte Spalten abhängig vom Wert des Autofilters in einer anderen Spalte ausblenden.
Beispiel: In Spalte A wähle ich im Autofilter "Dieter" und dann sollen die Spalten J bis R ausgeblendet werden. Wähle ich dann "Volker" sollen die Spalten M bis W ausgeblendet werden.
29.08.2008 15:45:36
Thread-ID: 1005878
2 Beiträge
Anzeige
#NV ausblenden
Bolo

Guten Morgen liebe Leute!
Ich sitz hier mal wieder an einer wunderschönen Exceltabelle und habe ein Problemchen. Ich habe hier per sverweis Verweise auf andere Tabellen erstellt die soweit auch ganz gut funktionieren. Allerdings ist meine Tabelle aktueller als die Tabellen auf die ich verwe...
01.09.2008 08:36:38
Thread-ID: 1006318
5 Beiträge
Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 Beiträge
Spalten ausblenden
Silke

Hallo,
habe ein kleines Problem ich habe eine Adressenliste geschrieben und möchte nun mir eine Geburtstagsliste und Telefonliste ausgeben lassen.
Dabei möchte ich nur auf eine bestimmte Zelle klicken, damit sie auf die Liste geht. Die Liste an sich ist ist sehr lang und ich möchte die...
02.09.2008 08:51:00
Thread-ID: 1006638
8 Beiträge
Anzeige
Zeile ausblenden, wenn in einer Zelle ein bestimmt
Jakob

Hallo,
Ich habe folgendes Problem:
Ich möchte in den Tabellenblatt "Form3" die zeilen 39-50 ausblenden wenn die Zelle A37 ungleich "Pentax" und "Ciclox" ist. Der Wert der Zelle A37 kommt aus der Eingabe im Tabellenblatt "Eingabemaske" (B7).
Wie müßte der entsprechende VBA-Code ausse...
03.09.2008 17:24:21
Thread-ID: 1007176
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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