Automatiser transfert des données

Bonjour ,

Vous avez Aujourd’hui en haut à gauche de l’image donc il faut cliquez dessus c’est ce bouton qui va charger ou plutôt importer l’ensemble des Réunions et courses ensuite on va choisir la course que l’on souhaite lorsque cela est fait il met le tableau avec les données c’est la qu’il sort le débogage malgré que les données sont bonnes mais le tableau n’est pas remplit en totalité Courues Victoire Placé ect… n’est pas rempli

LES LIENS BLEUES N’ONT AUCUNE INCIDENCE

Merci beaucoup

Je viens de cliquer sur le bouton « Aujourd’hui » sans obtenir le Bug

Pour moi pas de souci

Tu as un pb certainement chez toi (informatique PC ou applicatif ) ou de connexion internet de droit ou autres

Tu devrais essayer dans un autre environnement en changeant de PC de lieu pour la connexion et récupérer ton fichier sur cette discussion pour le tester
Puis de proche en proche reprendre peut être si il est portable ton ordinateur dans ce nouveau lieu puis faire l’inverse en utilisant chez toi un autre appareil etc… pour cerner ce qui ne fonctionne pas correctement

Chez moi en tout cas pas de souci

Tiens moi informé de la suite si je peux t’apporter des idées ce sera avec plaisir

Ce n’est pas en cliquant sur le bouton aujourd’hui que ça bug c’est lorsqu’on à choisi sa course .A tu le tableau en son entier comme ceci .Car mon homme la comme première image envoyé

Mon ordi est tout neuf

Merci encore
PS : Que pensez-vous de ce fichier à télécharger ?

La meilleure solution : comment réparer votre erreur Fichier Excel en quelques minutes

https://windowstechies.com/-/fr/filename-gen/?file=Fichier%20Excel&gclid=Cj0KCQjw4cOEBhDMARIsAA3XDRjWzgzvoKHIJwRxEpa3T6cfIxYW-eZYPPjz6MK3Mk0q-PDcvTY8WHYaApYpEALw_wcB

Bien Cordialement

Après avoir cliqué sur le bouton l’onglet « Accueil » ne semble pas beaucoup changer j’ai ceci :

Je n’ai pas l’impression que cela corresponde

Est ce bien cet onglet ?

ok dans le grand rectangle c’est écris choisir une course au bout à droite il y à une petite flèche qui pointe vers le bas donc on choisi une course et on attend que ça charge c’est la que ça bug malgré tout mais le tableau 'est pas complet en principe c’est rapide pour le chargement et la le tableau tel qu’il est sur votre image n’est pas complet

Alors à voir faites la manipe et dites moi merci encore

Ok je suis tombé sur le bug

En regardant la procédure j’ai réussi à réaliser à la main ce que celle-ci réalise par commande
Donc le site semble fonctionner

Mais moi si je Bug c’est que je ne répond pas à l’environnement souhaité pour naviguer sur internet en sa compagnie à savoir j’ai le navigateur « Edge » celui de Windows et qui est inapproprié à ce traitement car étant programmé pour « Mozilla »

exemple d’instruction :

.setRequestHeader « User-Agent », « Mozilla/5.0 (Windows NT 6.1; WOW64; Trident/7.0; rv:11.0) like Gecko »

Elle fait référence à ce navigateur

Qu’en est il de ton côté ?

Quel est le tien ?

Voir de ce côté la source peut être de tes difficultés

Moi je peux difficilement aller plus loin dans les investigations n’ayant pas l’environnement adapté pour ce traitement

A disposition pour des questions éventuelles

Merci beaucoup ,tu me pose une question , je ne saurais te répondre pas de connaissance ?

J’ai Mozilla dites moi ce qu’il faut que je fasse merci pas doué

Merci

Tu as uniquement Mozilla ou plusieurs navigateur ?

Mozilla et Chrome

Quel serait la marche à suivre ?

Merci encore

Bonjour
Si tu as 2 navigateurs lequel est programmé par défaut?
Il faudrait pour ce traitement que cela soit Mozilla pour qu il soit utilisé lors de son exécution

A vérifier

Bonjour

Mozilla Firefox n’est pas votre navigateur par défaut. Voulez-vous le définir en tant que navigateur par défaut ?

Donc si je comprend il faudrait que je prenne Mozilla Firefox ?

Merci de votre aide

Le traitement a t’il déjà fonctionné dans cette configuration à savoir ces 2 navigateurs avec celui de Chrome par défaut ?

Quoi qu’il en soit pour moi il faut le tenter et voir si c’est mieux

Le traitement à son exécution doit solliciter le navigateur par défaut donc « Chrome » et fonctionnant qu’avec Mozilla ne pas pouvoir ouvrir la page HTML

Mais n’ayant pas les moyens de tester cela reste que des suppositions

A toi de voir

Bonjour

j’ai l’impression que cela viens du code .Open « GET », Url, False

Option Explicit
Public Flag As Byte
Public Ridx() As Variant
Public Cidx() As Variant
Public LaDate As String

Function DWQ()
Dim i As Integer
With ActiveWorkbook
For i = .Names.Count To 1 Step -1
'If .Names(i) <> « =Compte_Geny!$A$1:$C$2 » Then .Names(i).Delete
Next i
For i = .Connections.Count To 1 Step -1
.Connections.Item(i).Delete
Next i
End With
End Function

Public Function DataHtml(Url)
Dim REQ
Set REQ = CreateObject(« microsoft.xmlhttp »)
With REQ
.Open « GET », Url, False
.setRequestHeader « Accept », « text/html, application/xhtml+xml, / »
.setRequestHeader « Accept-Language », « fr-FR »
.setRequestHeader « User-Agent », « Mozilla/5.0 (Windows NT 6.1; WOW64; Trident/7.0; rv:11.0) like Gecko »
.setRequestHeader « Accept-Encoding », « gzip, deflate »
.setRequestHeader « Host », « www.geny.com »
.setRequestHeader « Connection », « Keep - Alive »
.setRequestHeader « cache-Control », " no-cache"
.Send
DataHtml = .ResponseText
End With
Set REQ = Nothing
End Function

Public Function DateProtect(strInput As String)
Dim regEx As Object
Dim x As Integer, Tablo() As String
Dim match As Object, matches As Object

Set regEx = CreateObject("VBScript.RegExp")
With regEx
    .Global = True
    .MultiLine = True
    .IgnoreCase = False
    .Pattern = "[0-9][0-9][/][0-9][0-9][/][0-9][0-9]"
End With

Set matches = regEx.Execute(strInput)
For Each match In matches
    If match.Length Then
        ReDim Preserve Tablo(x)
        Tablo(x) = match.firstIndex
        x = x + 1
    End If
Next match
If x <> 0 Then
    For x = UBound(Tablo) To 0 Step -1
        strInput = WorksheetFunction.Replace(strInput, Tablo(x), 1, ">" & Chr$(160))
    Next x
End If
Set matches = Nothing
Set regEx = Nothing
DateProtect = strInput

End Function