Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
460to464
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
460to464
460to464
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Undo-Historie ausschalten

Undo-Historie ausschalten
02.08.2004 13:15:12
rdm
Hi Leute,
habe eigentlich nur eine kurze Frage:
Wie kann ich die Undo funktion ausschalten?
DAnke im voraus
RDM

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

Betreff
Datum
Anwender
Anzeige
AW: Undo-Historie ausschalten
02.08.2004 13:41:25
Nepumuk
Hallo,
wenn es nur in einer Mappe sein soll, dann so:
In das Klassenmodul "Diese Arbeitsmappe":


Option Explicit
Private Sub Workbook_SheetChange(ByVal Sh As ObjectByVal Target As Range)
    delete_Undo
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As ObjectByVal Target As Range)
    delete_Undo
End Sub


In ein "normales" Modul:


Option Explicit
Public Sub delete_Undo()
    Dim intColor As Integer
    Application.ScreenUpdating = False
    intColor = ActiveCell.Interior.ColorIndex
    ActiveCell.Interior.ColorIndex = 2
    ActiveCell.Interior.ColorIndex = intColor
    Application.ScreenUpdating = True
End Sub


Ist zwar nicht sehr schön, aber hilft.
Gruß
Nepumuk
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige