Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Paste klappt bei geschütztem Sheet nicht

Frage Entwicklung VB for Applications

Mitglied: 68023

68023 (Level 1)

07.11.2008 um 11:18 Uhr, 2318 Aufrufe

Hallo,

ein bisher reibungslos arbeitendes Skript soll nun auch geschützte Tabellen zunächst entsperren und dann seine Arbeit tun.
Die fragwürdigen Tabellen waren bisher nicht geschützt, sind es nun jedoch.

Zunächst gebe ich das Sheet wieder frei:
01.
                If Workbooks(wb_name).Sheets(lookup).ProtectContents = True Then 
02.
                    Workbooks(wb_name).Sheets(lookup).Unprotect ("****") 
03.
                End If
Und möchte dann - wie bisher auch immer erfolgreich umgesetzt - etwas aus einer anderen Tabelle kopieren:

01.
Workbooks(here_wb).Sheets("template").Activate 
02.
Range("C3", "R3").Copy 'Überschriften 1 kopieren 
03.
                 
04.
Workbooks(wb_name).Sheets(lookup).Activate 'Blatt mit Suchübereinstimmung aktivieren 
05.
Range("C3").PasteSpecial xlPasteValues

Obwohl das unprotecten wunderbar funktioniert, kann nicht eingefügt werden.
Woran kann das liegen?

Danke vorab.
Nico
Ähnliche Inhalte
Outlook & Mail
Outlook 2013 manuelles Archivieren klappt nicht (10)

Frage von westberliner zum Thema Outlook & Mail ...

Erkennung und -Abwehr
Houdini on Paste Sites

Link von C.R.S. zum Thema Erkennung und -Abwehr ...

Router & Routing
gelöst VPN über o2 Box6431 zum Firmennetzwerk klappt nicht (5)

Frage von Beelzebub zum Thema Router & Routing ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Viren und Trojaner
Ransomware .nm4 (14)

Frage von Zyklo92 zum Thema Viren und Trojaner ...

Microsoft Office
+1.000 Ordner in Outlook: Wie besser? (11)

Frage von Matsushita zum Thema Microsoft Office ...

Zusammenarbeit
Administrator Verhalten nach Vertragskündigung (10)

Frage von sysbone zum Thema Zusammenarbeit ...