VBA - Erreur Hyperlinks
Résolu/Fermé
Mao
-
29 janv. 2012 à 13:37
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 1 févr. 2012 à 09:18
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 1 févr. 2012 à 09:18
A voir également:
- VBA - Erreur Hyperlinks
- Erreur 0x80070643 - Guide
- Iptv erreur de lecture - Forum TV & Vidéo
- Erreur 1004 vba ✓ - Forum Excel
- Vba erreur automation référence future non valide ✓ - Forum Word
- Vba range avec variable ✓ - Forum VB / VBA
1 réponse
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
29 janv. 2012 à 16:01
29 janv. 2012 à 16:01
bonjour
pourquoi shell et la variable b ?
tout simplement (extrait de la maquette de controle du code)
pourquoi shell et la variable b ?
tout simplement (extrait de la maquette de controle du code)
siteweb = Range("A1") ThisWorkbook.FollowHyperlink Address:=siteweb, NewWindow:=True
Modifié par Mao le 1/02/2012 à 04:19
Il s'agit d'une ligne de code que j'avais trouvé sur un forum. Dans le cas d'un lien pour un site web unique ma ligne fonctionnait sans problème, mais dans le cas d'un lien pour un site lié à un choix dans une liste déroulante, cela ne fonctionnait pas. Cependant avec votre ligne (que j'ai d'ailleurs mieux comprise que la mienne ^^), cela fonctionne. je vous en remercie.
Cordialement
1 févr. 2012 à 04:22
Je ne trouve rien pour afficher un message d'alerte (et oui, tout les forums traitent de la suppression de ce message^^)
J'ai essayé de mettre: application.displayalerts = true avant ma ligne de demande de suppression mais ça ne fait rien.
j'aimerais juste avoir un message d'alerte sur ce bouton et pas sur mes autres fonctions de mon programme.
Merci d'avance
1 févr. 2012 à 09:18
regarde dans l'aide en ligne Msgbox
genre:
reponse= msgbox "la ligne va être supprimée définitivement; continuer?", vbyesno,
if reponse=vbno then Exit sub
Il est dagereux d'utilise displayalerts