Herbers Excel-Forum - das Archiv

kopieren verhindern

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
⇒ MessageBox
Bild

Betrifft: kopieren verhindern
von: Volker
Geschrieben am: 26.09.2003 14:46:19
Hallo zusammen,

wie kann ich das kopieren verhinden / unterbinden , wenn bestimmte Kriterien nicht erfüllt werden ( z.B. A1 = leer - nicht kopieren!)mit Messagebox- Infomeldung ?

Wer kann mir helfen?

Bild

Betrifft: AW: kopieren verhindern
von: udo
Geschrieben am: 26.09.2003 15:36:31
Hi Volker,

könnte mir vorstellen dass das mit einer VBA Anweisung bevor rechtsklick schon mal gehen könnte, gibt aber best. auch noch genügend andere Möglichkeiten.



Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)




Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
On Error GoTo Ende:
If Target = "" Then
MsgBox "    Zellwert leer, daher Wechsel zu A1 "
Range("a1").Activate
End If
Ende:
End Sub







wenn du doch was anderes suchst , solltest du dass vielleicht noch etwas vertiefen, ansonsten viel Erfolg schon mal




Gruß udo




Bild




Betrifft: AW: kopieren verhindern



von: HerbertH






Geschrieben am: 26.09.2003 22:08:43

Hallo Volker,

Wie Udo meinte,andere Möglichkeiten wären z.B. das hier:










Gruß Herbert





 Bild
Bewerten Sie hier bitte das Excel-Portal
Excel-Beispiele zum Thema " kopieren verhindern"
Blätter in andere Arbeitsmappen kopieren Module von Mappe zu Mappe kopieren
Arbeitsblatt 40 mal kopieren Schriftgröße beim Kopieren verdoppeln
Beim Kopieren auch die Zeilenhöhe und Spaltenbreite übernehmen Tabellencode nach Kopieren des Blattes löschen
Arbeitsmappe blitzschnell kopieren VBE-Namen der Blattmodule beim Kopieren festlegen
Blattinhalt von einer zur anderen Arbeitsmappe kopieren Formel bis zur letzten Zeile der Nebenspalte kopieren