Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1800to1804
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
1800to1804
1800to1804
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalte löschen wenn Spaltenüberschrift=X

Spalte löschen wenn Spaltenüberschrift=X
30.12.2020 09:14:07
MH
Guten Tag
Ich möchte mit einem "CommandButton" den Befehl auslösen, die Spalten deren Wert in Zeile 9 kleiner als der Wert in Zelle B6 auszublenden. Die Spalten D:FM sollen geprüft werden.
Leider finde ich keinen Code, der nicht fehlerhaft ist.
Besten Dank für eure Hilfe.
MH

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalte löschen wenn Spaltenüberschrift=X
30.12.2020 09:19:45
Hajo_Zi 

Option Explicit
Sub ausblenden()
Dim inI As Integer
For inI = 4 To 169
Columns(inI).EntireColumn.Hidden = Cells(9, inI)

schneller
30.12.2020 09:25:44
Werner
Hallo,
Public Sub ausblenden()
Dim i As Long, raWeg As Range
Application.ScreenUpdating = False
With Worksheets("Tabelle1")
For i = 4 To 169
If .Cells(9, i)
Gruß Werner
AW: schneller
30.12.2020 13:13:36
MH
Lieber Werner
Super, das funktioniert einwandfrei.
Besten Dank für die Hilfe!
MH
Gerne u. Danke für die Rückmeldung. o.w.T.
30.12.2020 20:11:46
Werner
AW: Spalte löschen wenn Spaltenüberschrift=X
30.12.2020 09:28:06
GerdL
Moin,
was soll sein, wenn B6 leer, keine Zahl, 0 , negative Zahl, Fehlerwert enthält?
... D9:FM9 in der Zelle dito.
Fehler oder nicht ist oft eine Frage der Definition.
Gruß Gerd
Anzeige
AW: Spalte löschen wenn Spaltenüberschrift=X
30.12.2020 10:01:22
Daniel
Hi
Füge in einer freien Zeile (z.B. Zeile 1) folgende Formel für die Spalten D:FM ein:
(Formel für D1, dann nach rechts ziehen):
=Wenn(D9
Als Code für deinen Button reicht dann:
With Range("D1:FM1")
.EntireColumn.Hidden = False
If Worksheetfunction.Sum(.Cells) > 0 then
.SpecialCells(xlcelltypeformulas, 1).entirecolum.hidden = True
End if
Ende with
Gruß Daniel
AW: Spalte löschen wenn Spaltenüberschrift=X
30.12.2020 10:41:22
GerdL
Hi Daniel,
es soll doch fehlerfreier Code sein.
Gruß Gerd
AW: Spalte löschen wenn Spaltenüberschrift=X
30.12.2020 13:15:04
MH
Besten Dank euch. Ich bin zu einem guten Ergebnis gekommen. Funktioniert!
Gruss, MH
Anzeige

136 Forumthreads zu ähnlichen Themen

Makroablauf für bestimmte Spalten
Karsten

Hallo,
ich möchte einen Makro ablaufen lassen, der aber nur ausgeführt wird wenn, sich die aktive Zelle in Spalten B,E,H,K,und N befindet.
Danke für eure Hilfe.
Gruß Karsten
07.03.2009 19:29:06
Thread-ID: 1057747
8 Beiträge
Anzeige
Makro soll in bestimmten Spalten funktionieren.
Karsten


Hallo...
Mir hat jemand aus dem Excelforum diesen Makro erstellt. Kann mir bitte jemand diesen Makro so ändern, dass er nur dann funktioniert, wenn beide selektierten Zellen sich in den Spalten B, E, H, K oder N befinden und die Zellen sich in ungeraden Zeilen befinden (z.B. B3 und E5...
05.10.2009 10:24:17
Thread-ID: 1107217
3 Beiträge
Formel in bestimmte Zellen per makro schreiben??
lisa

Hallo
Ich konnte bislang noch nicht in der Recherche finden und wende mich deshalb an EUCH Spezis.
Vieleicht könnte ihr mir helfen.
In meiner Spalte B steht immer nur in bestimmten Zellen ein Wert, nämlich Ergebnis!
In der Spalte F stehen Werte. Nun möchte ich aber ohne die Wer...
09.11.2009 13:43:49
Thread-ID: 1115507
9 Beiträge
Anzeige
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
#NV in Spalte löschen per VBA
edie

Hallo zusammen,
ich versuche vergebens die #NV in der Spalte B per VBA zu löschen bzw. durch eine Null ersetzen.
Das Makro stoppt bei: 'If Cells(i, 2) = "#NV" Then' mit der Fehlermeldung: 'Typen unverträglich'.
Weiß nicht mehr weiter, deshalb bitte um Hilfe, wenn's geht.
Sub Te...
16.02.2010 14:12:15
Thread-ID: 1138929
4 Beiträge
Makro zum löschen bestimmter Spalten
Otto

GUten Morgen,
Ich brauche Eure Hilfe. Ich brauche ein Makro, das alle Spalten in einer Tabelle löscht, die in ihrer ersten Zelle bestimmte worte NICHT enthalten.
Also:
Ich habe viele verschieden Dateien jeder mit 15-25 Spalten. Ich brauche aber nur 3 von diesen Spalten von jeder Dat...
14.03.2010 11:51:06
Thread-ID: 1145702
6 Beiträge
variabel Spalten Löschen
Hermann

Liebe Excel-Gemeinde,
leider komme ich mal wieder nicht weiter und hoffe auf
eure Unterstützung bei 2 für euch winzigen Problemchen.
1) Ich versuche variable Spalten zu löschen mit dem Befehl
ActiveSheet.union(range(cells(1,spaWeg+6),cells(99,spaWeg+25)).EntireColumn.Delete
...
02.05.2010 18:27:25
Thread-ID: 1155013
7 Beiträge
Makro macht Probleme beim Löschen von Zellen
Zellen

Hallo,
folgendes tolles Makro habe ich mit eurer Hilfe in die Tabelle eingebaut.
Funktioniert alles super. Gebe ich in dem untersuchten Bereich etwas ein, wird in eine Zelle etwas geschrieben. Nun wollte ich, dass wenn der Wert im untersuchten Bereich gelöscht wird, auch der Wert in der...
28.05.2010 10:43:57
Thread-ID: 1159185
5 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton

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
7
6
2
8
4
3
3
5
6
4
2
20
9
4
1
4
1
11
15
3
6
4
6
12
2