Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Umstellung auf Latebinding
zurück: Lagerbestand weiter: Abfrage: Letztes Datum vor einem Datum finden Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Druide
Erste Schritte in Access schon gemacht


Verfasst am:
06. Mai 2010, 02:29
Rufname:

Umstellung auf Latebinding - Umstellung auf Latebinding

Nach oben
       Version: Office 2007

Hallo liebe Experten,

ich habe mir eine DB gebastelt die auch ganz gut funktioniert, nur wenn ich auf einem anderen Rechner unter Runtime arbeite muss die Anwendung wegen einem Fehler beendet werden. Schuld ist der Verweis auf Excel da auf diesem Rechner Office 2003 drauf ist. Der Excelverweis aber auf 2007 greift. Die Lösung glaub ich hab ich auch schon gefunden "LateBinding" nur hab ich es nicht geschafft meinen Code darauf umzustellen

Hier mein Code
Code:
    Dim db As DAO.Database
    Dim rs As DAO.Recordset
    Dim xlApp As Excel.Application
    Dim xlSheet As Excel.Worksheet
    Dim ExcelDatNam As String, stuNr As Long, iCol, iRow

    On Error Resume Next
    Set xlApp = GetObject(, "Excel.Application")
    On Error GoTo 0
    If xlApp Is Nothing Then
        Set xlApp = CreateObject("Excel.Application")
        xlApp.Workbooks.Add
        xlApp.Visible = True
    End If
    Set xlSheet = xlApp.ActiveWorkbook.Sheets("tabelle1")
    Set db = CurrentDb
    Set rs = db.OpenRecordset("Select .... etc ....")
Kann mir bitte jemand helfen, ich komm nicht dahinter, hab alle gefundenen Vorschläge ausprobiert und es will einfach nicht.
Schon mal im vorraus vielen Dank!!!
Gast



Verfasst am:
06. Mai 2010, 07:48
Rufname:


AW: Umstellung auf Latebinding - AW: Umstellung auf Latebinding

Nach oben
       Version: Office 2007

Hallo,
bei deinem bisschen Code (bis hier her) kein Problem Wink:
- Excel-Verweis entfernen
- in allen Modulen ein
Code:
option explicit

Code:
    Dim xlApp As Object ' Excel.Application
    Dim xlSheet As Object ' Excel.Worksheet


Gruß Mike
Nouba
nicht ganz unwissend :)


Verfasst am:
06. Mai 2010, 08:10
Rufname:
Wohnort: Berlin

AW: Umstellung auf Latebinding - AW: Umstellung auf Latebinding

Nach oben
       Version: Office 2007

Hallo,

Anmerkung: Wenn Du eine schnell laufende Automatisierung haben willst, zeigst Du die Excel-Anwendung am Besten gar nicht an oder erst am Ende des Prozederes, wenn der Benutzer damit weiter arbeiten soll oder will.

_________________
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.
Druide
Erste Schritte in Access schon gemacht


Verfasst am:
06. Mai 2010, 10:00
Rufname:

AW: Umstellung auf Latebinding - AW: Umstellung auf Latebinding

Nach oben
       Version: Office 2007

Ah Vielen Dank!!!

Bei dem Code funktioniert das ganze auch jetzt wunderbar. Ich habe es scheinbar
mit der 2ten Exportfunktion gestern probiert und da macht er Probleme

Code:

Private Sub Befehl1_Click()
    'Dim xlApp As Excel.Application
    Dim xlApp As Object ' Excel.Application
    'Dim xlSheet As Excel.Worksheet
    Dim xlSheet As Object ' Excel.Worksheet
  Dim rs As DAO.Recordset
  Dim iCol As Long

  Set xlApp = GetObject(, "Excel.Application")
    On Error GoTo 0
    If xlApp Is Nothing Then
        Set xlApp = CreateObject("Excel.Application")
        xlApp.Workbooks.Add
        xlApp.Visible = True
    End If
    Set xlSheet = xlApp.ActiveWorkbook.Sheets("tabelle1")


Er sagt bei
Code:

Set xlApp = GetObject(, "Excel.Application")


Laufzeitfehler 429 "Objekt erstellung durch Active x Komponente nicht möglich

Woran kann den das liegen, bzw was hab ich übersehen?
Nouba
nicht ganz unwissend :)


Verfasst am:
06. Mai 2010, 10:23
Rufname:
Wohnort: Berlin

AW: Umstellung auf Latebinding - AW: Umstellung auf Latebinding

Nach oben
       Version: Office 2007

Hallo Druide,

schreibe On Error Resume Next in die Zeile davor.

_________________
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.
Druide
Erste Schritte in Access schon gemacht


Verfasst am:
06. Mai 2010, 13:54
Rufname:


AW: Umstellung auf Latebinding - AW: Umstellung auf Latebinding

Nach oben
       Version: Office 2007

Hey vielen Dank!!!

was so eine kleine Zeile alles bewirken kann Smile
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 Programmierung / VBA: Umstellung auf Access 2010 1 gn090256 81 07. Jan 2014, 22:13
MissPh! Umstellung auf Access 2010
Keine neuen Beiträge Access Programmierung / VBA: Umstellung auf 2013: VBA-Code läst sich nicht mehr ausführen 9 JochenKo 411 20. Nov 2013, 16:56
JochenKo Umstellung auf 2013: VBA-Code läst sich nicht mehr ausführen
Keine neuen Beiträge Access Tabellen & Abfragen: Parameter Abfrage bei Umstellung A2000 auf A2010 1 frankimnetz 56 06. Aug 2013, 19:00
Gast Parameter Abfrage bei Umstellung A2000 auf A2010
Keine neuen Beiträge Access Hilfe: Umstellung Access 2003 auf Access 2007 4 Flopsi 365 16. Jul 2012, 15:22
Flopsi Umstellung Access 2003 auf Access 2007
Keine neuen Beiträge Access Hilfe: Umstellung Format von MDB auf ACCDB (Access 2007) 7 melih 684 02. Jul 2012, 08:13
KlausMz Umstellung Format von MDB auf ACCDB (Access 2007)
Keine neuen Beiträge Access Programmierung / VBA: Hyperlink seit Umstellung auf 2010 absolut? 10 TheKiter 2069 05. Jan 2012, 10:36
TheKiter Hyperlink seit Umstellung auf 2010 absolut?
Keine neuen Beiträge Access Formulare: Umstellung des Filters im Unterformular 14 s_Techert 184 18. Okt 2011, 13:44
Gast Umstellung des Filters im Unterformular
Keine neuen Beiträge Access Programmierung / VBA: Schreibkonflikt nach Umstellung auf Ms SQL und ODBC 2 florenziger 987 05. Aug 2011, 09:39
florenziger Schreibkonflikt nach Umstellung auf Ms SQL und ODBC
Keine neuen Beiträge Access Hilfe: Probleme nach Umstellung von 2007 auf 2010 4 Christoph76 988 11. Jul 2011, 13:39
Christoph1976 Probleme nach Umstellung von 2007 auf 2010
Keine neuen Beiträge Access Tabellen & Abfragen: ENVIRON() Umstellung XP/off2000 auf Win7/off2010 14 PetraS 1606 04. Jul 2011, 09:27
steffen0815 ENVIRON() Umstellung XP/off2000 auf Win7/off2010
Keine neuen Beiträge Access Programmierung / VBA: Defaultwerteproblem bei Umstellung auf MYSQL 0 Gast1234 173 10. Aug 2010, 11:16
Gast1234 Defaultwerteproblem bei Umstellung auf MYSQL
Keine neuen Beiträge Access Tabellen & Abfragen: Umstellung meiner Datenbank von Excel auf Access 1 sirrius2k 678 20. Mai 2010, 09:24
Sinister Umstellung meiner Datenbank von Excel auf Access
 

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