Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
716to720
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
716to720
716to720
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Zeilen ausblenden wenn
12.01.2006 17:42:15
jan
Hallo Leute, suche etwas Kompetenz.
habe seitenweise dateneinträge, die verschiedene jobs aufnehmen.
in Spalte D werden die Tätigkeiten pro zeile per dropdown ausgewählt
von den Beteiligten jeweils. die Tätigkeiten wiederholen sich entsprechend.
Wegen derÜbersichtlichkeit sollen vorab bestimmte jobs/zeilen ausgeblendet
werden.
schön wärs, man trägt die tätigkeit in eine zelle ( D5) oder combobox.
per makro sollen die gleichen jobs aufglistet/eingeblendet werden.
Wichtig ist das ein neuer job eingetragen werden kann. mit dem
autofilter gehts eben nicht(fortlaufende nummern)
gruesse von der waterkant

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen ausblenden wenn
12.01.2006 19:19:07
ChrisL
Hi
Verstehe die Frage nur ansatzweise, aber habe dir trotzdem mal ein Beispiel erstellt. Dabei habe ich etwas mit VBA, bedingter Formatierung, Formeln und Gültigkeit gespielt.
https://www.herber.de/bbs/user/29978.xls
Gelbe Zellen, Spalte B, C und D der Reihe nach ausfüllen. Nummer wird automatisch gesetzt und neu gefiltert, sobald Auswahl im DropDown gemacht.
Gruss
Chris

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Column = 2 Or Target.Column = 3 Then
Cells(Target.Row, 4).Validation.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="JobA,JobB"
Cells(Target.Row, 1).Formula = "=ROW()-1"
End If
If Target.Column = 4 Then
Selection.AutoFilter Field:=4, Criteria1:="JobA"
End If
End Sub

Anzeige
AW: Zeilen ausblenden wenn
13.01.2006 09:53:55
jan
Hallo Chris,
..sach nur, is´ne heisse Liste, die du da gestrickt hast, die kann ja alles
was ich wollte. nun muss ich mal grübeln wie ich das integrieren kann
die original Liste hat satte spalten bis Ac und Zeilen max.999.werde dich
gebenfalls noch einmal kontaktieren.
hatte selbst experimentiert. also jobart unter D und status in prozent
damit konnte ich meine 100%igen aus und einblenden, also fertige jobs und unfertige
jobs konnte ich mir per makro anzeigen lassen. mit einem ähnlichen
makro wie:
Public

Sub Zeilen_Ausblenden2()
Application.ScreenUpdating = False
For i = 7 To 999
If Cells(i, 29).Value <> "100%" Then
Rows(i).Hidden = True
End If
Next i
Application.ScreenUpdating = True
Range("AC7").Select
End Sub

...dachte ich an sowas wie: dynamischer Einblendwert: tippe ich in D5 den job ein
ändert sich der wert im makro auch. bin da irgendwie gescheitert.
deine Idee ist natürlich viel eleganter.Respekt!
Vielen Dank für die Unterstützung und Bemühungen
jan
Anzeige

314 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige