IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Application.FollowHyperlink VBA ajoute un dièse # dans le résultat


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Homme Profil pro
    Profession libérale
    Inscrit en
    Avril 2020
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Profession libérale

    Informations forums :
    Inscription : Avril 2020
    Messages : 2
    Par défaut Application.FollowHyperlink VBA ajoute un dièse # dans le résultat
    Bonjour,

    Je suis assez novice en VBA et présente d'avance mes excuses si ma question est stupide.

    Voici la formule que j'utilise :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Sub ouvrir_Site()
     
    Dim Parametre As String
     
    Parametre = "account/accounts?searchText=" & Form_Dossiers.ndossier
     
    Application.FollowHyperlink "http://site.be", Parametre, , True
     
    End Sub

    Sur le browser un # est rajouté entre l'adresse URL et la sous-adresse et cela donne ceci à l'ouverture de la page:

    https://site.be/#account/accounts?searchText=1768


    Et la recherche ne fonctionne donc pas (si j'enlève manuellement le # dans le browser, cela marche.

    J'ai essayé d'ouvrir le même fichier .mdb dans Acces 365 et le problème est identique.

    Merci pour l'aide que vous pourrez m'apporter !

  2. #2
    Expert confirmé
    Avatar de vodiem
    Homme Profil pro
    Vivre
    Inscrit en
    Avril 2006
    Messages
    2 895
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 53
    Localisation : France, Bouches du Rhône (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Vivre
    Secteur : Conseil

    Informations forums :
    Inscription : Avril 2006
    Messages : 2 895
    Par défaut
    Bienvenu ScrameustacheJLD,

    C'est normal.
    Si tu te réfères à la documentation ici
    SubAddress :
    ... a pour résultat un emplacement nommé dans le document spécifié
    Techniquement cela veut dire qu'il s'agit d'un attribut ID dans le document, ce qui explique le #. (Le sélecteur sur un ID doit être précédé d'un dièse)

    Tu dois tout simplement construire ton url complet et le transmettre dans le paramètre Address :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.FollowHyperlink "http://site.be" & Parametre, , , True

  3. #3
    Nouveau candidat au Club
    Homme Profil pro
    Profession libérale
    Inscrit en
    Avril 2020
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Profession libérale

    Informations forums :
    Inscription : Avril 2020
    Messages : 2
    Par défaut
    Merci beaucoup, c'est super comme aide.

    Je ne sais pas pourquoi mais en faisant comme tu le proposes (j'avais déjà tenté), je n'ai que l'url de base dans le browser et pas la suite (à partir de /bank-accounts).

    Par contre, j'ai réussi comme suit :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Sub ouvrir_Site()
     
    Dim Parametre As String
     
    Parametre = "https://site.be/bank-accounts/accounts?searchText=" & Form_Dossiers.ndossier
     
    Shell ("C:\Program Files (x86)\Google\Chrome\Application\chrome.exe -url " & Parametre)
     
    End Sub

Discussions similaires

  1. [XL-2010] VBA ajouter des données dans une table
    Par mouftie dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 22/02/2016, 22h19
  2. [XL-2010] VBA ajout de formule dans une cellule
    Par dim597 dans le forum Excel
    Réponses: 0
    Dernier message: 14/05/2013, 10h27
  3. [XL-2007] Macro VBA ajout un champ dans base de donnée
    Par Sangoku76 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 30/10/2012, 09h35
  4. Access/VBA Ajouter des données dans une table !
    Par vto59 dans le forum VBA Access
    Réponses: 10
    Dernier message: 04/06/2009, 15h18
  5. VBA : ajouter une valeur dans une liste déroulante
    Par remi59 dans le forum Access
    Réponses: 4
    Dernier message: 22/12/2005, 10h01

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo