hallo zusammen,
gerne möchte ich nochmal um eure Unterstützung bitten :-)
ich möchte aus einem Formular bestimmte Daten in eine externe Exceltabelle übertragen; also nicht über "Externe Daten", "Excel"
die externe Exceltabelle ist speziell formatiert, beinhaltet u.a. auch verformelte Zellen, die wiederum auf die Daten von Access zurückgreifen. die mit den Daten aus Access gefüllte externe Exceltabelle wird anschliessend extern weiter verwendet
geht das??
Hallo,
klar geht das.
Siehe hier (aus dbwiki.net):
http://www.dbwiki.net/images/3/3f/AccSampleAccessToExcel.zip
hallo DF6GL,
danke für deine rasche Unterstützung :-)
klappt aber noch nicht so recht.
wenn ich da drauf klicke "Excel-Datei - wenn vorhanden - öffnen, Arbeitsblatt suchen - wenn......." kommt die Fehlermeldung: "Datei nicht gefunden", klicke ich auf "ok", kommt "Laufzeitfehler 1004..." - "Excel kann auf die Datei ...... nicht zugreifen..."
der Debugger markiert diese Zeile " .ActiveWorkbook.SaveAs Me!FName"
darf ich dich nochmal um deine Unterstützung bitten
was muss ich wo eintragen/ändern, dameit es funzt?
ich verwende Access 2007
Hallo,
was hast du denn unter "FName" eingetragen??
Hallo,
die Datei ist nur als Beispiel zum Prinzip zu verstehen. Du musst Dich sowieso mit VBA auseinander setzen und dabei gleich lernen, wie man mit solchen Fehlermeldungen umgeht, bzw. die abstellt (hier: in akt. Version konvertieren, Sicherheitsoptionen einstellen, Code debuggen, etc...)
Wenn Du unter "Excel-Datei" einen gültigen Pfad und eine xls-Datei angibst, sollte die Übertragung in diese Datei schon funktionieren.
hallo Ihr beiden,
danke für eure rasche antwort :) :)
ich gebe zu, mich mit VBA nicht so wirklich gut auszukennen.
Ich hab's gefunden ;D ;D ;D
Da war n Schreibfehler unter "Excel-Datei"
Es funktioniert!!
* D * A * N * K * E *
Gerne möchte ich aber die Meldungen "Datei vorhanden" & "Blatt vorhanden" abstellen. Nur, wenn die Datei, bzw. das Blatt fehlt soll die Fehlermeldung kommen.
Könnt Ihr mir sagen, wie das geht?
Hi,
im einfachsten Fall kannst du den jeweiligen MsgBox-Befehl durch ein vorangestelltes Hochkomma auskommentieren.
Hallo,
@Maggie
Zitatim einfachsten Fall kannst du den jeweiligen MsgBox-Befehl durch ein vorangestelltes Hochkomma auskommentieren.
Hilft ihm aber nicht bei
ZitatNur, wenn die Datei, bzw. das Blatt fehlt soll die Fehlermeldung kommen.
@radi
In dem Fall sollte doch ein Fehler ausgelöst werden. Auf den kannst Du
mit der MsgBox reagieren.
gruss ekkehard
@ekkehard:
ZitatHilft ihm aber nicht bei
wieso nicht?
Es könnten doch gezielt die Meldungen ausgeschaltet werden, die tatsächlich überflüssig sind.
ZitatGerne möchte ich aber die Meldungen "Datei vorhanden" & "Blatt vorhanden" abstellen.
hallo ihr,
danke für eure Unterstützung.
die MsgBoxes mit "Datei vorhanden" & "Blatt vorhanden" habe ich durch ein Hochkomma abgestellt. funktioniert alles richtig gut, dank eurer Hilfe ;D
Jetzt aber tut sich ein anderes Problem auf :-[
Ich hab den Code der Schaltfläche aus der "Musterdatenbank" in meine Datenbank für die dafür vorgesehne Schaltfläche kopiert und alle Felder entsprechend angepasst.
beim Klick darauf bekomme ich diese Fehlermeldung: "Benutzerdefinierter Typ nicht definiert"
Das wird markiert:
Private Sub OpenExcel_Click()
Dim oExcel As Excel.Application, Tmp, oSheet As Excel.Worksheet, Er As Long
Könnt ihr mir nochmal helfen?
Hi,
wenn du die Objekte explizit (-> Early Binding) deklarieren willst, so brauchst du einen Verweis auf die Excel-Objektbibliothek. Die Alternative (-> Late Binding) wäre, die Objekte mit "As Object" zu deklarieren.
Hallo Maggie,
Hast ja recht. Da hat mir meine gefilterte Wahrnehmung mal wieder einen
Streich gespielt; - hatte "nicht vorhanden" gelesen >:(
gruss ekkehard
Ihr seit die B E S T E N !!
Nochmals vielen, vielen D A N K !!
:D :D :D :D
Ich hatte die Excel-Object Library nicht für meine Datenbank aktiviert :(