Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Makro zum Einblenden der Zeilen
zurück: Microsoft Forms 'ungültiger Eigenschaftenwert' weiter: Bilder per Makro in Zelle einfügen mit Größenanpassung Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Kolmi
Gast


Verfasst am:
10. Nov 2009, 18:19
Rufname:

Makro zum Einblenden der Zeilen - Makro zum Einblenden der Zeilen

Nach oben
       Version: Office XP (2002)

Hallo!

Ich suche ein Makro, dass mir in einer Excel-Tabelle nur diejenigen Zeilen anzeigt (einblendet), welche in den Zellen der Spalte D ein bestimmtes Wort "xyz" enthält. Es kann aber auch sein, dass ausser dem Wort "xyz" noch mehr in der Zelle steht "xyz blbabla"und auch diese Zeilen sollen in der Tabelle angezeigt werden. Alle andern Zeilen der Tabelle sollen ausgeblendet werden.

Ich hoffe es kann mir bei dem Problem jemand weiterhelfen, ich bin nämlich eine Makro-Niete... Sad Vielen Dank bereits im Voraus.

Gruss
Phelan XLPH
Fortgeschritten


Verfasst am:
10. Nov 2009, 18:22
Rufname: Phelan


AW: Makro zum Einblenden der Zeilen - AW: Makro zum Einblenden der Zeilen

Nach oben
       Version: Office XP (2002)

Wieso benutzt du nicht den Filter?
_________________
Was vorstellbar ist, ist auch machbar. - Albert Einstein
Gast



Verfasst am:
10. Nov 2009, 18:32
Rufname:

AW: Makro zum Einblenden der Zeilen - AW: Makro zum Einblenden der Zeilen

Nach oben
       Version: Office XP (2002)

Nun ich habe keine Ahnung von Makros, aber falls der Auto-Filter gemeint ist, kann ich diesen nicht benutzen, weil nicht immer nur "xyz" in der Zelle steht, sondern die Zelle auch andere Wörter beinhaltet.

Vielen Dank für die Hilfe
Phelan XLPH
Fortgeschritten


Verfasst am:
10. Nov 2009, 20:13
Rufname: Phelan

AW: Makro zum Einblenden der Zeilen - AW: Makro zum Einblenden der Zeilen

Nach oben
       Version: Office XP (2002)

Kannst du mit dem Autofilter denn nicht mit dem Kriterium "enthält" filtern?

oder das da hier:
Code:
Sub Filtern()
Dim arr As Variant
Dim i As Long
Dim t As Double
Dim blnExist As Boolean
Dim vSuchWert As Variant


vSuchWert = InputBox("Bitte Suchwert eingeben:" & vbLf & vbLf & _
                     "[*]=Platzhalter für x-beliebiges Zeichen" & vbLf & _
                     "[?]=Platzhalter für einzelnes Zeichen" & vbLf & _
                     "[#]=Platzhalter für eine Ziffer")

If Trim(vSuchWert) = "" Then Exit Sub

t = Timer
arr = Range("D2:D" & Cells(Rows.Count, 4).End(xlUp).Row)
For i = 1 To UBound(arr)
    If arr(i, 1) Like vSuchWert Then
        arr(i, 1) = "<<<"
        blnExist = True
    End If
Next

Rows.Hidden = False
If blnExist Then
Application.ScreenUpdating = False
Range("A:A").Insert
With Range("A2").Resize(UBound(arr))
    .Value = arr
    On Error Resume Next
    .ColumnDifferences(.Find("<<<")).EntireRow.Hidden = True
    On Error GoTo 0
End With
Range("A:A").Delete
Application.ScreenUpdating = True
End If

'MsgBox Timer - t
End Sub

_________________
Was vorstellbar ist, ist auch machbar. - Albert Einstein
Kolmi
Gast


Verfasst am:
11. Nov 2009, 08:29
Rufname:


AW: Makro zum Einblenden der Zeilen - AW: Makro zum Einblenden der Zeilen

Nach oben
       Version: Office XP (2002)

Glücksritter die Aufgabe ist gelöst, vielen, vielen Dank! Nun ist das Makro wo es hingehört.

Anmerkung:
In meinem Excel-File hats noch mehr Makros (selbstverständlich nicht durch mich erstellt Rolling Eyes ) und somit war eine Lösung mit Autofiltern nicht optimal und vor allem auch nicht so elegant! Wink

Vielen Dank und Gruss
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: HILFE" brauche dringend eine Formel oder Makro" 2 norbert10296 933 28. Okt 2005, 16:39
jvakleve61 HILFE" brauche dringend eine Formel oder Makro"
Keine neuen Beiträge Excel Formeln: Bei dreifachen Werten Zeilen löschen 14 Kosich 823 01. Sep 2005, 14:23
Kosich Bei dreifachen Werten Zeilen löschen
Keine neuen Beiträge Excel Formeln: Zählen von Einträgen in Zeilen oder Spalten 3 ggaribaldi 1657 27. Jul 2005, 09:23
steve1da Zählen von Einträgen in Zeilen oder Spalten
Keine neuen Beiträge Excel Formeln: Zeilen mit Wert 0 ausblenden 2 MartinJungwirth 1448 24. Jun 2005, 13:53
MartinJungwirth Zeilen mit Wert 0 ausblenden
Keine neuen Beiträge Excel Formeln: Farbige Zeilen bei verschiedenen Kriterien 10 Nixweis 1254 09. Jun 2005, 13:59
Nixweiß Farbige Zeilen bei verschiedenen Kriterien
Keine neuen Beiträge Excel Formeln: automatisches Speichern des Tabellenblatts mit Makro 6 Frank vhet 841 11. Mai 2005, 13:14
Frank vhet automatisches Speichern des Tabellenblatts mit Makro
Keine neuen Beiträge Excel Formeln: Makro per Button ausführen lassen und if then problem 5 Darwin 3876 09. Mai 2005, 14:57
Darwin Makro per Button ausführen lassen und if then problem
Keine neuen Beiträge Excel Formeln: Leere Zeilen vom Kombinationsfeld löschen 5 sifak 1332 19. Apr 2005, 17:11
Hübi Leere Zeilen vom Kombinationsfeld löschen
Keine neuen Beiträge Excel Formeln: Gibt es eine Formel mit der man Zeilen löschen kann? 5 kara ben nemsi 1956 15. Apr 2005, 10:19
Kuwe Gibt es eine Formel mit der man Zeilen löschen kann?
Keine neuen Beiträge Excel Formeln: Vergleichen von Spalten UND Zeilen. 3 mojoe321 1836 15. März 2005, 17:14
Hübi Vergleichen von Spalten UND Zeilen.
Keine neuen Beiträge Excel Formeln: Funktion zum autom. Einblenden einer Gruppierung? 2 original-m 819 28. Feb 2005, 19:11
original-m Funktion zum autom. Einblenden einer Gruppierung?
Keine neuen Beiträge Excel Formeln: Zeilen Minimum 2 -Christoph- 1736 22. Nov 2004, 13:01
-Christoph- Zeilen Minimum
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel Tricks