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
GELÖST

Werte aus einer Excel Datei auslesen und in verschiedenen Excel Dateien speichern

Frage Microsoft Microsoft Office

Mitglied: EvE15

EvE15 (Level 1) - Jetzt verbinden

05.08.2008, aktualisiert 14:10 Uhr, 11283 Aufrufe, 5 Kommentare

Hallo Zusammen,

habe ein kleines Problem, und bin gerade etwas ratlos...
Habe eine .xls Datei, mit über 8000 Zeilen, welche Informationen in der Art wie Name, Adresse, Firma, Garage, etc. sowie eine Vertreternummer enthalten.
Der einzigste Wert, welcher mehrmals vorkommt, ist die Vertreternummer.

Ziel wäre es jetzt, die Vertreternummer auszulesen, und diese in einer neuen *.xls zu speichern, mitsamt den Informationen zu dieser Vertreternummer.
Dies erfolgt momentan halt über die Filterfunktion, quasi die Nummer anzeigen, Tabellenblatt kopieren, in neue Datei einfügen, und speichern.

Dieser Vorgang sollte sich doch rein theoretisch automatisieren lassen oder?

Für Anregungen oder einen einen Lösungsvorschlag schonmal besten Dank, wäre super, wenn jemand helfen könnte.

Grüessli aus der Schweiz, Eve
Mitglied: 68023
05.08.2008 um 12:08 Uhr
Hallo,

da die Tabelle nicht vorliegt nur das theoretische Konstrukt:

Ein VBA-Makro, dass Zeilenweise die Daten ausliest und in eine neue Date schreibt.
Vielleicht lässt sich das sogar per Makro AUFZEICHNEN ohne Programmierung hinbekommen.

Nico
Bitte warten ..
Mitglied: EvE15
05.08.2008 um 13:10 Uhr
Hi Nico,

erstmal Danke für die Anregung, funtkioniert auch an sich, aber da ich so gut wie keine Ahnung von VB habe, liegt halt nicht in meinem Arbeitsbereich, stellt sich mir die Frage, wie ich dem Makro nachdem es nun an sich erstellt ist, klar mache, dass es halt die anderen Vertreternummern auch ausliest, und halt dann auch beim Speichern dementsprechend den Dateinamen ändert und weiterführt....

Eve

P.S.: Das Ganze sieht nach der Aufzeichnung nun folgendermassen aus:

01.
Sub Makro() 
02.
03.
' Makro Makro 
04.
05.
 
06.
07.
    Selection.AutoFilter 
08.
    Selection.AutoFilter Field:=19, Criteria1:="0001" 
09.
    Cells.Select 
10.
    Selection.Copy 
11.
    Workbooks.Add 
12.
    ActiveSheet.Paste 
13.
    Application.CutCopyMode = False 
14.
    ChDir "C:\Dokumente und Einstellungen\...\...\test" 
15.
    ActiveWorkbook.SaveAs Filename:= _ 
16.
        "C:\Dokumente und Einstellungen\...\...\test\VerNr0001.xls", _ 
17.
        FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ 
18.
        ReadOnlyRecommended:=False, CreateBackup:=False 
19.
End Sub
Bitte warten ..
Mitglied: 68023
05.08.2008 um 13:19 Uhr
Hallo Eve,

Variante 1:
Du bringst dem Makro noch mit der Aufzeichnungsfunktion bei, dass es immer eine Zeile tiefer gehen soll, legst eine Tastenkombination fest und drückst 8000x deine Tastenkombination.

Variante 2:
Liegen die Zeilen ausnahmslos direkt hintereinander und könntest direkt so "abgevespert" werden? Dann böte sich eine FOR-Schleife an.

Als erste Orientierung vielleicht das hier: http://de.wikibooks.org/wiki/VBA_in_Excel_-_Grundlagen:_Schleifen#For-E ...

Gruß
Nico
Bitte warten ..
Mitglied: EvE15
05.08.2008 um 14:06 Uhr
Hi Nico,

ja, nochmal Danke;) bin jetzt einfach hingegangen, und hab das Makro quasi mit einer weiteren Vertreternummer aufgezeichnet, dann rein ins Dreamweaver, und einfach die einzelnen Vertreternummern nacheinander reinkopiert...ist zwar nicht die eleganteste Lösung, aber für den Moment sollte es reichen und hat eine Menge Zeit gespart;)

Also besten Dank.

Grüsse Eve
Bitte warten ..
Mitglied: 68023
05.08.2008 um 14:10 Uhr
Hallo Eve,

alles klar! Sorry wollte vorhin anfangen ein bissle Code zu schreiben, da kam was dazwischen.

Okay - viel Erfolg noch!
Nico
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Excel Dateien durchsuchen und Werte einzeln in neue Excel Datei auslesen
Frage von krischaniiMicrosoft Office1 Kommentar

Hallo und Danke für Eure stets guten Antworten und Hilfen! Folgendes Problem habe ich: Win 8.1 - Office2013 Ich ...

Microsoft Office
Excel Dateien durchsuchen und mehrere Werte in neue Excel Datei auslesen
Frage von CollatusMicrosoft Office7 Kommentare

Hallo zusammen, im Forum bin ich schon auf einen guten Ansatz gestoßen der mir schon sehr weiter Hilft aber ...

Microsoft Office
Daten aus 4 verschiedenen Excel Dateien auslesen
Frage von mc12345Microsoft Office4 Kommentare

Hallo, ich habe folgendes Problem. Ich habe eine Hauptdatei und von dieser aus will ich automatisch einen Wert aus ...

Batch & Shell
Datum in Datei speichern und wieder auslesen
gelöst Frage von AndroxinBatch & Shell3 Kommentare

Moinsen, ich spiele gerade ein wenig mit der Powershell und Zeitstempeln rum: Zeitstempel mit Get-Date erstellen, als String in ...

Neue Wissensbeiträge
Microsoft Office

Office 2010 Starter erneut auf einer frischen Windows-Version installieren

Tipp von Lochkartenstanzer vor 1 TagMicrosoft Office9 Kommentare

Moin, vor ein paar Tagen schlug bei mir ein Kunde auf, der sein Widnows 7 geschrottet und es inklusive ...

Datenbanken

Upgrade MongoDB 3.4 auf 3.6

Erfahrungsbericht von Frank vor 1 TagDatenbanken

Seit kurzem gibt es das 3.6 Update für die MongoDB: Sicherheit, das Sortieren, Aggregation und auch die Performance wurde ...

SAN, NAS, DAS

Backdoor Zugang und Upload-Bug in vielen Western Digital MyCloud Geräten

Information von Frank vor 1 TagSAN, NAS, DAS2 Kommentare

James Bercegay von der Firma Gulftech hat die Fehler an Western Digital gemeldet und das Unternehmen stellt bereits ein ...

Microsoft Office

Outlook 2016 - Beim Weiterleiten keine PDF Anhänge mehr - KB4011626 entfernen

Erfahrungsbericht von Deepsys vor 1 TagMicrosoft Office3 Kommentare

Wenn ihr feststellt das ihr beim Weiterleiten von E-Mails keine PDF Anhänge mehr versendent, dann dankt Microsoft. Diese tolle ...

Heiß diskutierte Inhalte
Netzwerke
NTFS-Berechtigung
Frage von Daoudi1973Netzwerke23 Kommentare

Hallo zusammen und frohes neues Jahr (Sorry, ich bin spät dran) Meine Frage: 1- Ich habe einen Ordner im ...

Drucker und Scanner
Gesucht DIN A3 Drucker
Frage von NebellichtDrucker und Scanner15 Kommentare

Hallo, ich möchte einen neuen DIN A3 Drucker kaufen. Um ab und zu, ca. 1 mal die Woche Farbausdrucke ...

iOS
Einladung vom iphone kalender
Frage von jensgebkeniOS15 Kommentare

Hallo Gemeinschaft, folgendes Problem - immer wenn ich von meinem Iphone einen Termin einztrage und diesem Termin Teilnehmer zuweise, ...

Windows Netzwerk
Drucker isolieren in Windows Domäne
gelöst Frage von lcer00Windows Netzwerk14 Kommentare

Hallo zusammen, habe eine Windows-AD (2012R2) in der es einen Druckerserver gibt. Mittlerweile verliere ich das Vertrauen in die ...