Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1410 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA EXCEL] Insérer lien Hypertexte avec condition

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA EXCEL] Insérer lien Hypertexte avec condition

n°1594349
BOBIE
Posté le 01-08-2007 à 13:54:09  profilanswer
 

Bonjour à tous,
je suis novice en VBA et j'aurais besoin d'un peu d'aide
voila mon problème je cherche à inserer automatiquement une ligne contenant un lien hypertexte après une ligne ou il est écrit "prorgamme"
voila mon programme pour le moment :
 
 

Code :
  1. Private Sub CommandButton9_Click()
  2. 'ajouter automatiquement une ligne
  3. Dim x As Integer
  4. For x = Range("A65536" ).End(xlUp).Row To 1 Step -1
  5. If Not Intersect(Range("A" & x), Selection) Is Nothing Then
  6. Rows(28).Insert Shift:=xlDown
  7. End If
  8. Next
  9. 'ajouter un lien hypertexte à la cellule A28.
  10. Dim objLink As Hyperlink
  11. Set objLink = ActiveSheet.Hyperlinks.Add(Range("A28" ), "OE A001.xls" )
  12. With objLink
  13.     .SubAddress = "A002"
  14. End With
  15. End Sub


 
Le problème de ce code est qu'il est lié à une ligne précise donc si je veux faire la meme opération mais avec un autre mot "Vacance" alors rien ne se plaçe là ou je voudrais puisque tous est lié à la ligne.
également je voulais savoir si il était possible d'incrémenter le nom de mon lien hypertexte (A001,A002,A003,A004...)
si qq'un à une idée je suis preneur
merçi d'avance pour votre aide et votre patience

mood
Publicité
Posté le 01-08-2007 à 13:54:09  profilanswer
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA EXCEL] Insérer lien Hypertexte avec condition

 

Sujets relatifs
[VBA]redaction du stlinkcriteria pour filtrer un formulaire[VB 2005] Formatage cellules Excel
piloter word depuis excelLien dynamique avec SELECT
feuillet excel par mailLancer du VBA depuis du VBScript
msgbox [VBA]creer un lien "changer de design" ?
lien hypertexte dans PHP 
Plus de sujets relatifs à : [VBA EXCEL] Insérer lien Hypertexte avec condition


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR