Discussion :

[polo92]

Bonjour,

Mon niveau de débitant en VBa ne me permet pas de comprendre ce qui cloche dans ma boucle...j'ai dans une feuille "données" des données avec une centaine de colonne, et je cherche à mettre dans une feuille "liste variable" tous les noms de variables en ligne, avec un lien hyper texte qui renvoie sur la 1ere cellule de la colonne (donc le nom de la variable) dans la feuille données.



Voici mon code

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Sub Macro1()
'
'
    Range("D2").Select
    For i = 2 To Range("A65536").End(xlUp).Row
    j = i + 1
   Range("E" & j).Formula = "=HYPERLINK(""[sejour controles 2013_mef.xls]'sejours controles 2013'!L1C& i &"",""lien"")"""
    Next i
End Sub

J'ai essayé plusieurs combinaison avec les guillemets, mais ça ne marche jamais...

Merci pour vos lumières!

EDIT : j'ai légèrement changé le code, mais ça ne marcha pas plus...

Edit2 : après quelque recherches sur le net, je pense que le code suivant est plus proche de mon but:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 21/10/2014 par XM
'
 
'
    Range("f2").Select
    Range("E1").Formula = "=ucase(A1)"
     For i = 1 To Range("A65536").End(xlUp).Row
        j = i + 1
        With Worksheets(1)
            .Hyperlinks.Add Anchor:=.Range("E" & j), _
            Address:="", _
            SubAddress:="'sejours controles 2013'!A  & i", _
            TextToDisplay:="TRUCTRUC"
        End With
    Next i
 
End Sub

Mais j'ai un problème dans l'instruction "subaddress" avec le paramètre i de la boucle...

[Daniel.C]

Bonjour,

Essaie :

Code :

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

Range("E" & j).FormulaR1C1 = "=HYPERLINK([sejour controles 2013_mef.xls]'sejours controles 2013'!R1C & i & "",""lien"")"

[Daniel.C]

Mais j'ai un problème dans l'instruction "subaddress" avec le paramètre i de la boucle...

QUEL problème ? Tu ne codes plus le nom du classeur ?