bouton vers adresse variable

jackfred · 10 Avril 2007

bonjour,

Je voudrais que qd on clique sur on "bouton", cela redirige l'utilisateur vers une page ou un fichier dont l'adresse se trouve dans une cellule.

Autrement dit que le bouton utilise l'adresse d'une cellule pour effectuer la redirection.

Ainsi, je pourrais changer l'adresse de la cellule en question à loisir.

Merci

fred

bqtr · 11 Avril 2007

Re : bouton vers adresse variable

Bonsoir jackfred,

Une façon de faire :

Code:

Private Sub CommandButton1_Click()

Dim chemin As String, F As String
If Mid(Range("A2"), 2, 1) = ":" Then
   chemin = Range("A2").Value
   Workbooks.Open Filename:=chemin
Else
   F = Range("A2").Value
   Sheets(F).Activate
End If

End Sub

La cellule testée est A2.

Bonne nuit

bouton vers adresse variable

jackfred

Guest

bqtr

XLDnaute Accro

Discussions similaires

bouton vers adresse variable

jackfred

Guest

bqtr

XLDnaute Accro

Discussions similaires

Privacy & Transparency

Privacy & Transparency