Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1576to1580
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
Inhaltsverzeichnis

Ohne Formatierung ausfüllen

Ohne Formatierung ausfüllen
10.09.2017 01:33:08
Lui
Hallo nochmal,
den Nachfolgenden Code hat mir Daniel netterweise zur Verfügung gestellt. (An dieser Stelle nochmals meinen Dank.)Dieser funktioniert auch, jedoch wenn ich "vergesse" per Strg+C den Bereich zu makieren der kopiert werden soll, und ich Strg+V eingebe, erscheint ein Warnfenster:-Laufzeitfehler usw.
Wenn ich auf Beenden drücke, ist alles OK und ich kann weitermachen. Wenn ich allerdings auf Debuggen drücke, gelange ich in die VBA-Ebene. Dort muss ich den Code zurücksetzen um weiter arbeiten zu können. Wäre nicht so schlimm, jedoch wird meine Datei vor fremden Zugriff per Passwort geschützt. Ausserdem werden auch andere Personen damit arbeiten. Ich kann nicht verlangen, dass sie in den VBA-Modus gehen, und den Code zurücksetzen. Gibt es eine Möglichkeit, dass wenn nur die Tastenkombination StrG+V gedrückt wird, diesen Fehler zu ignorieren? Gruß Lui
Sub einfügen()
If ThisWorkbook.Name = ActiveWorkbook.Name Then
Selection.PasteSpecial xlPasteFormulas
Else
ActiveSheet.Paste
End If
End Sub

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ohne Formatierung ausfüllen
10.09.2017 02:12:09
Daniel
Hi
da immer jeweils nur eine Anweisung durchgeführt wird, kannst du hier einfach mit On Error Resume Next dafür sorgen, dass der Code trotz Fehler korrekt beendet wird.
oder du fragst den Zustand von Application.CutCopyMode ab.
An diesem kannst du erkennen, ob etwas zum kopieren, ausschneiden oder nichts ausgewählt wurde.
und beendest dann vorzeitig das Makro. (wobei dass dann nur diesen Fehler abfängt, aber nicht andere wie z.B. der Versuch, auf einem geschützten Blatt etwas einzufügen)
Gruß Daniel
Ohne Formatierung ausfüllen
10.09.2017 10:01:42
Lui
Hallo Daniel,
wie Du an meinem VBA-Level erkennen kannst, kannst Du erkennen, dass ich da fast keinen Level habe. :-))
Kannst Du mir bitte den gesamten Code senden? Kann mit "On Error Resume Next ",
und "Application.CutCopyMode" (Kopierauftrag abbrechen)nicht recht was anfangen, da ich gar nicht weiß wie ich wo was einbinde.
Gruß Lui
Anzeige
AW: Ohne Formatierung ausfüllen
10.09.2017 11:21:18
Daniel
Hi
Es gibt vom Microsoft eine offiziell Hilfe, in welcher du nachlesen kannst, was die einzelnen Funktionen machen und wie sie verwendet werden.
Zum Thema "On Error Resume Next" kannst auch hier was nachlesen:
http://www.online-excel.de/excel/grusel_vba.php?f=2
Interessant für dich wäre das Kapitel "Fehlerbehandlung(3)"
Gruß Daniel

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige