Application connecte a internet

Bonsoir comment allez vous ?

j'ai dans mon code un bouton qui me permet d'envoyer par mail

je voudrais savoir s'il est possible que l'application nous signale si l'ordinateur est connecté a internet ou pas

S'il existe un code, merci de bien vouloir m'aider et me montrer comme ça marche

Bonjour,

Utilise cette fonction personnalisée.

Elle retourne Vrai ou Faux.

Cdlt.

Option Explicit

Private Declare Function InternetGetConnectedState Lib "wininet.dll" _
(ByRef dwflags As Long, ByVal dwReserved As Long) As Long

Public Function GetInternetConnectedState() As Boolean
  GetInternetConnectedState = InternetGetConnectedState(0&, 0&)
End Function

Bonsoir

je dois mettre ce code dans le thisworkbook ?

Re,

Non !

Dans un module standard.

Cdlt.

Merci le modul a été crée avec le code a l'interieur mais je ne comprends toujours pas

pouvez vous m'expliquer un peu

Deja merci de votre aide

Re,

2 exemples dans le fichier joint.

Cdlt.

Bonjour, je peux vous ecrire en privé ?