Lien hypertexte [Résolu]

1) sélectionner le texte (le mot 'ici').

2) cliquer sur le bouton 'lien'

3) entrer l'adresse.


Ou bien, la même chose en code HTML:

<a href="http://lesite.com">ici</a>

merci beaucoup sebsauvage pour ta réponse.

J'aurais une autre question.

Je travail sous Nvu pour faire mon site web. Si je le publi et que je veux apporté des modification, Comment dois-je procedé.

merci par avance

Cordialement@++

Si je le publi et que je veux apporté des modification, Comment dois-je procedé.

Garde toujours l'origninal de ton site sur ton disque dur.
Fais les modifs, puis envoie-les par FTP.

ok mais le problème c'est que je ne sait pas du tout comment faire pour publier mon site. Je n'y comprend rine du tout, ou je dois être stupide.

Si tu paux m'aider se serais vraiment sympas.

Merci

@+

Merci beaucoup à tous.
Je n'ésitéré pa a vous reconsulter.

encore merci

@+

Bonjour,

Je développe une macro qui permet lors d'un clic sur le bouton associé de créer un onglet, et dans une page sommaire d'afficher en colonne les noms des onglets créés. Je souhaite que chaque nom créé soit en lien hypertexte afin de permettre d'aller directement sur l'onglet cible depuis la page sommaire.

Pourriez vous rajouter le bout de code manquant, svp. Merci

Sub CreCTST()
'
'créée par jl henry le 24/09/03
'Création d'un nouvel onglet de cas de test unitaire
' Sheets("CTST").Visible = True
Worksheets("Fiche Projet").Unprotect
Sheets("Fiche Projet").Copy After:=Sheets(4)
Worksheets("Fiche Projet").Protect
' Sheets("Fiche Projet").Visible = False

'formule permettant d'incrémenter automatiquement le nouvel onglet dans le
'sommaire avec les formules de calculs automatiques.
Worksheets("sommaire").Unprotect
n = ActiveSheet.Index
For rwindex = 1 To Sheets.Count
With Worksheets("sommaire")
'test de la ligne vide pour insérer le nom du nouvel onglet
If .Cells(rwindex + 10, 2).Value = "" Then
.Cells(rwindex + 10, 2).Value = Sheets(n).Name


'définition des styles des autres cellules de la même ligne
.Cells(rwindex + 10, 3).Value = "='" & Sheets(n).Name & "'!C3"
.Cells(rwindex + 10, 3).Borders(xlDiagonalDown).LineStyle = xlNone
.Cells(rwindex + 10, 3).Borders(xlDiagonalUp).LineStyle = xlNone




Exit For
End If
End With
Next rwindex
Worksheets("sommaire").Protect

End Sub