Top-Themen

Aktuelle Themen (A bis Z)

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

Frage Microsoft Microsoft Office

Bestimmte Spalten automatisch von Excel zu Excel kopieren

Mitglied: schosch

schosch (Level 1) - Jetzt verbinden

24.08.2011 um 15:58 Uhr, 7210 Aufrufe, 3 Kommentare

Hallo miteinander,

ich habe hier eine vollständige Mitarbeiterdatei im Excel 2010-Format, die natürlich nicht jeder einsehen darf. Darum möchte ich für diese Datei nur den entsprechenden Personalern Zugriff gewähren und bei einer Änderung automatisch einige Spalten in eine für alle Mitarbeiter zugängliche Excel-Datei kopieren.
Per Verlinkung auf die vollständige Datei klappt es nicht, da ich den Zugriff über die NTFS-Rechte einschränke.
Beim automatischen Kopieren per vba reichen meine Skriptkenntnisse leider nicht aus, weiß hier evtl jemand Rat?

VIele Grüße

Schosch
Mitglied: bastla
24.08.2011 um 16:36 Uhr
Hallo schosch!

Um die Antwort im Detailgrad an die Frage anzupassen: Um aus der aktuellen Tabelle die Spalte D als Werte in das aktuelle Blatt der geöffneten "Mappe2" in die Spalte B zu kopieren:
01.
Sub Kopieren() 
02.
Columns("D:D").Copy 
03.
Workbooks("Mappe2.xlsx").ActiveSheet.Range("B1").PasteSpecial xlPasteValues 
04.
Application.CutCopyMode = False 
05.
End Sub
Grüße
bastla
Bitte warten ..
Mitglied: schosch
24.08.2011 um 16:49 Uhr
Danke für die Antwort.

Hast Du vielleicht noch einen Tipp wie ich das schreiben kann, damit automatisch beim Schließen der vollständigen Datei mehrere Arbeitsblätter in die "kastrierte" Datei kopiert werden?

Viel Grüße

Schosch
Bitte warten ..
Mitglied: bastla
24.08.2011 um 17:10 Uhr
Hallo schosch!

Im VBA-Editor findest Du im Projekt-Explorer (links oben) für jede geöffnete Mappe unter "Microsoft Excel-Objekte" den Eintrag "DieseArbeitsmappe" - nach einem Doppelklick darauf kannst Du im linken Dropdown anstelle von "Allgemein" den Eintrag "Workbook" auswählen und siehst dann im rechten Dropdown die zugehörigen Ereignisse. Automatisch wird ein "Private Sub Workbook_Open()" erstellt; das kannst Du, wenn nicht benötigt, samt dem zugehörigen "End Sub" löschen. Für Dein Vorhaben geeignet sollte "BeforeClose" sein.

Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Python
Python Excel bestimmte Spalte auslesen
gelöst Frage von 115122Python2 Kommentare

Hi, ich bastle gerade ein wenig mit Python und Excel herum und bin auf ein Problem gestoßen, wurde aber ...

Microsoft Office
Excel Spalten
gelöst Frage von a.grotheMicrosoft Office6 Kommentare

Hallo zusammen, ich habe ein Excel Dokument A. Hier habe ich nun Werte in folgender Form: In Zelle I8 ...

Batch & Shell
Bestimmte Spalten aus TXT in CSV kopieren - ab Spalte AE gibt es Übertragungsfehler
gelöst Frage von freshman2017Batch & Shell9 Kommentare

Hallo, ich versuche mit nachfolgendem Batch Spalten in TXT zu übernehmen. Wenn ich die Spalte %%ae übernehmen möchte, gibt ...

Microsoft Office
Excel: Wenn Wert in Spalte A dann kopiere Zeile
gelöst Frage von michi1983Microsoft Office8 Kommentare

Hallo Admins, ich bräuchte mal eure Unterstützung in Sachen Excel. Da bin ich nämlich leider ein kompletter noob. Ich ...

Neue Wissensbeiträge
Datenschutz

Teamviewer kommt für IoT-Geräte wie den Raspberry Pi

Information von magicteddy vor 5 StundenDatenschutz

Moin, jetzt werden IoT Geräte endgültig zur Wanze? Anscheinend kann man auf einem Dashboard seine Geräte visualisieren Ich stelle ...

Microsoft

Letzte Updates für Win10 und Server2016 müssen bei Bedarf über den Update catalogue in den WSUS importiert werden!

Tipp von DerWoWusste vor 9 StundenMicrosoft1 Kommentar

automatisch kommt da nichts an im WSUS und auch nicht im SCCM. Siehe Hinweise zum Bezug der jeweils neuesten ...

Linux

Meltdown und Spectre: Linux Update

Information von Frank vor 3 TagenLinux

Meltdown (Variante 3 des Prozessorfehlers) Der Kernel 4.14.13 mit den Page-Table-Isolation-Code (PTI) ist nun für Fedora freigegeben worden. Er ...

Tipps & Tricks

Solutio Charly Updater Fehlermeldung: Das Abgleichen der Dateien in -Pfad- mit dem Datenobject ist fehlgeschlagen

Tipp von StefanKittel vor 4 TagenTipps & Tricks

Hallo, hier einmal als Tipp für alle unter Euch die mit der Zahnarztabrechnungssoftware Charly von Solutio zu tun haben. ...

Heiß diskutierte Inhalte
Netzwerkmanagement
Preis für Wartungsvertrag ok?
gelöst Frage von a-za-zNetzwerkmanagement22 Kommentare

Hallo! Mal ne Frage, weil ich mich mit dem akzeptablen Preis für einen Reaktionszeitvertrag nicht auskenne. Meine Firma hat ...

Windows Netzwerk
Ist ein Portforwarding auf einen PC ohne lauschendes Programm ein (großes) Sicherheitsproblem?
Frage von PluwimWindows Netzwerk13 Kommentare

Hallo zusammen, zur Fernwartung eines Rechners an einem anderen Ort nutze ich VNC. Da dieser Rechner einfach nur eine ...

Windows Server
Terminal Server 2016 erkennt Berechtigungen nicht
gelöst Frage von Thomas2Windows Server10 Kommentare

Hallo Administratoren, folgendes Problem stellt sich dar: Es gibt zwei Windows Server 2016, die als Terminal Server fungieren. Jetzt ...

SAN, NAS, DAS
Wer kennt sich mit QNAP und CISCO aus ?
gelöst Frage von MachelloSAN, NAS, DAS10 Kommentare

Hallo Zusammen hier im Forum, Ich habe ein QNas 451+ und dieses NAS hat zwei GBit Lan Adapter die ...