Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1516to1520
1516to1520
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA alte Tabellenblätter löschen

Forumthread: VBA alte Tabellenblätter löschen

VBA alte Tabellenblätter löschen
28.09.2016 18:19:21
Chris
Hey Leute,
per VBA muss ich ein neues Tabellenblatt erstellen, sobald dies erstellt ist sollen alle anderen Tabellenblätter gelöscht werden.
Wie kriege ich das mit einem VBA Makro hin?
Danke im voraus
Gruß Chris
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA alte Tabellenblätter löschen
28.09.2016 18:25:23
Daniel
Hi
Dim i As Long
Sheets.Add before:=Sheets(1)
Application.DisplayAlerts = False
For i = 2 To ActiveWorkbook.Worksheets.Count
Worksheets(2).Delete
Next
Application.DisplayAlerts = True
gruß Daniel
AW: VBA alte Tabellenblätter löschen
28.09.2016 18:26:27
Hajo_Zi
Hallo Chris,
Option Explicit
Sub Loeschen()
Dim WsTabelle As Worksheet
Application.DisplayAlerts = False
For Each WsTabelle In Worksheets
If WsTabelle.Name  ActiveSheet.Name Then
WsTabelle.Delete
End If
Next WsTabelle
Application.DisplayAlerts = False
End Sub


Anzeige
AW: VBA alte Tabellenblätter löschen
28.09.2016 18:37:31
Werner
Hallo Chris,
und noch eine Version, wobei Hajo bei seinem Code wohl vergessen hat zunächst ein neues Tabellenblatt anzulegen.
Public Sub Erstellen_Löschen()
Application.DisplayAlerts = False
Worksheets.Add
ActiveSheet.Name = "Neues_Blatt"
For Each Worksheet In ActiveWorkbook.Worksheets
If Worksheet.Name  "Neues_Blatt" Then
Worksheet.Delete
End If
Next Worksheet
Application.DisplayAlerts = True
End Sub
Gruß Werner
Anzeige

Forumthreads zu verwandten Themen

Pivot VBA Tabellenblatt löschen
murat

Halllo,
ich möchte ein erzeugtes tabellenblatt, das durch pivot doppelklick entstanden ist wieder löschen.
ich habe folgendes Makro
Private Sub CommandButton1_Click() Dim letzteZelle As Long letzteZelle = Worksheets("Tabelle42").Cells.Find(What:="*", _ After:=[A1], SearchDirection:=...
24.01.2010 21:10:25
Thread-ID: 1132506
5 Beiträge
löschen von Tabelle2 VBA
Tabelle2

Hallo zusammen,
ich habe in der Tabelle 1
Nummern und texte vergeben
Spalte A2
1-01-01-10
1-01-02-20,08
1-01-02-20,07
1-80-01-10
1-80-01-10,01
1-55-09-30
In der Tabelle 2
D2
stehen plätze oder Texte drin die in der Tabelle 1 gelöscht ( komplette...
13.02.2016 08:48:36
Thread-ID: 1475215
5 Beiträge
VBA Button letzte Tabellenspalte löschen
Thorsten

Hallo ich bräuchte Hilfe. Ich will einen VBA Button, der mir bei Knopfdruck die letzte _
beschrieben Zeile löscht. Private Sub CommandButton2_Click() Dim loLetzte As Long With Sheets("Arbeitsmittel") loLetzte = .Cells(Rows.Count, 1).End(xlUp).Row 'letzte Zeile in Spalte A, Spalte anpasse...
15.01.2021 23:56:11
Thread-ID: 1806092
16 Beiträge
Anzeige
VBA die letzten Blätter löschen
P.
Hallo liebe Leute,
ich stehe vor einer kleinen Herausforderung.
Ich benutze einen Code:
> Sub gruppe1() For n = 7 To 11 Sheets("bbmuster").Select ThisWorkbook.Worksheets("bbmuster").Copy After:=ThisWorkbook.Sheets(Sheets.Count) Sheets("Gruppeneinteilung").Select Name = Range("B" &...
04.02.2022 07:50:08
Thread-ID: 1868780
12 Beiträge
Vba Daten in Tabelle löschen
Robi
Guten Morgen, ich habe bereits gestern eine Frage gestellt und wollte mich für die zahlreichen und hilfreichen Antworten bedanken. Nun bräuchte ich wieder eure Hilfe und Ideen.
Über eine Suchfunktion wird der Name eines Werkstücks gesucht und dazu bestimmte Daten in einer unten stehenden Tabelle...
12.07.2022 08:07:53
Thread-ID: 1890786
2 Beiträge
VBA;Alle Zellen in Spalte A untereinander
Günter

Schönen guten Tag,
habe schon einiges recherchiert. Aber folgendes finde ich nicht:
Ein Makro soll mir alle vorhandenen Zellen (ab Spalte B)
in Spalte A kopieren. Alles müßte in Spalte A untereinander stehen.
Vielen Dank
Gruß
Günter
09.12.2009 15:14:12
Thread-ID: 1122647
9 Beiträge
Tabellenblätter mit Inhaltsverzeichnis löschen | Herbers Excel-Forum
Heinz
Hallo
Ich suche seit geraumer Zeit nach der Lösung folgenden Problems:
Ich arbeite mit einer Arbeitsmappe mit ca. 100 verschiedenen Tabellenblättern. Für jede Einzelarbeit brauche ich davon ca. 10-30 Blätter. Die nicht benötigten Blätter möchte ich mittels Makro am Ende löschen.
Mittels...
04.01.2010 18:33:06
Thread-ID: 1127121
6 Beiträge
Pivot VBA Tabellenblatt löschen
murat

Halllo,
ich möchte ein erzeugtes tabellenblatt, das durch pivot doppelklick entstanden ist wieder löschen.
ich habe folgendes Makro
Private Sub CommandButton1_Click() Dim letzteZelle As Long letzteZelle = Worksheets("Tabelle42").Cells.Find(What:="*", _ After:=[A1], SearchDirection:=...
24.01.2010 21:10:25
Thread-ID: 1132506
5 Beiträge
Anzeige
VBA alles löschen am XDatum ;-) ?
Marcy

Hallo,
ist es möglich mit VBA einen Streich zu spielen?
Ich habe einem Kollegen eine recht umfangreiche (für meine Verhältnisse :-) ) Tabelle gemacht.
Diese wollte ich dem zum Test zuschicken, dass er mal etwas damit rum spielen kann.
Jetzt fände ich es recht lustig, wenn z.B. a...
04.03.2011 12:45:37
Thread-ID: 1204216
14 Beiträge
per VBA zellen kopieren und löschen
Willi

Hallo Leute,
ich brauche mal wieder eure Hilfe.
Die Tabelle (https://www.herber.de/bbs/user/81194.xlsm). Das mit den Zellen färben ist soweit OK. Jetzt will ich aber, wenn in M6 ein Kreuz gesetzt wird, dass das Kreuz in L6 verschwindet und das aktuelle Datum vom Tag in N6 eingetragen wi...
30.07.2012 00:01:49
Thread-ID: 1273054
3 Beiträge
Makro zum Löschen von Tabellenblättern und Inhalte
Tabellenblättern

Hallo ich habe ein Problem in Excel.
In der angefügten Datei benötige ich ein Makro um das Dateneinlesen zu beschleunigen. Ich habe aber keine Ahnung ob so etwas überhaupt funktioniert.
Die Daten des Tabellenblattes „Werte vorher“ sollen gelöscht werden. (spalte B, C und D)
Dann sol...
09.11.2012 13:03:39
Thread-ID: 1286025
7 Beiträge
VBA Zellen löschen mit Bedingung
WalterK

Hallo,
den folgenden Code habe ich in der Recherche gefunden, er entfernt die Zeilen, bei denen die Zelle in Spalte W leer ist.
Benötige Hilfe für folgende Änderung im Code:
1.) von "W6:W" & LzL sollte er nicht nur die leeren Zellen sondern auch die Zellen mit einer eingetragene...
24.03.2013 13:04:36
Thread-ID: 1305755
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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