ich möchte die Tabelle1 aus der Mappe "Quelle.xls" in die Arbeitsmappe "Senke.xls" per VBA exportieren.
In der Tabelle1 sind mehrere Formularschaltflächen mit hinterlegten Modulen plaziert.
Beim aufrufen der Arbeitsmappe "Senke.xls" sollen diese Schaltflächen (bis auf die Schaltfläche "Drucken" -
Button2) aus der exportierten Tabelle1 gelöscht werden
Zu diesem Zweck habe ich folgenden Code geschrieben:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
ActiveSheet.Shapes("Button 3").Select
Selection.Cut
ActiveSheet.Shapes("Button 4").Select
Selection.Cut
ActiveSheet.Shapes("Button 5").Select
Selection.Cut
ActiveSheet.Shapes("Button 6").Select
Selection.Cut
end sub
Das Problem ist, dass beim Öffnen der Arbeitsmappe "Senke.xls" willkürlich irgendwelche
Schaltflächen gelöscht werden. An meinen Rechner funktioniert es einwandfrei: alle Schaltflächen,
ausser "Drucken" werden gelöscht. An anderen Rechnern funktioniert es nicht mehr: die Schaltfläche
"Drucken" wird gelöscht, statt dessen bleibt eine andere Schaltfläche erhalten.
warum ist dem so?
viele Grüße Nicky