Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Erstellen einer Excel-Datei und Verknüpfen mit OLE-Objekt
zurück: Sicherheitsabfrage bei SQL Insert weiter: SELECT innerhalb einer UPDATE-anweisung nicht möglich?? 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
chris1337
Gast


Verfasst am:
12. Apr 2006, 17:40
Rufname:

Erstellen einer Excel-Datei und Verknüpfen mit OLE-Objekt - Erstellen einer Excel-Datei und Verknüpfen mit OLE-Objekt

Nach oben
       

Und noch eine Frage,

ich würde gern ein kleines VBA-Script machen, das mir auf Knopfdruck, eine leere Exceldatei erstellt, und dieses anschließend mit einem OLE-Objekt verknüpft.

Der Dateiname wär mir prinzipiell egal, obwohl es noch besser wäre, wenn dieser aus aus dem Inhalt eines bestimmten Feldes bestehen würde, bzw ein Unterordner mit Namen des aktuellen Datensatzes angelegt wird, für das die Exceldatei angehängt wird.

Hoffe mir kann jemand damit helfen!

Danke schonmal im Voraus!
steffen0815
VBA-Programmierer


Verfasst am:
12. Apr 2006, 19:46
Rufname:


AW: Erstellen einer Excel-Datei und Verknüpfen mit OLE-Objek - AW: Erstellen einer Excel-Datei und Verknüpfen mit OLE-Objek

Nach oben
       

Hallo,
ich weiß nicht ob ich dich richtig verstanden habe.
Nachfolgende Funktion erstelllt eine Exceldatei und fügt in diese eine Verknüpfung zu einer Worddatei ein.
Code:
Function ErstelleExcelDatMitOLEDatei()
    Const ExcelDatNam = "C:\Test1.xls"
    Const OLEDatNam = "C:\Test.doc"
    Dim ExcelSheet As Object
   
    Set ExcelSheet = CreateObject("Excel.Sheet")
    With ExcelSheet
        ' leeres Wordobjekt einfügen
        '.ActiveSheet.OLEObjects.Add(ClassType:="Word.Document.8", _
                                    Link:=False, _
                                    DisplayAsIcon:=False).Activate
        ' Wordobjekt aus Datei einfügen
        .ActiveSheet.OLEObjects.Add Filename:=OLEDatNam, Link:=True, _
                                    DisplayAsIcon:=False
        .SaveAs ExcelDatNam
        .Application.Quit
    End With
    Set ExcelSheet = Nothing
End Function

{Weiter geht es mit OLE-Objekt per VBA verknüpfen edit by Willi Wipp}

_________________
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: CSV Verknüpfen 0 DarkMedia 595 30. Jun 2005, 13:27
DarkMedia CSV Verknüpfen
Keine neuen Beiträge Access Tabellen & Abfragen: mehrer Tabellen mit INNERJOIN verknüpfen? 1 nampa 597 27. Jun 2005, 22:52
mozi mehrer Tabellen mit INNERJOIN verknüpfen?
Keine neuen Beiträge Access Tabellen & Abfragen: Datensaetze erstellen 3 ITHeiko 777 24. Jun 2005, 12:54
Willi Wipp Datensaetze erstellen
Keine neuen Beiträge Access Tabellen & Abfragen: Verknüpfen mittels Inner Join 4 Gast 693 15. Jun 2005, 11:10
Mastra Verknüpfen mittels Inner Join
Keine neuen Beiträge Access Tabellen & Abfragen: Kombifeld mit Unterform verknüpfen ??? 4 Sonic 693 08. Jun 2005, 09:43
Sonic Kombifeld mit Unterform verknüpfen ???
Keine neuen Beiträge Access Tabellen & Abfragen: Bericht über best. Zeitraum erstellen 22 JensS 2813 25. Mai 2005, 15:38
mapet Bericht über best. Zeitraum erstellen
Keine neuen Beiträge Access Tabellen & Abfragen: Tabellenteile mit Excell verknüpfen 2 Tom82 579 15. Feb 2005, 10:27
Tom82 Tabellenteile mit Excell verknüpfen
Keine neuen Beiträge Access Tabellen & Abfragen: Rechnung erstellen wenn alle Daten vorhanden 6 Freddy 1909 25. Nov 2004, 11:03
Freddy Rechnung erstellen wenn alle Daten vorhanden
Keine neuen Beiträge Access Tabellen & Abfragen: Access 97 verknüpfen mit Paradox 1 inaduob1970 576 06. Sep 2004, 14:28
Skogafoss Access 97 verknüpfen mit Paradox
Keine neuen Beiträge Access Tabellen & Abfragen: 2 gleiche Tabellen in 2 verschiedenen DB verknüpfen 2 mondi 1015 23. Jun 2004, 10:10
mondi 2 gleiche Tabellen in 2 verschiedenen DB verknüpfen
Keine neuen Beiträge Access Tabellen & Abfragen: 2 tabellen verknüpfen und daten übergeben 5 mihca 2004 05. Jun 2004, 13:22
mihca 2 tabellen verknüpfen und daten übergeben
Keine neuen Beiträge Access Tabellen & Abfragen: Relativ komplexes PRoblem mit erstellen von Datensätzen 5 feri 808 02. Jun 2004, 14:21
stpimi Relativ komplexes PRoblem mit erstellen von Datensätzen
 

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