Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Inhalte eines Browsers in die Zwischenablage kopieren per vba (Access

Frage Entwicklung VB for Applications

Mitglied: thomas1972

thomas1972 (Level 1) - Jetzt verbinden

01.12.2013, aktualisiert 08:57 Uhr, 6398 Aufrufe, 5 Kommentare

Hallo, ich habe folgendes Problem,, wo mir vielleicht jemand helfen kann.
Ich bin auf einer Internetseite welche mir die Möglichkeit des ¨ausdrucken¨ bietet.
Dabei wird die zu ¨druckende¨ Seite als neues Brwoserfenster (Internet explorer) mit dem namen Detail geöffnet.
Diese Funktion wollte ich verwenden um den Inhalt in ein ungebundenen Textfeld von Access zu bekommen.

Besteht die möglichkeit per VBA aus Access heraus das Browserfenster ¨Detail¨ im Hintergrund den Inhalt zu markieren und in ein ungebundenes Textfeld einzufügen (Z.Zt. gehe ich im Moment über Website in den Vordergrund holen, STRG+A, in Access ins Formular wechsel und den Inhalt per STRG+C in das ungebundene Textfeld einzufügen)

WIe kann sowas über Access automatisch abgebildet werden?
Könnte der Inhalt auch in eine Variablbe zwischengespeichert werden?

Vielleicht hat hier jemand einen Ansatz.

Wünsche ein schönes Advent´s Wochenende
Mitglied: colinardo
01.12.2013, aktualisiert um 11:28 Uhr
Hallo Thomas,
auch für das gibt es eine einfache Lösung: Download Demo DB
01.
    Set objIE = CreateObject("InternetExplorer.Application") 
02.
    objIE.Navigate "http://www.administrator.de" 
03.
    'Wenn du den IE nicht sehen möchtest schaltest du ihn hier auf 'False' 
04.
    objIE.Visible = True 
05.
    'warten bis die Seite komplett geladen ist 
06.
    While Not objIE.ReadyState = 4 
07.
        DoEvents 
08.
    Wend 
09.
    'Inhalt des Body's der Webseite in das Textfeld laden  
10.
    txtContent.SetFocus 
11.
    txtContent.Value = objIE.Document.Body.innerHTML 
12.
    ' IE schließen 
13.
    objIE.Quit
txtContent = ist das Textfeld in das der Inhalt der Webseite geladen werden soll.
Grüße Uwe
Bitte warten ..
Mitglied: thomas1972
01.12.2013 um 11:43 Uhr
Hallo Uwe,

Die Website ist bereits geladen und soll nur ausgelesen werden.
Ich kann die Website nicht per LINK öffnen, da diese mit normalen Aufruf noch keine Daten enthält.
WEBSEITE KANN NICHT ANGEZEIGT WERDEN
Daher lasse ich sie auf der Page per Print nochmalige erzeugen (öffnen der Website detail),

Diese soll dann ausgelesen werden.
Bitte warten ..
Mitglied: colinardo
01.12.2013, aktualisiert um 11:54 Uhr
Zitat von thomas1972:
Die Website ist bereits geladen und soll nur ausgelesen werden.
wie hast du sie geladen, auch mit dem IE-Object ?
Ich kann die Website nicht per LINK öffnen, da diese mit normalen Aufruf noch keine Daten enthält.
WEBSEITE KANN NICHT ANGEZEIGT WERDEN
Daher lasse ich sie auf der Page per Print nochmalige erzeugen (öffnen der Website detail),
Diese soll dann ausgelesen werden.
kannst du ja machen, wenn die Seite dann offen ist bekommst du den Body-Inhalt ja immer hiermit wenn du die ursprüngliche Seite mit dem IE-Object aufgerufen hast
objIE.Document.Body.innerHTML 
bzw. in Nur-Text hiermit:
objIE.Document.Body.innerText
Bitte warten ..
Mitglied: thomas1972
01.12.2013 um 13:05 Uhr
Nein die Website habe ich normal geladen und dann aus dieser eine neue Seite geöffnet welche Detail heist.

Hintergrund, in auf dieser Website x besteht die Möglichkeit Inhalte sich zusammengefasst ausdrucken zu lassen, dazu öffnet die eine neue website die Detail heist, hier kann die Ansicht dann gedruckt werden. Da dachte ich mir anstatt die Seite auszudrucken einfach auslesen und in access weiter zu verwenden
Bitte warten ..
Mitglied: thomas1972
01.12.2013 um 14:50 Uhr
Danke uwe, der tippen war hilfreich. Könnte das problem nun lösen und funktioniert Dank deiner hilfe
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Datenbanken
gelöst Syntaxfehler VBA Access 2010 (6)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

VB for Applications
gelöst Xml-Datei laden bzw. auf Festplatte kopieren und per VBA in eine Access-Tabelle speichern (22)

Frage von machohunk zum Thema VB for Applications ...

Datenbanken
gelöst Access Report per Email versenden, hat jemand zufällig einen Code dafür(VBA) (7)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

VB for Applications
gelöst VBA: Wert von einer Website (pdf-Dokument) auslesen und in Excel kopieren (16)

Frage von Stern123 zum Thema VB for Applications ...

Heiß diskutierte Inhalte
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (21)

Frage von Xaero1982 zum Thema Microsoft ...

Netzwerkmanagement
gelöst Anregungen, kleiner Betrieb, IT-Umgebung (18)

Frage von Unwichtig zum Thema Netzwerkmanagement ...

Windows Update
Treiberinstallation durch Windows Update läßt sich nicht verhindern (17)

Frage von liquidbase zum Thema Windows Update ...