Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Code-Zeilen aus aussortierten Sheet löschen
zurück: Script sperren wenn „Arbeitsmappe freigegeben“ weiter: Automatische Aktivierung der Makros auf anderen Pc's Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
iSven
Excel-Fortgeschrittener und VBA-Neuling


Verfasst am:
01. Aug 2013, 08:52
Rufname: Sven

Code-Zeilen aus aussortierten Sheet löschen - Code-Zeilen aus aussortierten Sheet löschen

Nach oben
       Version: Office 2007

Hallo,

Um meine Tabelle Schlanker machen zu können habe ich ein Makro eingebaut mit dem Sheets in eigene Tabellen ausgelagert werden.

Vorgang:
Das Sheet wird in eine eigene Tabelle ausgelagert in dem dann nur dieses eine Sheet ist und ich möchte die Code-Zeilen in diesem Sheet löschen. Derzeit mache ich es mit diesem Code, allerdings sind die Codezeilen danach dennoch vorhanden:

Code:
Private Sub Auslagern()

    Dim rg As Range

    On Error Resume Next
    Application.EnableEvents = False
    ThisWorkbook.Worksheets("Tabelle1").Copy 'Tabelle anpassen
    DoEvents

    With ActiveWorkbook.VBProject.VBComponents(2).CodeModule
      .DeleteLines 1, .CountOfLines
    End With

    Application.EnableEvents = True
    On Error GoTo 0
    ActiveWorkbook.Colors = ThisWorkbook.Colors 'Übernehme Farbpalette

End Sub


Was mache ich hier falsch?

Nur die Zellen in ein leeres Blatt kopieren möchte ich nicht, da einige formatierungen nicht mit kopiert werden.

Grüße Sven

_________________
Lig jetzt weg!
Phelan XLPH
Fortgeschritten


Verfasst am:
01. Aug 2013, 11:03
Rufname: Phelan


AW: Code-Zeilen aus aussortierten Sheet löschen - AW: Code-Zeilen aus aussortierten Sheet löschen

Nach oben
       Version: Office 2007

Hallo,

funktioniert doch.

_________________
Was vorstellbar ist, ist auch machbar. - Albert Einstein
iSven
Excel-Fortgeschrittener und VBA-Neuling


Verfasst am:
01. Aug 2013, 11:21
Rufname: Sven

AW: Code-Zeilen aus aussortierten Sheet löschen - AW: Code-Zeilen aus aussortierten Sheet löschen

Nach oben
       Version: Office 2007

Hallo Phelan

Beim ausführen kommt immer die Meldung unten.

Wenn ich dann in die Tabelle reinschaue ist weiterhin der Code in dem Sheet vorhanden.

_________________
Lig jetzt weg!



Meldung.JPG
 Beschreibung:
 Dateigröße:  32.17 KB
 Angeschaut:  86 mal

Meldung.JPG


Phelan XLPH
Fortgeschritten


Verfasst am:
01. Aug 2013, 11:46
Rufname: Phelan

AW: Code-Zeilen aus aussortierten Sheet löschen - AW: Code-Zeilen aus aussortierten Sheet löschen

Nach oben
       Version: Office 2007

Im Code sehe ich nix zu Speichern!
_________________
Was vorstellbar ist, ist auch machbar. - Albert Einstein
iSven
Excel-Fortgeschrittener und VBA-Neuling


Verfasst am:
01. Aug 2013, 11:59
Rufname: Sven

AW: Code-Zeilen aus aussortierten Sheet löschen - AW: Code-Zeilen aus aussortierten Sheet löschen

Nach oben
       Version: Office 2007

Ok hast recht. Ich hatte übersehen, das ich außerhalb der Sub
Code:
ActiveWorkbook.SaveAs ...

stehen habe.

Allerdings wenn ich vor dem Speichern unterbreche und schaue in das Sheet sehe ich immernoch im Visual Basic die Codezeilen.

_________________
Lig jetzt weg!
iSven
Excel-Fortgeschrittener und VBA-Neuling


Verfasst am:
30. Aug 2013, 10:17
Rufname: Sven


AW: Code-Zeilen aus aussortierten Sheet löschen - AW: Code-Zeilen aus aussortierten Sheet löschen

Nach oben
       Version: Office 2007

Ich weiß nicht warum, aber nun scheint es zu funktionieren Question Very Happy

Danke nochmal!

Grüße Sven

_________________
Lig jetzt weg!
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Bei Zeile löschen wird #Bezug angezeigt 3 schmitti 2109 16. Aug 2006, 14:21
Pickaboo Bei Zeile löschen wird #Bezug angezeigt
Keine neuen Beiträge Excel Formeln: Text in einer Zelle hinter Semikolin löschen 3 thomasxy 1015 25. Jul 2006, 11:54
Gast Text in einer Zelle hinter Semikolin löschen
Keine neuen Beiträge Excel Formeln: Bedingtes löschen von Zeilen 1 kim 3122 21. Jun 2006, 15:22
Willie Bedingtes löschen von Zeilen
Keine neuen Beiträge Excel Formeln: Sprung von einem Punkt zum Anderen in einem Sheet 5 brandl84 685 13. Jun 2006, 16:57
brandl84 Sprung von einem Punkt zum Anderen in einem Sheet
Keine neuen Beiträge Excel Formeln: Automatisches Löschen von bestimmten Datensätzen 1 michèle 994 26. Apr 2006, 14:53
Alto Automatisches Löschen von bestimmten Datensätzen
Keine neuen Beiträge Excel Formeln: Zeilen mit gleichem Inhalt löschen 1 Gast 4171 06. Jan 2006, 15:03
ae Zeilen mit gleichem Inhalt löschen
Keine neuen Beiträge Excel Formeln: Verknüpfungen löschen (geht nicht) 4 eschmid 3078 18. Okt 2005, 11:31
eschmid Verknüpfungen löschen (geht nicht)
Keine neuen Beiträge Excel Formeln: Bei dreifachen Werten Zeilen löschen 14 Kosich 823 01. Sep 2005, 14:23
Kosich Bei dreifachen Werten Zeilen löschen
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Excel Formeln: Automatisches Löschen von Zeileninhalt 1 Automatix 785 29. Jul 2005, 16:10
fl618 Automatisches Löschen von Zeileninhalt
Keine neuen Beiträge Excel Formeln: Löschen von Wörtern in einem Satz 3 MartinJungwirth 795 13. Jul 2005, 15:51
MartinJungwirth Löschen von Wörtern in einem Satz
Keine neuen Beiträge Excel Formeln: farbig markierte zeilen löschen 4 m0rph 4295 24. Jun 2005, 14:21
Gast farbig markierte zeilen löschen
Keine neuen Beiträge Excel Formeln: Excel Verknüpfungen löschen 9 Acidcool73 15705 15. Jun 2005, 16:03
Gast Excel Verknüpfungen löschen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Excel Tipps