Application.Calculate verhindert kopieren/einfügen
08.04.2004 22:27:05
Oswald
bräuchte mal wieder eure Hilfe.
Habe folgenden Code in "Diese Arbeitsmappe" eingetragen.
<pre>
Private Sub Workbook_Activate()
Application.CommandBars("Abrechnung_Überstunden").Enabled = True
Application.CommandBars("Abrechnung_Überstunden").Visible = True
Sheets("Daten").Activate
Application.Calculate
End Sub</pre>
solange das Application.Calculate drin steht kann ich von einerer anderen Arbeitsmappe nicht in diese Arbeitsmappe kopieren. Ich kann es in der ersten Arbeitsmappe markieren und kopieren aber sobald ich in die zweite Arbeismappe (mit dem Application.Calculate) rein klicke wird das Einfügen-Icon grau hinterlegt.
Danke für eure bisherige Hilfe und für auch für dieses mal.
Gruß
Oswald