Discussion :

[pierrequimousse]

Bonjour à tous,

Je réalise l'importation d'une base de données Excel vers Access. Cela fonctionne très bien à part pour un champ "site web" qui est rempli de liens vers les sites internet de mes fournisseurs. Dans Excel, pas de problème, les liens fonctionnent, j'ai utilisé un code vba pour passer les adresses des sites (qui étaient stockés en texte) en lien hypertexte. Voici ce bout de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub hyperlien_sanshttp()
With Sheets("Tiers")
Dim i As Integer
For i = 17 To 1049
 
    .Hyperlinks.Add Anchor:=.Range("W" & i), _
    Address:="http://" & .Range("W" & i).Value
 
Next
End With
End Sub

Cependant je viens de réaliser que l'importation ne peut pas importer de liens hypertexte, mais seulement le texte (Grrrr mon bout de code n'a servi à rien !). Je me demande (et donc vous demande) si je peux utiliser le même type de code sous access, en VBA, pour modifier ce champ de ma table ?

D'avance merci pour votre aide !

Cordialement,

Pierre

[pierrequimousse]

Eurêka ! En fait le vba n'était pas nécessaire, j'ai trouvé une solution en SQL : une requête mise à jour toute simple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
UPDATE T_tiers SET T_tiers.[Site internet2] = [Site internet] & "#" & "http://" & [Site internet] & "#"
WHERE ((([T_tiers]![Site internet]) Is Not Null));

A croire que ma première recherche sur le forum n'avait pas été assez approfondie : j'ai trouvé la solution ici : http://www.developpez.net/forums/d80...en-hypertexte/

Merci à tous ceux qui on jeté un oeil sur mon problème, et merci à tous ceux qui enrichissent ce forum ou (il me semble) tous les problèmes trouvent une solution !!

Cordialement,

Pierre