Der Fehlercode ErrNum = 75 in Microsoft Access VBA steht für "Pfad/Datei-Zugrifffehler" (englisch: "Path/File access error"). Dieser Fehler tritt auf, wenn ein Zugriff auf ein...
Wie speichere ich eine Internetseite mit VBA?
Antwort vomUm eine Internetseite mit VBA zu speichern, kannst du die `XMLHTTP`-Objektbibliothek verwenden, um die Seite herunterzuladen, und dann den Inhalt in eine Datei schreiben. Hier ist ein Beispiel, wie das geht: 1. Öffne Excel und drücke `Alt + F11`, um den VBA-Editor zu öffnen. 2. Gehe zu `Extras` > `Verweise` und aktiviere die `Microsoft XML, v6.0`-Bibliothek. 3. Füge ein neues Modul hinzu und füge den folgenden Code ein: ```vba Sub SaveWebPage() Dim http As Object Dim html As String Dim filePath As String Dim fileNum As Integer ' URL der Webseite Dim url As String url = "https://www.beispielseite.de" ' Pfad und Name der Datei, in die die Webseite gespeichert werden soll filePath = "C:\Pfad\zur\Datei\seite.html" ' Erstelle das XMLHTTP-Objekt Set http = CreateObject("MSXML2.XMLHTTP") ' Sende eine GET-Anfrage an die URL http.Open "GET", url, False http.send ' Überprüfe den Status der Anfrage If http.Status = 200 Then ' Lese den HTML-Inhalt der Webseite html = http.responseText ' Erstelle eine neue Datei und schreibe den HTML-Inhalt hinein fileNum = FreeFile Open filePath For Output As #fileNum Print #fileNum, html Close #fileNum MsgBox "Webseite erfolgreich gespeichert!" Else MsgBox "Fehler beim Abrufen der Webseite. Status: " & http.Status End If ' Bereinige das Objekt Set http = Nothing End Sub ``` Dieser Code lädt die HTML-Inhalte der angegebenen URL herunter und speichert sie in einer Datei auf deinem Computer. Passe die `url` und `filePath` Variablen entsprechend deinen Anforderungen an.
Verwandte Fragen
Was bedeutet 'On Error GoTo 0'?
Die Anweisung On Error GoTo 0 stammt aus der Programmiersprache Visual Basic (z. B. VBA, VB6). Sie wird verwendet, um die aktuelle Fehlerbehandlung zu deaktivieren. Das bedeutet: Nach On Error GoTo 0...
Ist Shapes("Rechteck 1").Visible = True korrekt in Excel-VBA?
Der Ausdruck Shapes("Rechteck 1").Visible = True ist in Excel-VBA nicht korrekt, da das Visible-Eigenschaftsmerkmal für Shapes in Excel-VBA nicht existiert. In Excel-VBA steuerst du d...
Ist folgender Excel-VBA-Code korrekt: HeightPt = Rows("4:" & Cells(49,19).Row).Height?
Der gezeigte Code ist in Excel-VBA nicht korrekt und führt zu einem Fehler. Das Problem liegt in der Syntax innerhalb der Rows-Funktion. Hier die Analyse: Dein Code: vba HeightPt = Rows("4:...
Wie kann man in Excel-VBA einen RGB-Code aus einer Zelle lesen?
Um in Excel-VBA einen RGB-Code aus einer Zelle zu lesen und diesen z.B. für die Füllfarbe eines Shapes zu verwenden, kannst du wie folgt vorgehen: Angenommen, in Zelle A1 steht der RGB-Code...
Was bewirkt der VBA-Code mit shp.Line.Visible = msoFalse und shp.Fill.ForeColor.RGB = 0?
Der gezeigte VBA-Code (Visual Basic for Applications) wird typischerweise in Microsoft Office-Anwendungen wie PowerPoint oder Excel verwendet, um die Formatierung einer Form (Shape) zu steuern. Hier i...
Was bewirkt der VBA-Code mit shp.Line.Visible = msoFalse, shp.Fill.Visible = msoTrue und shp.Fill.ForeColor.RGB = 0?
Der gezeigte VBA-Code (Visual Basic for Applications) wird typischerweise in Microsoft Office-Anwendungen wie PowerPoint oder Excel verwendet, um die Formatierung einer Form (Shape) zu steuern. Hier i...
Wie erstelle ich in Access VBA eine SQL-Abfrage?
Um in Microsoft Access per VBA eine Abfrage (Query) mit SQL zu erstellen, kannst du das DAO-Objektmodell verwenden. Hier ein Beispiel, wie du per VBA eine neue Abfrage mit einer SQL-Anweisung erstells...
Was ist falsch an folgendem Access VBA SQL-Statement: strSQL = "INSERT INTO tbl_Bestände_HZV (Datum, RLEx) IN " & strPfadExtern & "." & ZielTabelle & ...?
In deinem SQL-Statement gibt es mehrere Probleme: 1. Syntaxfehler bei IN: Das IN-Schlüsselwort wird in Access-SQL für das Einfügen in eine externe Tabelle verwendet, aber die Syntax...
Wie kann man per VBA-Makro beim Öffnen einer Datei das Kontextmenü der rechten Maustaste deaktivieren?
Um beim Öffnen einer Excel-Datei per VBA-Makro die Kontextmenüs der rechten Maustaste zu deaktivieren, kannst du folgenden Code im Modul "DieseArbeitsmappe" (engl. "ThisWorkbo...
