Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Sicherheitshinweis ---> für registrierte Mitglieder <-
Einzelnen Datensatz in Excel kopieren
zurück: Wie Werte in Kombinationsfeld gruppieren? weiter: Kurserposition im Memofeld am Ende setzen. Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
andrehoyer
VBA Anfaenger


Verfasst am:
06. Feb 2007, 16:38
Rufname:
Wohnort: Gärtringen

Einzelnen Datensatz in Excel kopieren - Einzelnen Datensatz in Excel kopieren

Nach oben
       Version: Office 2003

Hallo zusammen,

habe leider nichts passendes im forum finden koennen. Hoffe hier kann mir jemand helfen:

1. Ich habe ein Formular erstellt in dem alle Daten meiner Tabelle angezeigt und geaendert werden koennen. (Eines der Felder der Tabelle ist das Datum)
Danach habe ich ein Combo Box eingfuegt mit der man den jeweiligen Datensatz filtern kann.
Daneben habe ich einen Button eingefuegt mit dem man die Daten nach Excel exportieren kann...

Und hier mein Problem: Es werden immer alle Datensaetze nach Excel exportiert.
Ich moecht aber gerne nur diesen einen ausgewaehlten Datensatz kopierern.....

Bitte helft mir...

Danke und Gruss,
Andre
Nouba
nicht ganz unwissend :)


Verfasst am:
06. Feb 2007, 16:48
Rufname:
Wohnort: Berlin


AW: Einzelnen Datensatz in Excel kopieren - AW: Einzelnen Datensatz in Excel kopieren

Nach oben
       Version: Office 2003

Hallo Andre,

um den Export mittels TransferSpreadsheet durchzuführen, muss zumindest eine (temporäre) Abfrage vorliegen. Mein Vorschlag wäre, das Formular auf einer Abfrage basieren zu lassen, die den Auswahlparameter (das Datum) via Funbktion empfängt.

Erstelle ein neues Modul und füge diesen Kode ein.
Code:
Public gvarDatum As Variant

Function HoleDatum()
  HoleDatum = gvarDatum
End Function
Im Formularmodul stellst Du folgende Ereignisprozeduren ein, wobei ich bei dem Kombifeld davon ausgehe, dass es cboDatum heißt und das Datum in der gebundenen Spalte enthält. Weiterhin nehme ich an, dass eine Schaltfläche cmdXlsExport existiert, die den Excel-Export anstößt. Die Anweisung darin ist natürlich zu ergänzen.
Code:
Private Sub cboDatum_AfterUpdate()
  gvarDatum = Me!cboDatum
  Me.Requery
End Sub

Private Sub cmdXlsExport_Click()
  DoCmd.TransferSpreadsheet ...
End
Zuguterletzt benötigt das Formular eine Auswahlabfrage, die den Parameter über die Funktion aus dem Modul empfängt. Hier handelt es sich um den Text einer SQL-Abfrage, der in der SQL-Ansicht einer Abfrage angegeben werden kann. Der Tabellenname ist dabei natürlich anzupassen.
Code:
SELECT T.*
FROM   TabName AS T
WHERE  T.Datum = HoleDatum()
OR     HoleDatum() Is Null;

_________________
mit freundlichen Grüssen Nouba

Wenn beim Lesen eines Beitrags der Eindruck entsteht, dass sich der Fragesteller wenig Mühe gegeben hat, so erhöht das nicht unbedingt die Motivation, eine Antwort zu verfassen.


Zuletzt bearbeitet von Nouba am 06. Feb 2007, 18:43, insgesamt einmal bearbeitet
andrehoyer
VBA Anfaenger


Verfasst am:
06. Feb 2007, 16:59
Rufname:
Wohnort: Gärtringen

AW: Einzelnen Datensatz in Excel kopieren - AW: Einzelnen Datensatz in Excel kopieren

Nach oben
       Version: Office 2003

das ist leider nicht das richtige.

Ich habe ein Drop Down Menue mit dem ich mir den Datensatz anzeigen lass auf dessen Datum ich gefiltert habe.

Nun moechte ich nur diesen einen Datensatz nach Excel exportieren....
Nouba
nicht ganz unwissend :)


Verfasst am:
06. Feb 2007, 17:43
Rufname:
Wohnort: Berlin

AW: Einzelnen Datensatz in Excel kopieren - AW: Einzelnen Datensatz in Excel kopieren

Nach oben
       Version: Office 2003

Hallo,

hmm, ich habe zwar den Kode nicht konkret getestet, bin aber der Meinung, dass damit genau Dein Ziel zu erreichen ist.

_________________
mit freundlichen Grüssen Nouba

Wenn beim Lesen eines Beitrags der Eindruck entsteht, dass sich der Fragesteller wenig Mühe gegeben hat, so erhöht das nicht unbedingt die Motivation, eine Antwort zu verfassen.
andrehoyer
VBA Anfaenger


Verfasst am:
06. Feb 2007, 17:50
Rufname:
Wohnort: Gärtringen

AW: Einzelnen Datensatz in Excel kopieren - AW: Einzelnen Datensatz in Excel kopieren

Nach oben
       Version: Office 2003

okay, vielleicht kapiere ich auch einfach nicht wie ich den Code richtig eingeben muss.

Kannst du mir den vielleicht noch in die richtige reihenfolge bringen....

Danke,
Andre
Nouba
nicht ganz unwissend :)


Verfasst am:
06. Feb 2007, 18:44
Rufname:
Wohnort: Berlin

AW: Einzelnen Datensatz in Excel kopieren - AW: Einzelnen Datensatz in Excel kopieren

Nach oben
       Version: Office 2003

Hallo Andre,

ich habe meine erste Antwort etwas erweitert.

_________________
mit freundlichen Grüssen Nouba

Wenn beim Lesen eines Beitrags der Eindruck entsteht, dass sich der Fragesteller wenig Mühe gegeben hat, so erhöht das nicht unbedingt die Motivation, eine Antwort zu verfassen.
steffen0815
VBA-Programmierer


Verfasst am:
06. Feb 2007, 20:45
Rufname:


AW: Einzelnen Datensatz in Excel kopieren - AW: Einzelnen Datensatz in Excel kopieren

Nach oben
       Version: Office 2003

Hallo Andre,
falls du den Datensatz an eine Tabelle anhängen musst, kann ich Datensatz an Exceltabelle anhängen empfehlen.

_________________
Gruß Steffen
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: unlöschbaren Datensatz erstellen 1 Vincent_Vega 899 15. Aug 2005, 21:45
stpimi unlöschbaren Datensatz erstellen
Keine neuen Beiträge Access Tabellen & Abfragen: Listenfeld, automatisch erster Datensatz markieren 1 Gast 2958 21. Jun 2005, 11:54
rita2008 Listenfeld, automatisch erster Datensatz markieren
Keine neuen Beiträge Access Tabellen & Abfragen: Datensatz über Formular suchen 3 Sandnet 2166 10. Jun 2005, 10:52
Dalmatinchen Datensatz über Formular suchen
Keine neuen Beiträge Access Tabellen & Abfragen: Reduzierung mehrerer Datensätze auf einen Datensatz 2 Pulldown 819 03. Jun 2005, 09:32
Pulldown Reduzierung mehrerer Datensätze auf einen Datensatz
Keine neuen Beiträge Access Tabellen & Abfragen: Datensatz automatisch kopieren??? 0 Edelschnitt 701 11. Mai 2005, 19:41
Edelschnitt Datensatz automatisch kopieren???
Keine neuen Beiträge Access Tabellen & Abfragen: Anfügeabfrage soll nur einen Datensatz verschieben 2 Quamsman 1025 08. März 2005, 15:23
Quamsman Anfügeabfrage soll nur einen Datensatz verschieben
Keine neuen Beiträge Access Tabellen & Abfragen: Hintergrundfarbe in Datensatz 1 Rheinbote 900 24. Feb 2005, 20:18
stpimi Hintergrundfarbe in Datensatz
Keine neuen Beiträge Access Tabellen & Abfragen: Aus 1 Datensatz mit 10 Infos mache 10 Datensätze à 1 Info 2 Steve 914 14. Jan 2005, 00:43
Steve Aus 1 Datensatz mit 10 Infos mache 10 Datensätze à 1 Info
Keine neuen Beiträge Access Tabellen & Abfragen: Bei der Aktualisierung eines Tabellenwertes neuen Datensatz 6 zheng 810 07. Dez 2004, 22:35
zheng Bei der Aktualisierung eines Tabellenwertes neuen Datensatz
Keine neuen Beiträge Access Tabellen & Abfragen: Importspezifikationen kopieren 1 Barbara 4336 26. Okt 2004, 11:23
Skogafoss Importspezifikationen kopieren
Keine neuen Beiträge Access Tabellen & Abfragen: n:n Datensatz hinzufügen fehlgeschlagen 2 accesshasser 980 27. Aug 2004, 12:07
Pusteblume n:n Datensatz hinzufügen fehlgeschlagen
Keine neuen Beiträge Access Tabellen & Abfragen: CurrentUser() in neuen Datensatz eintragen 2 mafke 924 16. Aug 2004, 15:49
mafke CurrentUser() in neuen Datensatz eintragen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel Tricks