Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
528to532
528to532
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalten löschen - ganze Tabelle ist leer !!

Forumthread: Spalten löschen - ganze Tabelle ist leer !!

Spalten löschen - ganze Tabelle ist leer !!
09.12.2004 10:57:31
Jutta
Hallo,
was mach ich denn da falsch ?
Ich lösche bestimmte Spalten mit folgendem Makro

Sub Spalten_löschen()
Application.ScreenUpdating = False
Columns("C:C").Select
Selection.Delete Shift:=xlToLeft
Columns("D:D").Select
Selection.Delete Shift:=xlToLeft
Columns("E:E").Select
Selection.Delete Shift:=xlToLeft
Columns("F:F").Select
Selection.Delete Shift:=xlToLeft
Range("A4").Select
Application.ScreenUpdating = True
End Sub

Aber anschließend ist die ganze Tabelle leer. Das selbe Problem habe ich auch, wenn ich Spalten einfüge.
Ich habe das mit dem Makrorecorder aufgezeichnet. Beim neuen Starten ist jeweils die Tabelle leer.
Gruß
Jutta
Anzeige
AW: Spalten löschen - ganze Tabelle ist leer !!
Heiko
Hallo Jutta,
versuche es mal so,

Sub Spalten_löschen()
Application.ScreenUpdating = False
Columns("C:F").Select
Selection.Delete Shift:=xlToLeft
Range("A4").Select
Application.ScreenUpdating = True
End Sub

Gruß Heiko
AW: Spalten löschen - ganze Tabelle ist leer !!
09.12.2004 11:36:18
Jutta
Hallo Heiko,
jetzt habe ich es auch gesehen: der Makrorecorder hat da Quatsch aufgezeichnet.
Ich will ja gar nicht von C- F löschen.
Ich habe das Makro jetzt geändert,aber da ist noch immer ein Wurm drin.

Sub Spalten_löschen()
Application.ScreenUpdating = False
Columns("C:C,E:E,G:G,I:I,K:K,M:M,O:O,Q:Q,S:S,U:U,W:W,AA:AA,AC:AC,AE:AE,AG:AG,AI:AI,AK:AK,AM:AM,AO:AO,AR:AR").Select
Selection.Delete Shift:=xlToLeft
Range("A4").Select
Application.ScreenUpdating = True
End Sub

Siehst Du was ?
Gruß
Jutta
Anzeige
AW: Spalten löschen - ganze Tabelle ist leer !!
EtoPHG
Hallo Jutta,
Vielleicht geht's so:

Sub Spalten_löschen()
Range("C:C,E:E,G:G,I:I,K:K,M:M,O:O,Q:Q,S:S,U:U,W:W,AA:AA,AC:AC,AE:AE,AG:AG,AI:AI,AK:AK,AM:AM,AO:AO,AR:AR").EntireColumn.Delete
End Sub

Gruss Hansuelie
AW: Spalten löschen - ganze Tabelle ist leer !!
09.12.2004 13:04:21
Jutta
Hallo Hansuelie,
so klappt's . Danke !
Gruß
Jutta
Anzeige
AW: Spalten löschen - ganze Tabelle ist leer !!
09.12.2004 13:44:57
Jutta
Hallo Hansuelie,
noch eine Frage, da ich das selbe Problem beim Einfügen habe.
Mit

Sub Spalten_einfügen()
Range("Q:Q,S:S,U:U").Select
Range("U1").Activate
Selection.Insert Shift:=xlToRight
End Sub

Ist beim neuen Starten des Makros wieder die Tabelle leer. Wie muss ich das Makro hier änderen um die Spalten einzufügen.
Gruß
Jutta
Anzeige
AW: Spalten löschen - ganze Tabelle ist leer !!
EtoPHG
Hallo Jutta,

Sub Spalten_löschen()
Range("Q:Q,S:S,U:U").EntireColumn.Insert
End Sub

Gruss Hansueli
HALT: Spalten einfügen
EtoPHG
Jutta,
Korrektur:

Sub Spalten_einfügen()
Range("Q:Q,S:S,U:U").EntireColumn.Insert
End Sub

Gruss Hansueli
Anzeige
AW: HALT: Spalten einfügen
09.12.2004 14:17:01
Jutta
Hallo Hansueli,
Tag gerettet! Danke !
Gruß
Jutta
AW: Spalten löschen - ganze Tabelle ist leer !!
Volker
Hallo Jutta,
wenn du das wirklich aufgezeichnet hast, hätte "Columns("C:R").Select" rauskommen müssen.
So muß das aussehen, dann klappt's auch mit dem Löschen:

Sub Spalten_löschen()
Application.ScreenUpdating = False
Columns("C:R").Select
Selection.Delete
Range("A4").Select
Application.ScreenUpdating = True
End Sub

das "shift:=xltoleft" wird zwar mit aufgezeichnet, kann aber wegfallen, wenn ganze Spalten gelöscht werden. Es kann ja nur seitlich verschoben werden.
Gruß
Volker
Anzeige
AW: Spalten löschen - ganze Tabelle ist leer !!
09.12.2004 13:07:40
Jutta
Hallo Volker,
das versteh ich ja auch nicht. Ich habe mit dem Makrorecorder nach und nach jede Spalte markiert und gelöscht. Aufgezeichnet war dann der Quatsch.
Aber Hansueli hat mein Makro korrigiert. Jetzt klappts.
Danke für Deine Hilfe (immerhin hat mich Dein Tipp auf meinen Fehler gebracht).
Gruß
Jutta
Anzeige
;

Forumthreads zu verwandten Themen

Zellen mit gleicherm Inhalt verbinden
marcl

Hallo Froumsgemeinde,
ich bin auf der Suche nach einer aus meiner Sicht komplizierten Schleife.
Ich möchte ab einer gewissen Zellen alle darunter befindlichen, welche den gleichen Inhalt oder keine Inhalt haben und links oder rechts daneben belegt sind, zusammen fassen. Das so lange, bi...
17.11.2008 13:37:00
Thread-ID: 1025198
5 Beiträge
Spalte auslesen und in eine neue schreiben
Andrej

Hallo,
ich sitz seit gestern an nem Excel Dokument und habe es schon mit Formeln versucht, aber das alles nicht das Wahre.
Gibt es eine Lösung bei der ich aus der Spalte C nach bestimmten Sachen suchen lassen, die ich immer vorgeb, wie z.b. XY oder AB und er mir auch der Vorgabe nach in...
19.11.2008 12:46:00
Thread-ID: 1025987
13 Beiträge
nach maximieren eigene Menüleiste weg
Frank

https://www.herber.de/bbs/user/57988.xls
Hallo Excelfreunde wünsche ein Frohes 2009.
Hab wieder mal ein Problem und hoffe es kann mir jemand helfen.
Habe eine eigene Menüleiste erstellt.
Wenn ich jetzt die Mappe über "Desktop anzeigen" in der Taskleiste minimiere und ansch. wie...
01.01.2009 22:51:00
Thread-ID: 1036311
2 Beiträge
Diagrammpunkte mit Striche verbinden
Franz

Hallo zusammen,
ich möchte aus einem Datenblatt, welches z.Zt. noch per Hand erstellt wird, zukünftig ein Diagramm gem. beigefügtem Muster erstellen. Muster = https://www.herber.de/bbs/user/58104.doc
Die Besonderheit liegt darin, dass die einzelnen Punkte über einen Strich verbunden we...
06.01.2009 11:33:05
Thread-ID: 1037178
3 Beiträge
@Timo: das ist neu Beitrag, da alter weg ist !
Richi

Hi Finde unseren ewig langen Beitrag nicht mehr ! habbe schon alles durchgewühlt, deshalb neu !
Also:
jatzt kann ich alle pbc Dateien einlesen.
aber beim Schreiben probleme !
https://www.herber.de/bbs/user/58643.jpg

Variable nicht definiert....
kans mal schuan !...
21.01.2009 09:55:23
Thread-ID: 1042071
3 Beiträge
ListenFelder füllen aus Spalten
Andre´

Hallo alle zusammen,
ich möchte vom aktiven Tabellenblatt die Spalten A, B, C, D in eine UserForm einlesen, beginnend ab Zeile 2 bis zu der Zeile, wo der letzte Eintrag in der Spalte A vorhanden ist.
Jede der genannten Spalten soll in einen eigenen Listenfeld erscheinen.
Ziel soll...
02.02.2009 16:41:17
Thread-ID: 1046318
4 Beiträge
Buttonbewegung mit derLaufleiste im aktiven Sheet
eugen

Hallo Excelfreunde,
brauche mal wieder eure Excelhilfe ...
in meiner Exceltabelle habe ich mehrere Sheets mit Button "Vorwärts" und Button "Zurück" erstellt.
Ich möchte, dass meine Buttons sich in dem aktiven Sheet mit der Laufleiste (nach Oben und Nach Unten sowie nach Rechts un...
18.02.2009 13:37:00
Thread-ID: 1051781
3 Beiträge
Ergebnis auslesen und in andere Spalte übertragen
Alex

Hallo,
Kann mir jemand bei folgendem Problem helfen:
Ich habe drei Spalten A, B, C.
In Spalte A steht in wenigen Zellen etwas drin und sehr viele Zellen sind leer. In Spalte B wird die Anzahl leerer Zellen der Spalte A gezählt und jedes Mal wenn in A etwas drin steht, beginnt er mit...
17.03.2009 08:16:28
Thread-ID: 1060992
5 Beiträge
Anzeige
Spalte A und E aus allen Blätern zusammenkopieren
Mindjogger

Servus,
ich möchte aus einer Excel Datei aus allen darin enthaltenen Blättern jeweils die Spalte A und E in eine neue Excel Datei auf ein Sheet kopieren.
Oder noch genauer:
ich möchte aus einer Excel Datei aus allen darin enthaltenen Blättern jeweils ein Schlüsselwort (unique) als...
26.03.2009 17:01:20
Thread-ID: 1064329
4 Beiträge
Spalten mit Makro nach Vorgabe ein und ausblenden
Christoph

Hallo,
will mit Hilfe eines Makros eine bestimmte Anzahl an Spalten ein- bzw. ausgeblendet haben. Habe selbiges mal für Zeilen selbst programmiert:
Sub Zeilenausblenden() Rows("9:209").Hidden = True Rows("9:" & (9 + Range("A4").Value)).Hidden = False End Sub
Für Spalten klapp...
09.04.2009 14:44:26
Thread-ID: 1068032
3 Beiträge
Differenz zwischen zwei Zellen errechnen
Sandra

Hallo zusammen,
ich arbeite mit einem Makro Daten in Spalte A (ab Zeile bis zur letzten belegten Zelle) ab. Über
ActiveCell.Offset(0, 14).Value = Format(Date & " " & Time) trage ich DAtum und Zeit ein.
Frage wäre jetzt, ob man zwischen der Zeile 2 und der letzten belegten Ze...
29.04.2009 20:57:10
Thread-ID: 1072000
6 Beiträge
Spalte nach Wert >10 durchsuchen und Wert ausgeben
Ron

Hallo Leute,
ich benötige wieder mal Hilfe bei der Umsetzung einer Idee. Ich habe in einem Tabellenblatt in einer Spalte (A) 20 absteigende Werte in Prozent. In Spalte B habe ich in ganzen Zahlen die Treffer aus meiner Datenbank zugeordnet. Jetzt möchte ich Spalte B von oben nach dem ersten...
05.05.2009 14:44:46
Thread-ID: 1073093
9 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige