Thema Datum  Von Nutzer Rating
Antwort
Rot Web Seite Parsen
03.05.2022 11:28:32 Gast29378
NotSolved
03.05.2022 12:04:58 Gast55035
NotSolved
03.05.2022 13:46:22 Gast78567
NotSolved
09.05.2022 12:53:01 Gast29378
NotSolved
09.05.2022 13:21:07 Mase
NotSolved
09.05.2022 13:49:32 Gast29378
NotSolved

Ansicht des Beitrags:
Von:
Gast29378
Datum:
03.05.2022 11:28:32
Views:
71
Rating: Antwort:
  Ja
Thema:
Web Seite Parsen

Moin @All

Habe ein Makro das mir eine Intranet Seite geparst hatte.
Was auch gut lief, bis Microsoft 365 (Office) 64bit kam.

 Range("A1").Select
  With ActiveSheet.QueryTables.Add(Connection:= _
    "URL;https://xxx/xxx/xxx/xxx/xxx.php?Jahr=" & xJahr & "&AUFTRAGNR=&X1=" & P & "&Xcounter=1&Start=Ausf%C3%BChren" _
    , Destination:=Range("$A$1"))
    .Name = _
    "xxx.php?Jahr=" & xJahr & "&AUFTRAGNR=&X1=" & P & "&pincounter=1&Start=Ausf%C3%BChren_1"
    .FieldNames = True
    .RowNumbers = False
    .FillAdjacentFormulas = False
    .PreserveFormatting = True
    .RefreshOnFileOpen = False
    .BackgroundQuery = True
    .RefreshStyle = xlInsertDeleteCells
    .SavePassword = False
    .SaveData = True
    .AdjustColumnWidth = True
    .RefreshPeriod = 0
    .WebSelectionType = xlAllTables
    .WebFormatting = xlWebFormattingNone
    .WebPreFormattedTextToColumns = True
    .WebConsecutiveDelimitersAsOne = True
    .WebSingleBlockTextImport = False
    .WebDisableDateRecognition = False
    .WebDisableRedirections = False
    .Refresh BackgroundQuery:=False

Das ist nur der Teil des Parsen.

Kann mir jemand dabei Helfen?


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Web Seite Parsen
03.05.2022 11:28:32 Gast29378
NotSolved
03.05.2022 12:04:58 Gast55035
NotSolved
03.05.2022 13:46:22 Gast78567
NotSolved
09.05.2022 12:53:01 Gast29378
NotSolved
09.05.2022 13:21:07 Mase
NotSolved
09.05.2022 13:49:32 Gast29378
NotSolved