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

ohne Schaltflächen kopieren

Forumthread: ohne Schaltflächen kopieren

ohne Schaltflächen kopieren
Wolfgang
Hallo,
ich würde gerne die aktive Seite i.d. gleiche Mappe mit fortlaufender Nummer und Datum kopieren. Dabei würde ich auch gerne erreichen, dass die CommandButton1 und CommandButton2 nicht mitkopiert werden. Wie müßte ich den nachfolgenden Code anpassen? - Danke schon jetzt für die Rückmeldungen.
Gruß - Wolfgang
Sub TabelleKopieren()
Sheets("Daten").Copy After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Name = ("Daten") & Date 'wie bekomme ich hier fortlfd. Nr. und Datum hin?
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: ohne Schaltflächen kopieren
25.10.2009 18:36:00
Josef
Hallo Wolfgang,
Sub TabelleKopieren()
  Dim objSh As Worksheet
  Dim intCnt As Integer
  
  For Each objSh In ThisWorkbook.Worksheets
    If objSh.Name Like "Daten *" Then intCnt = intCnt + 1
  Next
  
  Sheets("Daten").Copy After:=Sheets(Sheets.Count)
  
  With Sheets(Sheets.Count)
    .Name = "Daten " & CStr(intCnt + 1) & Format(Date, "_yyyy_mm_dd")
    .OLEObjects("CommandButton1").Delete
    .OLEObjects("CommandButton2").Delete
    'Optional - Formeln in Werte umwandeln
    .UsedRange = .UsedRange.Value
  End With
  
  'Optional - Code löschen
  With ThisWorkbook.VBProject.VBComponents(Sheets(Sheets.Count).CodeName).CodeModule
    .DeleteLines 1, .CountOfLines
  End With
  
End Sub

Gruß Sepp

Anzeige
Danke Josef, läuft wunderbar.
25.10.2009 19:01:41
Wolfgang
Hallo Josef,
herzlichen Dank für Deine schnelle Rückmeldung. Ich habe den Code soweit installiert. Er läuft wunderbar. Nachdem ich zunächst noch den erweiterten Löschcode für die Formeln belassen hatte, kam zwar eine Fehlermeldung, die Erweiterung habe ich "stillgelegt" und läuft alles wunderbar. Hab nochmals recht herzlichen Dank dafür.
Gruß - Wolfgang
Anzeige

Forumthreads zu verwandten Themen

Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
Bezug auf Blatt abhängig von Zellinhalt
Zellinhalt

Hallo!
Meine Arbeitsmappe hat vier Blätter, diese heißen: "Übersicht" "Hans", "Klaus" und "Karl".
In Zelle A1 von "Übersicht" steht entweder "Hans", "Klaus" oder "Karl".
In Zelle A2 soll das stehen, was in Zelle B16 des Blattes steht, das in Zelle A1 von "Übersicht" genannt ist.
...
11.08.2008 16:55:00
Thread-ID: 1000917
3 Beiträge
Ausgabe von Teilen des Zellinhaltes
Teilen

Hallo
Ich habe über SVERWEIS mir Zellinhalte aus einer großen Tabelle ausgeben lassen.
Nun möchte ich aber bei der Ausgabe nicht den gesamten Zellinhalt mir anzeigen lassen, sondern nur die ersten 4 Ziffern.
Ist das möglich?
Vielen Dank für die Hilfe
MfG
Andreas
...
14.08.2008 08:45:54
Thread-ID: 1001719
4 Beiträge
Doppelte Inhalte löschen
Oliver

Hallo
in einer Liste von Buchungen befinden sich für einzelne Kostenstellen mehrere Buchungen.
Ich möchte nun aus dieser Liste eine Liste erstellen, in welcher alle Kostenstellen nur einmal vorkommen (also die doppelten Einträge löschen).
Mit dieser Liste will ich später dann die Su...
15.08.2008 09:56:06
Thread-ID: 1002057
4 Beiträge
Ordnerinhalt in Tabelle schreiben
Johann

Hallo Excel-Profis!
Ich brauch wieder einmal eure Hilfe.
Im Archiv habe ich mir den nachfolgenden Code besorgt und ein wenig verändert.
Der Code schreibt den Inhalt des aktuellen Ordners und der Unterordner in die Spalte B einer Tabelle und verlinkt noch dazu die einzelnen Einträge...
15.08.2008 17:19:52
Thread-ID: 1002256
8 Beiträge
Anzeige
Autokorrektur abschalten
Pia

Guten Abend zusammen,
wie kann man eine Autokorrektur in Excel abschalten? Ich muss WEI eintippen aber jedesmal wenn ich mit Enter bestätigen, es wechselt automatisch zu WIE.
Vielen Dank
20.08.2008 21:03:44
Thread-ID: 1003317
7 Beiträge
Belegung Schaltfläche msgbox
Lars

Hallo,
kann ich bei einer msgbox die Schaltflächen auch selber benennen?
Ich würde gerne wissen, ob ein Wert ober- oder unterhalb eines Grenzwertes liegt und somit die Tasten "oberhalb" und "unterhalb" in der msgbox haben.
Lars
21.08.2008 14:10:31
Thread-ID: 1003485
4 Beiträge
Pro Passwort eine Zeile freischalten...
amina

Hallo alle zusammen,
gibt es eine Möglichkeit in Excel pro Passwort eine Zeile freizuschalten.
Also z.b hab ich 20 Leute
1. Person = Zeile 1
2. Person = Zeile 2
usw.
und jede Person darf nur jeweils seine Zeile bearbeiten und die anderen bleiben gesperrt also so ähnlich...
21.08.2008 15:04:36
Thread-ID: 1003520
7 Beiträge
Anzeige
MSGBox wenn Zelleninhalt geleert wurde?!
Tom

Hallo!
Ist es denn eigentlich möglich zu überprüfen ob eine Zelle gerade geleert wurde?
Hintergrund ist, dass ich gern sicherstellen möchte, dass der User wirklich den Zelleninhalt löschen wollte.
Ich würde gern eine Mitteilung erscheinen lassen wenn eine Zelle vom Inhalt her gelösc...
26.08.2008 15:07:01
Thread-ID: 1004826
6 Beiträge
Formatierung Inhalt Kombinationsfeld
Matthias

Guten Morgen Excel-Welt,
mein hoffentlich kleines Problem:
Über die Symbolleiste Formular füge ich ein Kombinationfeld ein.
Der im Listenbereich def. Text (2 Wörter) erscheint bei Auswahl über das Kombinationsfeld sehr klein und fast nicht lesbar. Wie komme ich an die Formatierung d...
27.08.2008 07:34:00
Thread-ID: 1004953
4 Beiträge
Makro, das die Spaltenreihenfolge umdreht
Maxine

Hallo zusammen,
ich benötige ein Makro, dass mir in einem Sheet die Spalten in umgekehrter Reihenfolge ordnet. Also statt A B C D, sollen die Spalten in D C B A geordnet werden.
Der Inhalt und die Reihenfolge der Zeilen soll je Spalte erhalten bleiben.
Könnt ihr mir helfen?
V...
27.08.2008 09:47:23
Thread-ID: 1004990
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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