Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
888to892
888to892
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kopieren und runterziehen verhindern

Forumthread: Kopieren und runterziehen verhindern

Kopieren und runterziehen verhindern
17.07.2007 16:45:00
Salim

Hallo zusammen,
nachdem ich eine aufwendige Arbeitsmappe erstellt habe, möchte ich es bei Möglichkeit verhindern, dass die Zellen hin und her kopiert werden bzw. "runtergezogen" werden können. Es ist nämlich so, dass beispielsweise das kopieren meine angesetzten Gültigkeitskriterien auflöst! Gibt es dafür einen Code, den ich gleich für die gesamte Arbeitsmappe ansetzten könnte? Wahrscheinlich ist eine Lösung über Extras / Optionen nicht anwendbar, da die Datei an verschiedenen Anwendern verschickt wird, die wiederum eine andere Einstellung der Optionen haben.
Hätte jemand dazu eine Idee wie mann sowohl das Kopieren als auch das "runterziehen" verhindern kann?
Danke und Gruss
Salim

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopieren und runterziehen verhindern
17.07.2007 16:54:00
selli
was ist mit blattschutz?
gruß selli

AW: Kopieren und runterziehen verhindern
17.07.2007 18:08:00
Salim
Hallo Selli,
Danke für dein Feedback.
Blattschutz ist eingestellt, aber gewisse Zellen können nicht gesperrt werden, da Einträge notwendig sind. Wenn ich beispielsweise für A1 nur Zahlen zw. 1 und 10 zulassen möchte, gebe ich das in der Gültigkeit ein. Wenn ich jetzt aber eine andere Zelle (bspw. b1) kopiere und in A1 einfüge, wird dass nicht verhindert sondern es werden alle Eigenschaften der kopierten Zelle in A1 übernommen. Somit ist nicht gewährleistet, dass die Datei nicht mit fehlerhaften Daten gefüllt wird.
Somit bleibt die Frage offen, welche Möglichkeiten es gibt das Kopieren aber auch runterziehen zu verhindern.
Gruss
Salim

Anzeige
AW: Kopieren und runterziehen verhindern
17.07.2007 20:03:25
Daniel
Hallo
im Prinzip kannst du das verhindern über die Einstellung
EXTRAS - OPTIONEN - BEARBEITEN - Drag and Drop von Zellen aktivieren
dann kann der Anwender zwar immer noch bewußt über kopieren-einfügen Werte überschreiben, aber ein zufälligen überschreiben durch ziehen an der markierung geht nicht mehr.
Das Problem dabei ist, wenn man diese Einstellungen ändert, sollte man sie beim Schließen der Datei auf jeden fall wieder zurücksetzen, sonst verschafft man dem Kollegen u.U. ein ernsthaftes Problem, da diese Einstellungen ja für alle Excel-Arbeitsmappen gelten.
Da hilft dann nur eine saubere Programmierung über VBA, die die ursprüngliche Benutzereinstellung speichert und beim Schließen der Datei wieder zurückschreibt.
Kopier mal diese 4 Makros in das Modul "DieseArbeitsmappe"
Dann sollte es funktionieren.

Option Explicit
Dim bolDRAGnDrop As Boolean
Private Sub Workbook_Activate()
bolDRAGnDrop = Application.CellDragAndDrop
Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CellDragAndDrop = bolDRAGnDrop
End Sub
Private Sub Workbook_Deactivate()
Application.CellDragAndDrop = bolDRAGnDrop
End Sub
Private Sub Workbook_Open()
bolDRAGnDrop = Application.CellDragAndDrop
Application.CellDragAndDrop = False
End Sub


Gruß, Daniel

Anzeige
AW: Kopieren und runterziehen verhindern
17.07.2007 20:11:00
Salim
Hallo Daniel,
danke für deinen Feedback.
Das mit dem Drag & Drop hatte ich so eingefügt: Was machen eigentlich deine 4 Makros noch zusätzlich?
Gruss
Salim

Sub workbook_Open()
Application.CellDragAndDrop = False
End Sub




Sub workbook_BeforeClose()
Application.CellDragAndDrop = True
End 


Sub
Anzeige
AW: Kopieren und runterziehen verhindern
17.07.2007 20:39:00
Daniel
Hi
Makro 1:
beim öffen der Datei den aktuelle Wert speichern und auf FALSE setzen
Makro 2:
beim Schließen der Datei den gespeicherten Wert wieder zurückschreiben (sozusagen den Originalzustand des Anwenders wieder herstellen:
Makro 3 und 4: das gleiche wie Makro 1 und 2, aber nicht beim Öffnen und Schließen der Datei, sonden dann wenn der Anwender in eine andere geöffnete Excel-Arbeitsmappe wechselt oder wieder zurückspringt.
Damit ist gewährleistet, daß nur in deiner Arbeitsmappe die Drag and Drop-Funktion deaktiviert ist.
In allen anderen, die der Anwender parallel geöffnet hat, kann er normal weiterarbeiten.
Damit verhinderst du unnötige (teure) Anrufe bei der Hotline, bzw. vermeidest Ärger mit den Kollegen, der sich sonst unweigerlich einstellt, wenn du ihnen ihr Excel durcheinanderbringst.
Gruß, Daniel

Anzeige
AW: Kopieren und runterziehen verhindern
18.07.2007 08:15:13
Salim
Herzlichen Dank! Jetzt habe ich es ganz verstanden ;)
Gruss
Salim
;

Forumthreads zu verwandten Themen

Konkatinieren : kopieren funktioniert nicht
stelud

Hallo,
in Spalte E will ich eine Konkatinierung der Spalten A - D haben - dies löse ich wie folgt :
=$A$1&$B$1&$C$1&$D$1
Ergebnis eine Zeile :
A B C D E
1 2 3 4 1234
wenn ich aber nun diese Formel in Zeile2 kopiere, wird der Index nic...
04.11.2008 09:10:59
Thread-ID: 1021470
3 Beiträge
Wenn-Oder Formel über VBA funktioniert nicht
sharky1000

Hallo,
ich habe eine etwas komplexere Wenn-Oder Formel erstellt, welche ich über VBA in eine Zelle einfügen möchte.
Formel in E2:
=WENN(ODER(LINKS(D2;2)="M1";LINKS(D2;2)="M2";LINKS(D2;2)="M3";LINKS(D2;2)="M4";LINKS(D2;2)="M5"); LINKS(D2;1);WENN(LINKS(D2;2)="NM";LINKS(D2;2);WENN(LIN...
06.11.2008 14:11:01
Thread-ID: 1022285
7 Beiträge
Summenformel funktioniert nicht
Mathias

Hallo guten Abend,
ich habe folgendes Problem. Ich habe eine Stundenübersicht. In der Stundenübersicht habe ich wie ihr in der Formel seht im Format 00:00 Die Stunden zusammen gezählt. Wenn ich jetzt aber die Wochenstunden zusammenzählen möchte für Monatsabrechung kommt iergent ein wirres Z...
18.11.2008 23:06:14
Thread-ID: 1025814
7 Beiträge
Anzeige
drag and drop
Klohs

hallo alle zusammen
habe im archiv ansätze für eine aufgabe die ich mir gestellt habe gefunden.
https://www.herber.de/bbs/user/22558.xls
doch kann man es auch so gestalten das die ausgewählten namen aus liste 1 verschwinden wenn sie ausgewählt sind und in liste 2 stehen
liste 1...
06.02.2009 20:50:23
Thread-ID: 1047906
3 Beiträge
Kopieren von Formeln in Excel funktioniert nicht
Formeln

Hallo Leute,
ich kann seit heute keine Formeln mehr in Excel von einer Datei in eine andere Dateien kopieren. Excel übernimmt nur die Werte. Kopieren in einer Datei zwischen zwei Tabellenblättern funktioniert.
Habe nichts verstellt. Automatische Berechnung ist eingestellt.
Weiß jem...
30.06.2009 13:38:40
Thread-ID: 1085354
8 Beiträge
Formel in VBA mit " funktioniert nicht
ChrisW

Hallo Leute,
ich möchte der Variablen Fo4 folgende Formel zuweisen:
Fo4 = "=SUMPRODUCT(('Detailed Table'!$G$4:$G$63556="PR")*(('Detailed Table'!$A$4:$A$63556)=$A3)*(('Detailed Table'!$J$4:$J$63556)))"
Excel meckert aber und markiert mir PR was wohl an den Anführungszeichen liegt die...
28.08.2009 15:22:19
Thread-ID: 1099200
6 Beiträge
Drag-and-Drop von Buttons innerhalb Worksheets
Buttons

Hallo!
Ich bin auf der Suche, nach einer Möglichkeit Buttons innerhalb eines Excel Arbeitsblattes zu verschieben. Das Ganze soll ähnlich dem verschieben von Felder in Pivot Tabellen erfolgen und -soweit möglich- auch noch funktionieren, wenn das Arbeitsblatt später geschützt wird.
Danke...
01.09.2009 09:38:14
Thread-ID: 1099751
6 Beiträge
Anzeige
Formel funktioniert nicht
Robert

Hallo Excel Freunde
ich habe mal wieder ein Problem mit einer Formel. Ich verwende in Zelle C13 die folgende Formel. Die Formel arbeitet soweit auch ordentlich. Jedoch wenn ich in Zele F13 "kz" eingebe wird in Zelle C13 ein F angezeigt.
Was mir sagt, dass die Funktion WENN(ODER(F13="F...
20.09.2009 21:47:16
Thread-ID: 1104307
5 Beiträge
formel funktioniert nicht unter 2003
alex

hallo zusammen,
ich habe vom communitymitglied daniel eine formel bekommen. die unter excel 2007 sehr gut funktioniert funktioniert, allerdings unter excel 2003 immer nur #zahl als fehler ausspuckt.
gibt es eine möglichkeit die formel so umzuschreiben das sie unter beiden versionen läuf...
23.10.2009 19:03:52
Thread-ID: 1111726
5 Beiträge
Anzeige
Indexformel funktioniert nicht richtig
Pet

Hallo Forum,
ich habe mal wieder ein Problem mit einer Formel.
Es soll per Index und Wenn Abfrage in Spalte S alles Nummern aufgelistet werden die in Spalte C stehen.
Hier die Bsp-Datei.
https://www.herber.de/bbs/user/65407.xls
Ich hoffe ihr könnt mir helfen.
Vielen Dank...
28.10.2009 15:19:02
Thread-ID: 1112825
3 Beiträge
Zellen formatieren geht nicht mehr
Pepi

Hallo Zusammen
Ich habe eine Tabelle mit VBA erstellt, jetzt kann ich die Tabelle innerhalb des Bereiches, wo die Tabelle Daten aufweisst nicht mehr formatieren.
Kontextmenu (Maus Rechtsklick) - Zellen formatieren
oder
Start - Schriftart, Ausrichtung, Zahl
bei all diesen Me...
19.07.2010 15:58:15
Thread-ID: 1167741
4 Beiträge
Zellen formatieren geht nicht mehr
Pepi

Hallo zusammen
Ich kopiere mit einem Makro Zellbereiche von einer Tabelle in eine Andere (neue Datei).
Nach dem ich die neue Datei gespeichert habe kann ich in den Menüs Start - Schriftart / Ausrichtung / Zahl
Bereiche meiner neuen Tabelle markieren und formatieren - doch sobald ich...
16.08.2010 14:33:40
Thread-ID: 1172430
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Kopieren und Runterziehen in Excel verhindern

Schritt-für-Schritt-Anleitung

Um das Kopieren und Runterziehen in Excel zu verhindern, kannst du VBA-Makros verwenden. Hier ist eine detaillierte Anleitung, wie du dies umsetzen kannst:

  1. Öffne deine Excel-Datei.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Klicke auf "DieseArbeitsmappe" im Projektfenster.

  4. Füge den folgenden VBA-Code ein:

    Option Explicit
Dim bolDRAGnDrop As Boolean

Private Sub Workbook_Activate()
   bolDRAGnDrop = Application.CellDragAndDrop
   Application.CellDragAndDrop = False
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   Application.CellDragAndDrop = bolDRAGnDrop
End Sub

Private Sub Workbook_Deactivate()
   Application.CellDragAndDrop = bolDRAGnDrop
End Sub

Private Sub Workbook_Open()
   bolDRAGnDrop = Application.CellDragAndDrop
   Application.CellDragAndDrop = False
End Sub

  5. Speichere die Datei als Makro-fähige Excel-Datei (.xlsm).

  6. Schließe den VBA-Editor und teste die Einstellungen.

Durch diesen Code wird die Drag-and-Drop-Funktion deaktiviert, während die Datei geöffnet ist.

Häufige Fehler und Lösungen

  • Excel kopiert Formel nicht runter: Stelle sicher, dass die Drag-and-Drop-Funktion deaktiviert ist. Wenn du die Funktion nicht deaktivieren kannst, überprüfe die Makros.

  • Excel Formeln runterziehen funktioniert nicht: Dies kann auftreten, wenn die Zelle gesperrt ist oder die Gültigkeitsregeln nicht korrekt eingestellt sind. Überprüfe die Zelleneinstellungen.

  • Excel Zelle runterziehen geht nicht: Achte darauf, dass die Zelle nicht gesperrt ist und die Drag-and-Drop-Funktion aktiviert ist, wenn dies erforderlich ist.

Alternative Methoden

Neben dem VBA-Ansatz gibt es auch andere Methoden, um das Kopieren und Runterziehen in Excel zu verhindern:

  • Blattschutz aktivieren: Dies kann über Überprüfen -> Blattschutz erfolgen. Achte darauf, dass du die entsprechenden Zellen für die Eingabe freigibst.

  • Gültigkeitsprüfung verwenden: Setze Regeln für bestimmte Zellen, die nur bestimmte Werte zulassen. Dies kann verhindern, dass falsche Daten eingegeben werden.

Praktische Beispiele

  1. Gültigkeitsregel für Zahlen: Wenn du nur Werte zwischen 1 und 10 in A1 zulassen möchtest, gehe zu Daten -> Datenüberprüfung und wähle die entsprechenden Einstellungen.

  2. Drag-and-Drop aktivieren: Wenn du die Drag-and-Drop-Funktion nur für bestimmte Zellen aktivieren möchtest, kannst du Makros erstellen, die dies ermöglichen.

Tipps für Profis

  • Nutze Shortcuts: Um eine Excel-Tabelle schnell runterzuziehen, kannst du den Shortcut STRG + D verwenden, um Werte in benachbarte Zellen zu kopieren.

  • VBA optimieren: Achte darauf, dass dein VBA-Code gut strukturiert ist, um die Performance zu verbessern und Fehlfunktionen zu vermeiden.

  • Regelmäßige Backups: Erstelle regelmäßig Backups deiner Arbeitsmappe, um Datenverlust zu vermeiden.

FAQ: Häufige Fragen

1. Wie kann ich Drag and Drop in Excel aktivieren?
Gehe zu Extras -> Optionen -> Bearbeiten und aktiviere die Drag-and-Drop-Option.

2. Was tun, wenn die Excel Formeln nicht runtergezogen werden können?
Überprüfe die Zellen auf mögliche Sperrungen oder Gültigkeitsregeln, die das Runterziehen verhindern könnten.

3. Wie kann ich das Kopieren von Zellen in Excel verhindern?
Verwende VBA-Makros, um die Drag-and-Drop-Funktion zu deaktivieren und setze Blattschutz auf die entsprechenden Zellen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige