Implémentation URL de + 1 sous excel
crockmort
Messages postés
3
Statut
Membre
-
eriiic Messages postés 25847 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 25847 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je souhaiterais savoir comment implémenter une URL (celle-ci dessous) de + 1 sous excel :
http://toto.com/channels/film-1.html
Ex :
http://toto.com/channels/film-1.html
http://toto.com/channels/film-2.html
http://toto.com/channels/film-3.html
http://toto.com/channels/film-4.html
Merci par avance
Je souhaiterais savoir comment implémenter une URL (celle-ci dessous) de + 1 sous excel :
http://toto.com/channels/film-1.html
Ex :
http://toto.com/channels/film-1.html
http://toto.com/channels/film-2.html
http://toto.com/channels/film-3.html
http://toto.com/channels/film-4.html
Merci par avance
A voir également:
- Implémentation URL de + 1 sous excel
- Url - Guide
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Si ou excel - Guide
- Déplacer colonne excel - Guide
3 réponses
Bonjour
sans VBA je ne vois pas
une solution VBA (attention, le format de l'url est celui que tu as donné soit partie gauche + n° +.html)
A mettre dans un module général et à utiliser comme une fonction excel
ex A2 = IncUrl(A1)
bonne suite
sans VBA je ne vois pas
une solution VBA (attention, le format de l'url est celui que tu as donné soit partie gauche + n° +.html)
A mettre dans un module général et à utiliser comme une fonction excel
ex A2 = IncUrl(A1)
Public Function IncURL(u As String) As String Dim r As Long, s As Long, g As String, d As String r = InStr(u, "-") g = Left(u, r) d = Right(u, 5) s = 0 r = r + 1 While IsNumeric(Mid(u, r, 1)) s = 10 * s + Mid(u, r, 1) r = r + 1 Wend s = s + 1 IncURL = g & s & d End Function
bonne suite