Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Unterformulare aus Access an Excel anbinden
zurück: Dropdown Menu Auswahl aufgrund von Check Box Ergebnis weiter: Doppelte Wertzuweisung vermeiden./Kombinationsfeld/Unterform 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
MC_Chris
Im Profil kannst Du frei den Rang ändern


Verfasst am:
05. Apr 2011, 12:15
Rufname:

Unterformulare aus Access an Excel anbinden - Unterformulare aus Access an Excel anbinden

Nach oben
       Version: Office 2003

Hallo zusammen,

ich programmiere momentan eine Schnittstelle von einem Access Formular in ein Excel Datenblatt.

Aus dem Hauptformular heraus klappt das wunderbar mit diesem Code:
Code:
Private Sub Befehl130_Click()
    Set oApp = CreateObject("Excel.Application") 'um XL neu zuöffnen
    'Set oApp = GetObject(, "Excel.Application") 'XL ist schon offen
    With oApp
        .Workbooks.Open FileName:="S:\IT\Schiffs-Tool\Master Schiffsfonds.xls"
        .Visible = True
        .Sheets("Bilanz").Select
        .Range("C10") = Me.Reisechartererlöse
        '.Range usw
        'usw.
    End With
    Set oApp = Nothing
End Sub
Allerdings habe ich in diesem Formular auch Unterformulare mit eigenen Tabellen. Wenn ich versuche einzelne Felder über Me.FeldUnterformular direkt anzusprechen erhalte ich die Fehlermeldung "Methode oder Datenobjekt nicht gefunden".

Wie binde ich die Felder der Unterformulare an?

Vielen Dank.
Christian
Bitsqueezer
Office-VBA-Programmierer


Verfasst am:
05. Apr 2011, 12:48
Rufname:


AW: Unterformulare aus Access an Excel anbinden - AW: Unterformulare aus Access an Excel anbinden

Nach oben
       Version: Office 2003

Hallo Christian,

Unterformulare werden immer über ihren UFO-Container angesprochen. Wenn das UFO-Element, daß Du beim Design auf Dein Formular gezogen hast, z.B. "MeinUFO" heißt, dann kannst Du die Felder des UFOs so adressieren:
Code:
Me.MeinUFO.Form.Feldname

BTW: Ich würde Dir empfehlen, in Excel VBA den "Select" Befehl zu vergessen. In 99% aller Fälle ist es nicht notwendig, irgendetwas zuerst zu selektieren. Der Makro-Rekorder macht das immer so, aber der kann auch nicht anders, denn er macht nur das, was DU machst, und Du mußt nun mal erst eine Zelle selektieren, bevor Du sie beschreiben kannst. In VBA ist das nicht notwendig, Du kannst dem Range auch gleich einen Wert zuweisen, das beschleunigt die Anwendung sehr. Auch würde ich an Deiner Stelle die Excel-Applikation erst auf Visible schalten, wenn alles fertig ist, sonst kann es passieren, daß der User "dazwischengreift" und Dein VBA-Skript geht in die Hose (und schneller geht es auch). Auch ScreenUpdate=False und Calculation =xlManual beschleunigt das Befüllen eines Sheets enorm (hinterher natürlich wieder zurückschalten).
Darüber hinaus genügt es nicht, das Excel-Objekt auf "Nothing" zu setzen, Du mußt unbedingt auch jedes geöffnete Objekt (wie etwa ein neu erstelltes oder geladenes Workbook) nach Gebrauch erst schließen und dann auf Nothing setzen und erst als letztes das Applikations-Objekt. Ansonsten kann es Dir passieren, daß der Access-Task beim Beenden von Access im Taskmanager "hängenbleibt".

Gruß

Christian
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 Formulare: Unterformulare nach Monaten sortieren 7 Attacke 503 22. Feb 2009, 13:11
Marmeladenglas Unterformulare nach Monaten sortieren
Keine neuen Beiträge Access Formulare: Unterformulare - Datenzuordnung mit Kombinationsfeldern 2 winterabend 188 11. Feb 2009, 19:47
Gast Unterformulare - Datenzuordnung mit Kombinationsfeldern
Keine neuen Beiträge Access Formulare: Unterformulare aktualisieren 1 Nautilius 394 31. Jan 2009, 12:58
Marmeladenglas Unterformulare aktualisieren
Keine neuen Beiträge Access Formulare: Unterformulare während eines EDIT aktualisieren 0 Grango_M 384 21. Jan 2009, 17:56
Grango_M Unterformulare während eines EDIT aktualisieren
Keine neuen Beiträge Access Formulare: 2 Unterformulare aktualisieren 4 etienne 495 10. Dez 2008, 21:35
etienne 2 Unterformulare aktualisieren
Keine neuen Beiträge Access Formulare: bei bestimmter Auswahl nur bestimmte Unterformulare anzeigen 3 boergi77 593 27. Jun 2008, 12:41
JörgG bei bestimmter Auswahl nur bestimmte Unterformulare anzeigen
Keine neuen Beiträge Access Formulare: unterformulare erstellen 1 hund555@ 495 09. Mai 2008, 14:31
hund555@ unterformulare erstellen
Keine neuen Beiträge Access Formulare: Verschachtelte Unterformulare 0 sk42 1399 09. Dez 2007, 15:35
sk42 Verschachtelte Unterformulare
Keine neuen Beiträge Access Formulare: Umschalten der Unterformulare im Startformular 1 tpc042 598 18. Mai 2007, 13:17
Nouba Umschalten der Unterformulare im Startformular
Keine neuen Beiträge Access Formulare: Zwei Unterformulare verknüpfen und von einander abhängig mac 4 Gast 1221 26. Apr 2007, 11:11
Gast Zwei Unterformulare verknüpfen und von einander abhängig mac
Keine neuen Beiträge Access Formulare: Leere Unterformulare im Hauptformular nicht sichtbar 1 Ata 500 06. Nov 2006, 19:28
Nouba Leere Unterformulare im Hauptformular nicht sichtbar
Keine neuen Beiträge Access Tabellen & Abfragen: kreuztabell in excel anbinden 0 backfight 606 25. Sep 2006, 08:09
backfight kreuztabell in excel anbinden
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML Forum