Datum

Titel

25.04.2024 15:03:35

Unterschiedliche Dateien miteinander abgleichen lassen

25.04.2024 14:05:48

Makro in aktueller Zelle ausführen mit Doppelklick

25.04.2024 12:56:25

Werte von Kunden und Artikel stehen untereinander

25.04.2024 12:55:42

Funktionsparameter auslesen

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

640to644

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

Schaltflächen

Forumthread: Schaltflächen
1 Beitrag zu diesem Forumthread
Anzeige
Excel Dialoge
Top 100 Forumthreads

Schaltflächen

28.07.2005 11:36:36

Peter

Hallo,
ich habe eine Arbeitsmappe angelegt und auf dem Deckblatt 3 Schaltflächen inkl. Makros angebracht. (Daten löschen, Daten speichern, Daten drucken).
Nun möchte ich, dass wenn über den Button "Daten speichern" die Datei unter einem neuen Namen gespeichert wird, automatisch die Schaltflächen "Daten löschen" und "Daten Speichern" inkl. Makros in der gespeicherten Datei gelöscht werden (aber nur in der gespeicherten Datei, nicht in der Originaldatei!!!!!)
Kann mir jemand helfen?

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Schaltflächen

28.07.2005 12:21:24

Torsten

AW: Schaltflächen

28.07.2005 12:21:24

Torsten

Hallo Peter,
in den Code zum Speichern der Datei folgenden Code einfügen und anpassen:


Sub Löschen()
Dim wks As Worksheet
Dim cb As Object
Sheets("Tabelle1").Activate
Set wks = ActiveSheet
'Löschen VBA-Code von WS(Tabelle1)
With ActiveWorkbook.VBProject .VBComponents(wks.CodeName).CodeModule
.DeleteLines 1, .CountOfLines
End With
'Löschen aller cmb_Buttons im aktiven WS
'Evtl. muß vorher ein Schreibschutz des WS aufgehoben werden
For Each cb In wks.OLEObjects
If TypeName(cb.Object) = "CommandButton" Then
cb.Delete
End If
Next cb
End Sub

Gruß
Torsten

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle bestimmten textteil enthält, dann

34081
excel wenn zelle größer als andere zelle dann farbe

23512
excel alles links von zeichen ausgeben

16681

Weitere Forumthreads anzeigen

excel text vor zahl einfügen

16052

kann in excel nicht mehr scrollen

15741

excel formeln übertragen ohne änderung

15343

excel wenn zeichenfolge enthalten dann

14267

excel wenn dann wert aus anderer zelle

12306

excel text kürzen ab zeichen

11938

excel erstes zeichen abschneiden

11417

excel summe null angezeigt

10634

excel wenn in zelle bestimmter text dann andere zelle farbe

10521

excel zählenwenn oder funktion

9511

excel 2 zeichen von links abschneiden

9498

excel wenn zelle teil eines textes enthält

9480

wenn wert 0 dann zelle leer

9079

excel makro text in zelle schreiben

8864

excel zeichen zählen bis leerzeichen

8800

excel zählenwenn zeitraum

8428

zählenwenn doppelte werte ausschließen

8178

excel zelle übernehmen

8062

excel zelle ab zeichen auslesen

7989

excel text ab bestimmten zeichen

7915

excel größer als aber kleiner als

7806

excel makro letzte zeile ermitteln

7675

excel datum uhrzeit in einer zelle

7521

excel zeilen ein und ausblenden button

7291

min in stunden umrechnen excel

7167

excel zeilen dynamisch ausblenden

7070

mauszeiger fadenkreuz tastenkombination

7068

kw in monat umwandeln excel

6935

excel datum rot färben wenn älter als

6521

excel summe ohne bestimmte zellen

6515

excel zeilen untereinander statt nebeneinander

6294

excel makro zellen löschen

6182

wenn wert negativ dann 0

6026

excel wenn uhrzeit größer dann

6006

excel letzte 3 zeichen einer zelle auslesen

5981

excel wenn wert in einer spalte vorhanden dann

5920

excel text aus zelle auslesen und einfügen

5910

tastenkombination excel tabellenblatt wechseln

5872

excel nummeriert nicht fortlaufend

5838

wenn zellen leer dann

5829

datei durch mich selbst gesperrt

5734

excel letzten zeichen abschneiden

5705

excel @ zeichen

5689

summewenn mit sverweis

5676

excel wenn dann leer

5582

excel wort in zelle finden

5539

excel zeit plus minuten

5492

excel vba wert in spalte suchen und zelle ausgeben

5379

zählenwenn ist nicht leer

5341

excel summe aus mehreren spalten

5321

power query führende nullen entfernen

5224

excel zelle färben wenn wert in anderer tabelle

5182

msgbox vba yes no

5105

excel name aus email extrahieren

5082

wenn #nv dann 0

5082

excel vba farbe ändern

5053

excel wenn formatierung farbe dann

5053

excel text entfernen zahlen behalten

4974

excel zeile übernehmen wenn bedingung erfüllt

4903

summewenn nicht wert

4847

excel anführungszeichen in text einfügen

4841

excel string contains

4789

excel monate auf datum addieren

4769

excel summewenns datumsbereich

4754

access tabellen schützen

4727

excel text suchen von rechts

4710

excel vba if mit 2 bedingungen

4679

balkendiagramm mit linie

4659

datum wird in excel nicht erkannt

4654

excel bild einfügen in zelle

4588

excel e+11 entfernen

4564

excel 3 zeichen von links löschen

4556

excel text aus zelle in formel übernehmen

4516

excel text in zahl umwandeln vba

4508

vba string zeilenumbruch

4482

excel zählenwenns enthält text

4469

excel zeile durchsuchen und spalte ausgeben

4452

excel überprüfen

4430

excel makro anhalten

4411

aktuelles datum excel automatisch

4362

excel formel kopieren ohne anpassung

4360

auf 5 rappen runden excel

4357

aktuelle zeit excel

4332

userform.close

4327

durchschnitt prozent berechnen excel

4327

datum aus kalenderwoche

4324

excel wert in tabelle suchen und zeile ausgeben

4308

verketten datumsformat

4300

excel vba zelle auslesen und in anderes tabellenblatt kopieren

4285

excel datei gruppe

4260

excel teilergebnis funktioniert nicht

4229

excel funktionen

4199

excel vba neue zeile

4182

excel datenüberprüfung leere zellen ignorieren funktioniert nicht

4158

bereiche in excel sperren

4142

excel gestrichelte graue linie entfernen

4075

excel funktion aktuelles jahr

4025

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

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle bestimmten textteil enthält, dann

34081
excel wenn zelle größer als andere zelle dann farbe

23512
excel alles links von zeichen ausgeben

16681

Weitere Forumthreads anzeigen

excel text vor zahl einfügen

16052

kann in excel nicht mehr scrollen

15741

excel formeln übertragen ohne änderung

15343

excel wenn zeichenfolge enthalten dann

14267

excel wenn dann wert aus anderer zelle

12306

excel text kürzen ab zeichen

11938

excel erstes zeichen abschneiden

11417

excel summe null angezeigt

10634

excel wenn in zelle bestimmter text dann andere zelle farbe

10521

excel zählenwenn oder funktion

9511

excel 2 zeichen von links abschneiden

9498

excel wenn zelle teil eines textes enthält

9480

wenn wert 0 dann zelle leer

9079

excel makro text in zelle schreiben

8864

excel zeichen zählen bis leerzeichen

8800

excel zählenwenn zeitraum

8428

zählenwenn doppelte werte ausschließen

8178

excel zelle übernehmen

8062

excel zelle ab zeichen auslesen

7989

excel text ab bestimmten zeichen

7915

excel größer als aber kleiner als

7806

excel makro letzte zeile ermitteln

7675

excel datum uhrzeit in einer zelle

7521

excel zeilen ein und ausblenden button

7291

min in stunden umrechnen excel

7167

excel zeilen dynamisch ausblenden

7070

mauszeiger fadenkreuz tastenkombination

7068

kw in monat umwandeln excel

6935

excel datum rot färben wenn älter als

6521

excel summe ohne bestimmte zellen

6515

excel zeilen untereinander statt nebeneinander

6294

excel makro zellen löschen

6182

wenn wert negativ dann 0

6026

excel wenn uhrzeit größer dann

6006

excel letzte 3 zeichen einer zelle auslesen

5981

excel wenn wert in einer spalte vorhanden dann

5920

excel text aus zelle auslesen und einfügen

5910

tastenkombination excel tabellenblatt wechseln

5872

excel nummeriert nicht fortlaufend

5838

wenn zellen leer dann

5829

datei durch mich selbst gesperrt

5734

excel letzten zeichen abschneiden

5705

excel @ zeichen

5689

summewenn mit sverweis

5676

excel wenn dann leer

5582

excel wort in zelle finden

5539

excel zeit plus minuten

5492

excel vba wert in spalte suchen und zelle ausgeben

5379

zählenwenn ist nicht leer

5341

excel summe aus mehreren spalten

5321

power query führende nullen entfernen

5224

excel zelle färben wenn wert in anderer tabelle

5182

msgbox vba yes no

5105

excel name aus email extrahieren

5082

wenn #nv dann 0

5082

excel vba farbe ändern

5053

excel wenn formatierung farbe dann

5053

excel text entfernen zahlen behalten

4974

excel zeile übernehmen wenn bedingung erfüllt

4903

summewenn nicht wert

4847

excel anführungszeichen in text einfügen

4841

excel string contains

4789

excel monate auf datum addieren

4769

excel summewenns datumsbereich

4754

access tabellen schützen

4727

excel text suchen von rechts

4710

excel vba if mit 2 bedingungen

4679

balkendiagramm mit linie

4659

datum wird in excel nicht erkannt

4654

excel bild einfügen in zelle

4588

excel e+11 entfernen

4564

excel 3 zeichen von links löschen

4556

excel text aus zelle in formel übernehmen

4516

excel text in zahl umwandeln vba

4508

vba string zeilenumbruch

4482

excel zählenwenns enthält text

4469

excel zeile durchsuchen und spalte ausgeben

4452

excel überprüfen

4430

excel makro anhalten

4411

aktuelles datum excel automatisch

4362

excel formel kopieren ohne anpassung

4360

auf 5 rappen runden excel

4357

aktuelle zeit excel

4332

userform.close

4327

durchschnitt prozent berechnen excel

4327

datum aus kalenderwoche

4324

excel wert in tabelle suchen und zeile ausgeben

4308

verketten datumsformat

4300

excel vba zelle auslesen und in anderes tabellenblatt kopieren

4285

excel datei gruppe

4260

excel teilergebnis funktioniert nicht

4229

excel funktionen

4199

excel vba neue zeile

4182

excel datenüberprüfung leere zellen ignorieren funktioniert nicht

4158

bereiche in excel sperren

4142

excel gestrichelte graue linie entfernen

4075

excel funktion aktuelles jahr

4025

Schaltflächen

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread