Datum

Titel

25.04.2024 18:41:19

vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile

25.04.2024 18:22:55

Zeilen mit bestimmtem Datum in andere Mappe übertragen

25.04.2024 18:14:45

VBA - Excell - Kopie und "Diebstahl" Schützen

25.04.2024 17:49:39

Bedingte Formatierung

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1672to1676

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Bestimmte Spalten ab Spalte D löschen - VBA

Forumthread: Bestimmte Spalten ab Spalte D löschen - VBA
11 Beiträge zu diesem Forumthread
Anzeige
308 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

10.02.2019 14:10:47

Fritz

Hallo Forumsbesucher,
ich benötige erneut eure Hilfe wie folgt:
In der Tabelle2 sollen alle Spalten (beginnend allerdings erst mit Spalte D) gelöscht werden, in denen in der Zeile 21 weder die Zahl 1 noch das Formelergebnis "" steht bzw. die leer sind.
Das Makro soll auch aus anderen Tabellenblättern gestartet werden können.
Für eure Unterstützung im Voraus besten Dank.
mfg
Fritz

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 15:23:55

Hajo_Zi
..wen interessiert das, was Du liest und nicht ?

10.02.2019 15:28:57

robert
wenn interessiert, was robert schreibt?

10.02.2019 15:31:29

Daniel
wenn? oder wen ? naja, eben ein Daniel....

10.02.2019 16:14:53

robert
Aha, ewige Wiederholungen immer gleicher ...

12.02.2019 20:57:04

Luc:-?
AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 15:34:38

Daniel
AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 15:49:25

Fritz
AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 16:08:14

Fritz
AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 16:13:42

Werner
AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 16:22:00

Fritz
Gerne u. Danke für die Rückmeldung. o.w.T.

10.02.2019 19:49:30

Werner

AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 15:23:55

Hajo_Zi

Hallo Fritz,
sehe ich es Richtig, wenn eine dieser Bedingungen zutrifft
Falls A21=1 oder Leer
Falls B21=1 oder Leer
Falls C21=1 oder Leer
Falls D21=1 oder Leer
sol D:XFD nicht gelöscht werden?

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Die Beiträge werden auch ignoriert, es erfolgt keine Antwort.

..wen interessiert das, was Du liest und nicht ?

10.02.2019 15:28:57

robert

wenn interessiert, was robert schreibt?

10.02.2019 15:31:29

Daniel

eigentlich nie was interessantes

wenn? oder wen ? naja, eben ein Daniel....

10.02.2019 16:14:53

robert

Aha, ewige Wiederholungen immer gleicher ...

12.02.2019 20:57:04

Luc:-?

…Tatbestände sind also interessanter, abgesehen mal von diversen, oft sinnfreien Attacken?
Ich würde wohl eher vermuten, dass du eindeutig sehr viel mehr Zeit zV hast als robert und andere, die außerdem entweder noch verantwortungsvoll einer Arbeit oder gar ehrenamtlicher Tätigkeit nachgehen.
Mit Hajo hast du dich wohl nur deshalb noch nicht angelegt, weil der höchstens mit einer Ergänzung seiner in Wirklichkeit viel umfangreicheren und abgestuften Ignorierliste reagieren würde (nicht antworten, nicht lesen und beides)…
Luc :-?

AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 15:34:38

Daniel

Hi
probiers mal so:

dim s as long
with Sheets("Tabelle2")
for s = .cells.SpeicalCells(xlcelltypelastcell).Column to 4 step - 1
Select Case .Cells(21, s).Value
Case "", 1
Case else: .Columns(s).Delete
end Select
next
end with

Gruß Daniel

AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 15:49:25

Fritz

Hallo Daniel,
vielen Dank, werde es gleich testen und dann Rückmeldung geben.
mfg
Fritz
P.S. Wollte gerade auf die Fragen einzelner antworten und will deshalb - unabhängig von Daniels Vorschlag - mein Anliegen noch mal wie folgt konkretisieren:
Es sollen alle Spalten im Tabellenblatt Tabelle2 ab der Spalte D alle
die in Zeile 21 nicht leeren Spalten gelöscht werden, mit Ausnahme
derjenigen Spalten in denen in Zeile 21 eine 1 oder als Formelergebnis
"" steht.

AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 16:08:14

Fritz

Hallo Daniel,
mein Test erbrachte folgende Fehlermeldung:
Laufzeitfehler 438:
Objekt unterstützt diese Eigenschaft oder Methode nicht.
Gelb markiert wurde die Zeile im Code, die mit "For s " beginnt.
Gruß
Fritz

AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 16:13:42

Werner

Hallo,
Schreibfehler noch

SpeicalCells

Sondern

SpecialCells

Gruß Werner

AW: Bestimmte Spalten ab Spalte D löschen - VBA

10.02.2019 16:22:00

Fritz

Hallo Werner,
genau das war es, Dir erneut vielen Dank.
Dank nochmals auch an Daniel, jetzt funktioniert es wie gewünscht.
Für uns Hilfesuchende einfach großartig, dieses Forum mit diesen kompetenten Helfern.
mfg
Fritz

Gerne u. Danke für die Rückmeldung. o.w.T.

10.02.2019 19:49:30

Werner