Microsoft Excel

Herbers Excel/VBA-Archiv

Code aus Tab.Blatt löschen | Herbers Excel-Forum


Betrifft: Code aus Tab.Blatt löschen von: Heinz H
Geschrieben am: 18.01.2010 15:46:27

Hallo Leute

Mit unteren Code lösche ich bei


Sheets(aSh).Shapes("Button 1").Delete

einen Button.

Nun befinden sich im Blatt noch 2 Code. Ich möchte den Code
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

auch löschen.

Mit Recorder wird nichts aufgezeichnet.

Könnte mir bitte jemand Hilfe leisten.

Gruß
Heinz

Sub SheetCopy()
    Dim aSh, nSh As String
    nSh = ActiveSheet.[G1]
    aSh = ActiveSheet.Name
    Sheets(aSh).Copy after:=Sheets(Sheets.Count)
    ActiveSheet.Name = nSh
    Sheets(aSh).Shapes("Button 1").Delete

End Sub

  

Betrifft: AW: Code aus Tab.Blatt löschen von: Beverly
Geschrieben am: 18.01.2010 15:50:44

Hi Heinz,

der einfachste Weg: erstelle ein neues Tabellenlbatt und kopiere dann den Inhalt des ursprünglichen dort hinein, anstelle das Tabellenblatt zu kopieren.


GrußformelBeverly's Excel - Inn


  

Betrifft: AW: Code aus Tab.Blatt löschen von: Heinz H
Geschrieben am: 18.01.2010 16:33:34

Hallo Karin

Erstmals recht herzlichen Dank für deinen Vorschlag.
Hier geht es um eine Stundenaufzeichnung. Solange der Sheet noch aktiv ist brauche ich den Code.

Wenn Inaktiv dann sollte nachträglich nichts mehr geändert werden können.

Danke & Gruß
Heinz


  

Betrifft: AW: Code aus Tab.Blatt löschen von: Renee
Geschrieben am: 18.01.2010 17:22:17

Hi nz ;-),

Was bedeuten für dich, bzw. den Code die Worte aktiv und inaktiv ?

GreetZ Renée


  

Betrifft: AW: Code aus Tab.Blatt löschen von: Heinz H
Geschrieben am: 18.01.2010 17:52:35

Hallo Renee

Verstehe deine Frage nicht.

Was bedeuten für dich, bzw. den Code die Worte aktiv und inaktiv ?
Also wenn das Blatt "ActiveSheet.Name = nSh" dann Code belassen.
Wenn Sheets(aSh) dann Code löschen.

Gruß
Heinz


  

Betrifft: AW: Code aus Tab.Blatt löschen von: Hajo_Zi
Geschrieben am: 18.01.2010 17:54:55

Hallo Heinz,

bei Deinem Level würde ich die Finger davon lassen. Der Zugriff auf das VBA Projekt musss erlaubt sein.

Gruß Hajo


  

Betrifft: AW: Code aus Tab.Blatt löschen von: Heinz H
Geschrieben am: 18.01.2010 18:04:04

Hallo Hajo

Okay - Danke. Werde deinen Rat befolgen !!

bei Deinem Level würde ich die Finger davon lassen. 
Gruß
Heinz


Beiträge aus den Excel-Beispielen zum Thema "Code aus Tab.Blatt löschen"