Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1524to1528
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1524to1528
1524to1528
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Zellen im Bereich ausblenden

VBA Zellen im Bereich ausblenden
21.11.2016 13:24:25
Raimund
Hi All.
Folgendes Problem.
Habe Bereich F8:Q1000.
Wenn in der Spalte Q (Q8:Q1000) text Not Serviced steht, dann sollen sie zellen im Bereich F8:Q1000 ausgeblendet werden, aber nur in diesem Bereich. Alles im Bereich A:E soll bleiben wie es war.
Danke im Voraus

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

Betreff
Datum
Anwender
Anzeige
AW: VBA Zellen im Bereich ausblenden
21.11.2016 15:28:39
Daniel
Hi
ausblenden kann man immer nur ganze Zeilen oder ganze Spalten.
das einzige was du machen könntest wäre, dass über die Bedingte Formatierung in diesen Zellen der Inhhalt unsichtbar wird.
Gruß Daniel
AW: VBA Zellen im Bereich ausblenden
21.11.2016 17:06:18
Raimund
Hi Daniel.
Ist es Moeglich nur in dem Bereich die Zellen zu loeschen anstatt auszublenden?
Wenn in der Spalte Q8:Q1000 Zelle = Not Serviced, dann sollen die Zellen im Bereich F8:Q1000, wenn es zutrifft, geloescht werden
Danke im Voraus
AW: VBA Zellen im Bereich ausblenden
21.11.2016 17:22:18
Daniel
Hi
komplett löschen geht.
die darunter liegenden Zellen rutschen dann nach oben nach.
code dafür wäre:
With Range("Q8:Q1000")
if Worksheetfunction.countif(.Cells, "Not Serviced") > 0 Then
.Replace "Not Serviced", true, xlwhole
Intersect(.SpecialCells(xlcelltypeconstants, 4).EntireRow, .Worksheet.Range("F:Q")).Delete  _
Shift:=xlup
End with
gruß Daniel
Anzeige
AW: VBA Zellen im Bereich ausblenden
21.11.2016 18:02:00
Raimund
Hi Daniel.
Geht nicht.
Teil des Scripts (Fett) bekomme ich in Gelb 
Sub Weg()
Range("q8:q1000").Select
With Range("Q8:Q1000")
If WorksheetFunction.CountIf(.Cells, "Not Serviced") > 0 Then
.Replace "Not Serviced", True, xlWhole
    Intersect(.SpecialCells(xlCellTypeConstants, 4).EntireRow, .Worksheet.Range("F:Q")). _
Delete _
Shift:=xlUp
End If
End With
End Sub

AW: VBA Zellen im Bereich ausblenden
21.11.2016 18:14:06
Daniel
Hi
bei mir geht's.
wie lautet denn die vollständige Fehlermeldung (Fehlernummer und Text)?
Warum lieferst du diese Information nicht gleich mit und warum muss ich dich erst danach fragen?
hast du beachtet, dass, wenn du den Code mit Copy-Paste aus dem Forum übernimmst, die Zeilenumbrüche (dort wo "_" am Ende steht) eleminieren musst?
die Software dieses Forums fügt diese automatisch ein, wenn ihr eine Codezeile zu lang erscheint, leider ist diese Einfügung dann nicht VBA-Kompatibel.
eine andere Möglichkeit wäre, dass in den Zellen der Wert als Formel und nicht als fester Test steht.
dann funktioniert mein Code so nicht und müsstest das etwas anders machen.
gruß Daniel
Anzeige
AW: VBA Zellen im Bereich ausblenden
22.11.2016 09:39:17
Raimund
Hi Daniel.
Habe es auch so versucht.
Bekomme Fehlermeldung:
Run-Time error '1004':
No cells were found
In der Spalte Q habe ich folgende Formel.
=IF(ISERROR(MATCH(P8,$B$8:$B$1000,0)),"Not Serviced","Serviced")
Danke im Voraus
AW: VBA Zellen im Bereich ausblenden
22.11.2016 09:57:37
Daniel
Hi
ok, warum nicht gleich so?
Bitte beantworten, mich interessiert, warum Fragesteller oft so zurückhalten mit der Informationsweitergabe sind.
hättest du gleich die Fehlermeldung geschrieben oder nochbesser gleich zu Anfang mitgeilt, dass das Ergebnis durch eine Formel erstellt wird, hätte ich dir auch gleich die richtige Antwort geben können.
Gruß Daniel
Anzeige
AW: VBA Zellen im Bereich ausblenden
22.11.2016 10:28:25
Raimund
Hi Daniel.
Sorry for this mistake.
War mir nicht bewusst, dass diese Formel in der Spalte Q eine so wichtige Rolle spielt und dass ich nicht gleich die Fehlermeldung mitgeteilt habe.
Werde mich in der Zukunft verbessern und nicht eure Zeit verschwenden.
Danke im Voraus
AW: VBA Zellen im Bereich ausblenden
22.11.2016 10:42:11
Daniel
Hi
nun, das kommt darauf an, wie man das Problem löst.
ich verwende für solche Aufgaben gerne das SpecialCells, welches dem START - BEARBEITEN - GEHE ZU - IHNALTE entspricht und da wird zwischen unteschrieden Formeln und Festwert.
du könntest in deinem Fall die Aufgabe so lösen:
1. ändere die Formel so ab, daß in der Formel statt "Not Serviced" die Zahl 0 ausgeben wird.
2. als Code reicht dann das:
With Range("Q8:Q1000")
if Worksheetfunction.countif(.Cells, 0) > 0 Then
Intersect(.SpecialCells(xlcelltypeconstants, 1).EntireRow, .Worksheet.Range("F:Q")).Delete  _
shift:=xlup
End with
Gruß Daniel
Anzeige
AW: VBA Zellen im Bereich ausblenden
22.11.2016 12:23:45
Daniel
Hi
naja, Reimund, alles was in Anfühungszeichen steht ist für Excel Text, auch wenn dieser Text nur Ziffern enthält.
Zahlen stehen nie in Anführungszeichen.
Und ich schreib doch, dass deine Formel die Zahl 0 als Ergebnis ausgeben soll und nicht den Text "0".
(wobei die 0 hier eigentlich egal ist, wichtig ist, dass bei den Zeilen, die gelöscht werden sollen eine Zahl steht und bei denen die stehen bleiben müssen ein Text, damit das .SpecialCells die Zellen richtig erkennen kann)
Gruß Daniel
Anzeige
AW: VBA Zellen im Bereich ausblenden
22.11.2016 12:38:52
Raimund
Hi Daniel.
Es funktioniert weder mit "0" noch mit 0 als Zahl.
Na ja. Muss ich es anders versuchen.
Vielen Dank fuer Deine Zeit
AW: VBA Zellen im Bereich ausblenden
22.11.2016 13:28:14
Daniel
Deine Datei enthält leider keine Makros, daher kann ich dir nicht weiterhelfen.
Die Buttons sind mit makros in anderen Dateien verknüpft die ich nicht habe.
Wie gesagt, wenn du willst, dass man dir hilft, dann musst du auch deine Daten und Makros zeigen, sonst ist alles nur rumstocheren im Nebel.
Gruß Daniel
AW: VBA Zellen im Bereich ausblenden
22.11.2016 13:30:04
Daniel
was mir grad noch so einfällt, hast du in den SpecialCells auch von xlcelltypeconstants auf xlcelltypeformulas umgestellt?
Gruß Daniel
Anzeige

308 Forumthreads zu ähnlichen 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
Anzeige
Makro - Zeilen ein- und ausblenden
WalterK

Hallo,
den Code habe ich vor längerer Zeit in einem Forum gefunden und die Bezeichnung "Ein" und "Aus" auf "Privat+Intern Ein" und "Privat+Intern Aus" abgeändert. Noch ist es so, dass über den CommandButton die Zeilen mit den Nichtleeren Zellen in Spalte H aus- oder eingeblendet werden.
...
05.07.2009 11:07:55
Thread-ID: 1086451
6 Beiträge
Automatisch Spalten ausblenden - mit einem Makro?
Jan

Hallo nochmal!
Ich wurde gerade schon einmal in Weltrekordzeit bei meinem anderen Problem geholfen. Vielen herzlichen dank! Nun stehe ich aber erneut vor einer für mich schwierigen Aufgabe. Folgendes Problem:
Wir sind mehrere Gewerke die an einer Excel Tabelle arbeiten. Die Excel Tabell...
28.07.2009 15:46:49
Thread-ID: 1091988
7 Beiträge
Anzeige
bestimmte Spalten ein- und ausblenden (VBA) | Herbers Excel-Forum
Matthias
Hi,
ich bräuchte ein wenig Hilfe zu folgendem Vorhaben:
In einer Liste, in der Identnummern für eine Maschine verwaltet werden, sollen bestimmte Spalten über ein Auswahlmenü ein- und ausgeblendet werden können. Dabei sollen bei Auswahl einer Maschinenbaugröße (von 110 bis 610) immer drei Sp...
24.01.2010 16:55:43
Thread-ID: 1132489
4 Beiträge
VBA: Text in Spalten - mehrere Spalten | Herbers Excel-Forum
Jonathan
Hallo liebe Experten,
ich bräuchte mal wieder etwas Hilfe...
In einer Tabelle stehen in einigen Spalten (jeweils ab Zeile 9 - Zeile 46) Zahlen.
Die Zellen sind als "Standart" definiert. Jedoch ist es so, dass einige Zahlen dennoch nicht als solche erkannt werden. Erst nach einem Doppelk...
05.02.2010 09:43:46
Thread-ID: 1136027
4 Beiträge
Spalten und Zeilen ausblenden per Makro
Stefan

Hallo,
ich möchte per Makro bestimmte Spalten und Zeilen ausblenden. Der mit dem Makrorcorder erst aufgezeichnete und angepaßte Weg blendet mir dann allerdings alle Spalten und Zeilen aus.
Kann mir bitte jemand helfen, wie ich den Code schreiben muss?
Sub Fall2_Spalten_Zeilen_ausb...
06.04.2010 10:10:32
Thread-ID: 1150290
9 Beiträge
VBA Zeilen ein-/ausblenden
Daniel

Hallo
Ich habe eine Frage, ob der nachfolgende VBA-Code vereinfacht werden kann.
Ausgangslage: in der Spalte B sind die Auswahlkriterien (3 stellige Nummern: 101, 102, 103, etc.). Nun soll via Makro alle Zeilen einer bestimmte Nummer (z.B. 101) angezeigt werden.
Ist es möglich, den...
07.07.2010 10:43:30
Thread-ID: 1165894
8 Beiträge
VBA Problem bei Zeilen ausblenden
Lorenz

Hallo Excelspezialisten,
Leider funktioniert der untenstehende Code nur wenn nach Zeile 97 alle Zeilen eingeblendet sind.
Ich habe aber ab Zeile 98 alle Zeilen ausgeblendet.
if Target.Row >= 14 Then
iZ = Target.Row + 1
With Range(Cells(iZ, 1), Cells(97, 1))
.EntireRow...
28.12.2010 14:15:45
Thread-ID: 1193064
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
4
5
6
5
3
3
8
7
7
3
1
2
5
6
9
5
2
2
4
1
3
2
6
3