Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Excel Daten aus dem WeB aktualisieren, Excel nach fertigstellung im Anschluss schließen

Frage Microsoft Microsoft Office

Mitglied: thomas1972

thomas1972 (Level 1) - Jetzt verbinden

25.12.2014 um 17:58 Uhr, 2005 Aufrufe, 11 Kommentare

Hallo,

ich lade Daten in eine Excel Datei aus dem web hinein, DATEN - AUS DEM WEB.
das klappt beim öffnen soweit ganz gut, nur wie bekomme ich es hin, dass im Anschluss die Excel Datei automatisch wieder geschlossen wird?

Geht dieses überhaupt?
Habe leider hierzu keine Einstellung in Excel gefunden.
Mitglied: 114757
25.12.2014, aktualisiert um 19:05 Uhr
Moin,
aktualisiere die QueryTable via VBA und schließe sie dann auch damit
01.
Private Sub Workbook_Open() 
02.
    'Querytables auf dem 
03.
ersten Sheet aktualisieren (SheetIndex  
04.
ist anzupassen) 
05.
for each qt in Worksheets(1).Querytables 
06.
    qt.Refresh BackgroundQuery:=False 
07.
next 
08.
'Workbook speichern und schließen 
09.
ThisWorkbook.Close True 
10.
'Excel beenden 
11.
Application.Quit 
12.
End Sub
Gruß jodel32
Bitte warten ..
Mitglied: thomas1972
25.12.2014 um 18:48 Uhr
Dieses dann als openmakro?
Bitte warten ..
Mitglied: 114757
25.12.2014 um 18:49 Uhr
yip, oder in das Workbook_Open() Event kopieren...
Bitte warten ..
Mitglied: thomas1972
25.12.2014 um 18:52 Uhr
Bin von excel komplett raus, workbook_open event??
Sorry für die frage
Bitte warten ..
Mitglied: 114757
25.12.2014, aktualisiert um 18:59 Uhr
Zitat von thomas1972:
workbook_open event??
Sorry für die frage
guckst du hier
http://support.microsoft.com/kb/265113/de
Bitte warten ..
Mitglied: thomas1972
25.12.2014 um 19:05 Uhr
Irgendwie löscht er mir das makro aus "diesearbeitsmappe" immer wieder heraus.
Beim speichern kam auch immer ein hinweis das das makro nicht gespeichert werden kann.

kann es mit excel2010 zusammen hängen?
Bitte warten ..
Mitglied: 114757
25.12.2014, aktualisiert um 19:11 Uhr
Du musst die Mappe als *.xlsm speichern !!!
Und Makros musst du natürlich im Sicherheitscenter von Excel auch aktivieren !! Optionen -> Trustcenter .....
http://office.microsoft.com/de-de/excel-help/andern-der-einstellungen-f ...

Mann das sind VBA-Grundlagen oder hast du noch nie was mit VBA gemacht ?
Bitte warten ..
Mitglied: thomas1972
25.12.2014, aktualisiert um 19:29 Uhr
Ich arbeite meist eher über Access und habe solche Einstellungen dort nicht vornehmen müssen,
aber vielleicht bekomme ich es auch anders hin.

ich öffne über Access eine Excel Datei, welche Webabfragen automatisch durchführt
Hintergrund, Access ist nicht in der Lage Websiten ohne Endung (html, htm) einzulesen, daher der Umweg über Excel

01.
Private Sub Form_Load() 
02.
    Dim xlApp As Object, xlWB As Object 
03.
 
04.
     Set xlApp = CreateObject("Excel.Application") 
05.
     xlApp.Visible = True 
06.
     Set xlWB = xlApp.Workbooks.Open("f:\Test.xlsx", , True) 
07.
     Set xlWB = xlApp.Workbooks(1).RefreshAll 
08.
      
09.
End Sub 
10.
 
Hierbei wird aber das Excel Sheet immer nur Schreibgeschützt geöffnet
Wie bekomme ich es hin,

1. das das Excel Sheet nicht schreibgeschützt geöffnet wird
2. dass Access mitbekommt, dass das Excel Sheet fertig ist und dann das Sheet speichert und Excel beendet

Die Zeile Set xlWB = xlApp.Workbooks(1).RefreshAll
erzeugt einen Laufzeitfehler 424 Objekt erforderlich
Bitte warten ..
Mitglied: 114757
25.12.2014, aktualisiert um 20:00 Uhr
na das Hammer gerne, von Access hast du kein Wort erwähnt ... einmal kurz in die Doku schauen und du hättest es gewusst:
http://msdn.microsoft.com/de-de/library/office/ff194819(v=office.15).as ...

01.
Set xlWB = xlApp.Workbooks.Open("f:\Test.xlsx") 
02.
xlWB.RefreshAll 
03.
xlWB.Close True 
04.
xlApp.Quit
Die Query darf dabei nicht als Background-Query angelegt sein, dann wartet der Code bis alles aktualisiert ist ! Ansonsten kannst du die Querytable wie oben bereits geschrieben mit Angabe der BackgroundQuery-Parameters dazu zwingen Ihre Daten im Vordergrund zu aktualisieren.
Bitte warten ..
Mitglied: thomas1972
25.12.2014, aktualisiert um 19:44 Uhr
Der Fehler 424 bleibt dennoch weiter in der Zeile Set xlWB = xlApp.Workbooks(1).RefreshAll
erhalten, auch genannte URL hilft mir hier nicht weiter.

Hintergrundaktualisierung ist bereits abgeschaltet.



>code>
Private Sub Form_Load()
Dim xlApp As Object, xlWB As Object

Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
Set xlWB = xlApp.Workbooks.Open("f:\drucker_prod4.xlsx", , ReadOnly:=false)
Set xlWB = xlApp.Workbooks(1).RefreshAll
xlWB.Close True
xlApp.Quit
End Sub
</code>
Bitte warten ..
Mitglied: 114757
25.12.2014, aktualisiert um 20:00 Uhr
Falsch ....
01.
Private Sub Form_Load() 
02.
     Dim xlApp As Object, xlWB As Object, qt as Object 
03.
     Set xlApp = CreateObject("Excel.Application") 
04.
     xlApp.Visible = True 
05.
     xlApp.DisplayAlerts = False 
06.
     Set xlWB = xlApp.Workbooks.Open("f:\Test.xlsx") 
07.
     for each qt in xlWB.Worksheets(1).Querytables 
08.
        qt.Refresh BackgroundQuery:=False 
09.
     next 
10.
     xlWB.Close True 
11.
     xlApp.DisplayAlerts = True      
12.
     xlApp.Quit 
13.
End Sub
Bitte warten ..
Ähnliche Inhalte
CMS
Joomla aktualisieren und im Anschluss das Backup importieren
Frage von Leo-leCMS6 Kommentare

Hallo Forum, ich stehe mal wieder vor einem kleinen Problem. Und zwar ging unser altes Joomla nicht mehr zu ...

Microsoft Office
Fehlermeldung beim Schliessen von Excel 2013
Frage von torosyMicrosoft Office16 Kommentare

Ich arbeite mit Office Pro 2013 Volumenlizenz unter Win 7 Pro. Bei Excel 2013 bekomme ich ständig eine Fehlermeldung ...

Microsoft Office
Excel Zellinhalte aus einer Datei in eine andere Excel Datei kopieren und auch aktualisieren
gelöst Frage von Rene1976Microsoft Office4 Kommentare

Hallo, bis jetzt habe ich immer eine Referenz von einer Excelzelle aus einer Datei in eine andere Excelzelle einer ...

Microsoft Office
Excel 2016 - Verknüpfung zu anderer Excel Datei automatisch aktualisieren
Frage von devil7974Microsoft Office2 Kommentare

Hallo zusammen, ich habe eine Excel Datei auf meiner Dropbox liegen. Die Daten in dieser Datei werden regelmäßig gepflegt ...

Neue Wissensbeiträge
Windows 10

Windows 10 Hello-Anmeldung per Foto ausgehebelt

Tipp von kgborn vor 1 StundeWindows 10

Windows Hello ist eine Funktion, um sich per Fingerabdruck-, Gesichts- oder Iriserkennung bei Windows 10-Geräten anzumelden (siehe), setzt aber ...

Perl

Perl hat heute Geburtstag: 30 Jahre Perl: Lange Gesichter zum Geburtstag

Information von Penny.Cilin vor 8 StundenPerl2 Kommentare

Hallo, auch wenn es wenige wissen und noch weniger Leute es nutzen. Perl hat heute Geburtstag. 30 Jahre Perl ...

Sicherheit

Blackberry stirbt - Keine Updates für Priv mehr

Tipp von certifiedit.net vor 9 StundenSicherheit1 Kommentar

Blackberry wird zu einer 08/15 Firma und geht wohl mehr und mehr den Weg, den HTC schon ging. Von ...

Windows 10

Autsch: Microsoft bündelt Windows 10 mit unsicherer Passwort-Manager-App

Tipp von kgborn vor 2 TagenWindows 1012 Kommentare

Unter Microsofts Windows 10 haben Endbenutzer keine Kontrolle mehr, was Microsoft an Apps auf dem Betriebssystem installiert (die Windows ...

Heiß diskutierte Inhalte
Windows Server
SCCM 2016: PXE Boot des Clients schlägt fehl
Frage von gabeBUWindows Server22 Kommentare

Hallo Zusammen Ich habe eine Testumgebung erstellt um über SCCM 2016 einen virtuellen Client aufzusetzen. Folgende Maschinen habe ich ...

Netzwerkgrundlagen
Belibiges Teilnetz einer Subnetzmaske rausfinden?
gelöst Frage von CenuzeNetzwerkgrundlagen19 Kommentare

Wundervollen Gutentag, mittlerweile kann ich Subnetting so einigermaßen, aber ein Problem habe ich noch. Netzwerkadresse und Boradcast errechnen ist ...

LAN, WAN, Wireless
WLAN Reichweite erhöhen mit neuer Antenne
gelöst Frage von gdconsultLAN, WAN, Wireless12 Kommentare

Hallo, ich besitze einen TL-WN722N USB-WLAN Dongle mit einer richtigen Antenne. Ich frage mich jetzt ob man die Reichweite ...

Windows Server
Logging von "gesendeten Nachrichten" auf Terminalservern
gelöst Frage von Z3R0C0MM4N0THiN6Windows Server10 Kommentare

Hallo zusammen, kann mir jemand auf kurzem Wege sagen ob 1) die per Task-Manager (oder damals tsadmin) an Benutzer ...