Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Filter und Drucken ???
zurück: SVERWEIS weiter.... weiter: MS Query +Parameter ändern Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
modellmicha
Excel-Benutzer mit Versuch besser zu werden


Verfasst am:
13. März 2009, 13:09
Rufname: Micha
Wohnort: Wilthen

Filter und Drucken ??? - Filter und Drucken ???

Nach oben
       Version: Office 2007

Hallo Leute

ich steh mal wieder vor einem Problem, wo ich nicht weiterkomme, folgendes:
ich habe ein Datentabelle nach dem Muster:
a2 Datum, b2 von, c2 bis, d2 Ort, ...

nun will ich einen Filter einsetzen, der nach Datum organisiert und diese Daten will ich dann in ein Druckformular einfügen und ausdrucken

meine Idee war in die Zelle a1 "=a3:a10", b1"=b3:b10", c1"=c3:c10"...
aber wenn ich den Filter gesetzt habe erscheint in der Zeile 1 bei den Zellen #Wert!.
setzte ich aber statt a3:a10 "=a3" erschein nur der wirkliche Wert von a3.

Wie kann ich das lösen, damit ich die entsprechenden Daten in mein Formular drucken kann ???

Danke Euch schon im Voraus

Gruß Micha



tab1.jpg
 Beschreibung:
Grundtabelle
 Dateigröße:  41.61 KB
 Angeschaut:  505 mal

tab1.jpg



tab2.jpg
 Beschreibung:
Tabelle mit Filter
 Dateigröße:  23.41 KB
 Angeschaut:  505 mal

tab2.jpg



tab1.jpg
 Beschreibung:
 Dateigröße:  41.61 KB
 Angeschaut:  505 mal

tab1.jpg


Kl@us-M.
www.kmbuss.de


Verfasst am:
13. März 2009, 13:27
Rufname: Klaus-Martin


AW: Filter und Drucken ??? - AW: Filter und Drucken ???

Nach oben
       Version: Office 2007

Hi Micha,

wenn ich Dich verstehe, willst Du die Filterergebnisse in Zeile 1 angezeigt bekommen ?

Da wirst Du um VBA nicht herumkommen: Bau mal eine Tabelle nach folgendem Muster nach und leg den Autofilter auf Zelle A2 ...

 
 A
2Nr.
31
42
53
64
75
86
 



... und füge folgenden Code ins Modul des Tabellenblatts ein:

Code:
Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Long
    For i = 3 To ActiveSheet.UsedRange.Rows.Count
    If ActiveSheet.Rows(i).Hidden = False Then
    Range("A1") = Range("A" & i)
    End If
Next
End Sub


Wenn Du nun den Filter ausführst und anschliessend eine beliebige Zelle markierst, wird das Filterergebnis in Zelle A1 angezeigt ...

_________________
Gruss aus dem wilden Hunsrück
----------- Klaus-Martin -----------
modellmicha
Excel-Benutzer mit Versuch besser zu werden


Verfasst am:
13. März 2009, 13:35
Rufname: Micha
Wohnort: Wilthen

AW: Filter und Drucken ??? - AW: Filter und Drucken ???

Nach oben
       Version: Office 2007

Hallo Klaus,

soweit funktioniert das gut, bloß bleibt jetzt noch ein Problem, wie bekomme ich es hin das alle Felder der Zeile so angezeigt werden, also die Felder a:j ?

Danke Dir auf alle Fälle erst mal

Gruß Micha
modellmicha
Excel-Benutzer mit Versuch besser zu werden


Verfasst am:
13. März 2009, 13:45
Rufname: Micha
Wohnort: Wilthen


AW: Filter und Drucken ??? - AW: Filter und Drucken ???

Nach oben
       Version: Office 2007

Ahhhh, lösung selbst gefunden

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Long
    For i = 3 To ActiveSheet.UsedRange.Rows.Count
    If ActiveSheet.Rows(i).Hidden = False Then
    Range("A1") = Range("A" & i)
    Range("b1") = Range("b" & i)
    Range("c1") = Range("c" & i)
    Range("D1") = Range("D" & i)
    Range("e1") = Range("e" & i)
    Range("f1") = Range("f" & i)
    Range("g1") = Range("g" & i)
    Range("h1") = Range("h" & i)
    Range("i1") = Range("i" & i)
    Range("j1") = Range("j" & i)
   
    End If
Next
End Sub


Danke noch mal

Gruß Micha
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Filter abhängige Zählefunktion 8 lichtschatten 505 25. Jul 2008, 11:47
lichtschatten Filter abhängige Zählefunktion
Keine neuen Beiträge Excel Formeln: Iteration ohne VBA? - "manuellen Filter" erstellen 4 niko001 1283 07. Jul 2008, 11:36
niko001 Iteration ohne VBA? - "manuellen Filter" erstellen
Keine neuen Beiträge Excel Formeln: Filter von Zahlen 4 Finwe 804 28. Mai 2008, 12:41
Finwe Filter von Zahlen
Keine neuen Beiträge Excel Formeln: Filter mit Pivot-Tabelle 8 RTL-Praktikant 2431 20. Mai 2008, 10:40
Thomas Ramel Filter mit Pivot-Tabelle
Keine neuen Beiträge Excel Formeln: filter 0 markus0815 290 16. Apr 2008, 11:40
markus0815 filter
Keine neuen Beiträge Excel Formeln: Filter abhängige Formeln 10 lichtschatten 781 04. Okt 2007, 15:54
lichtschatten Filter abhängige Formeln
Keine neuen Beiträge Excel Formeln: Zellen mit Leerstring nicht drucken 6 Eminent 1185 03. Sep 2007, 11:26
Eminent Zellen mit Leerstring nicht drucken
Keine neuen Beiträge Excel Formeln: Drucken nur mit Passwort 1 Martina999 3120 11. Jul 2007, 13:50
< Peter > Drucken nur mit Passwort
Keine neuen Beiträge Excel Formeln: Hallöchen - Markierte Zellen drucken 5 Jamelja 1303 05. März 2007, 21:24
Jamelja Hallöchen - Markierte Zellen drucken
Keine neuen Beiträge Excel Formeln: Filter / Sortieren 1 Christos 703 21. Nov 2006, 15:08
McAdder Filter / Sortieren
Keine neuen Beiträge Excel Formeln: Bedingte Formatierung nicht drucken? (oder Makro?) 1 Gast 1223 23. Aug 2006, 13:46
Cabation Bedingte Formatierung nicht drucken? (oder Makro?)
Keine neuen Beiträge Excel Formeln: Filter, mehrere Zahlen 4 Gast 695 01. Aug 2006, 13:44
Gast Filter, mehrere Zahlen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Macromedia Dreamweaver