perret.ines
XLDnaute Nouveau
bonsoir,
je ne connais rien en anglais ni meme en programmation.
jai un petit bout de code
Range("D5").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 5
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime
ce bout de code (qui a été 100% fait par un ordinateur) me permet d'ouvrir via une macro le lien internet qui se trouve dans la cellule D5.
Quelqu'un pourrait il me dire quelle ligne de texte il faut que je rajoute a la suite pour fermer ce meme lien internet.
N'entrez pas dans des grandes explications , je ne m'en sortirais pas, j'ai depuis plusieurs jours, essayé sur differents forums , et plouf (ont me parle de msbox de ci , de la, et malheureusement pour moi c'est du japonais.
Merci a ceux qui vont essayer de m'aider.
Bonne soirée
je ne connais rien en anglais ni meme en programmation.
jai un petit bout de code
Range("D5").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 5
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime
ce bout de code (qui a été 100% fait par un ordinateur) me permet d'ouvrir via une macro le lien internet qui se trouve dans la cellule D5.
Quelqu'un pourrait il me dire quelle ligne de texte il faut que je rajoute a la suite pour fermer ce meme lien internet.
N'entrez pas dans des grandes explications , je ne m'en sortirais pas, j'ai depuis plusieurs jours, essayé sur differents forums , et plouf (ont me parle de msbox de ci , de la, et malheureusement pour moi c'est du japonais.
Merci a ceux qui vont essayer de m'aider.
Bonne soirée