Récupérer adresse email dans listBox pour lancer Outlook.

[francdau]

Bonjour à tous et toutes,
Je viens vous demander de l'aide car je bloque sur une fonction de mon petit programme en cours...
J'ai une base de données - Annuaire - avec plusieures colones. J'ai une USERFORME incluant une liste box qui remplit les colones "Noms", "Prénom", etc... Une colone est utilisée pour "email" et "site Web". Je voudrais ajouter 2 boutons sur ma Userform qui permettraient de lancer respectivement "OULOOK Office 2003" et "Internet Exploreur", en fonction des informations "email" et "site web" affichées dans la listbox. Evidemment, ces informations changent en fonction des noms qui défilent dans la listbox.
Par avance, un grand MERCI à vous, de dépanner un débutant passioné qui apprend...!! @+

 

[Staple1600]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Bonjour (et bienvenue)

Je te suggère d'utiliser le moteur de recherhce du forum

mot clés: userform email
userform listbox email



Regardes ce fichier : ((*))

Il devrait pouvoir t'aider

 

[francdau]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Merci pour réponse rapide, Staple1600.
Je vais suivre ton conseil et voir ce que je peux trouver. Peut-être mes critères de recherches précédentes étaient inadaptés.
@+

 

[Staple1600]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Re

As-tu le fichier exemple que je t'indiques?

 

[francdau]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Merci, j'ai récupéré le fichier que tu indiques. Malheureusement, la fonction n'est pas celle dont j'ai besoin....

 

[francdau]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Je te joins un VBA que j'ai trouvé et qui pourrait me servir; au moins pour lancer OUTLOOK (pas Inter Explorer...). Je cherhce à l'adapter mais ne trouve pas la solution pour copier dans la cellule à utiliser, le résultat de ma LISTBOX "adresse email".
Merci pour toutes idées...

 

[Staple1600]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

RE


Tu devrais joindre aussi ton fichier contenant le userform.


On y verrait plus clair.

Merci

 

[francdau]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

RE

Tu devrais joindre aussi ton fichier contenant le userform.
On y verrait plus clair.
Merci

------------------------------------
Voici le scan d'écran...
Merci
@+

 

[jeanpierre]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Bonsoir tous,

Ceux qui n'ont pas PhotoShop font quoi avec ta belle nimage ?

A te lire pour mieux.

Mieux, tu réédites, tu supprimes (mode avancé et supprimé) ton scan écran et tu le remplaces par ton fichier, avec l'USF, en Zippé, STP.

Merci...

Jean-Pierre

 

[Staple1600]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Re


Je parlais du fichier Excel contenant le userform et le code VBA

Si données confidentielles, anonymises les (stp)


Voici un tite macro pour anonymiser des adresses mail

Sub anomymise()
Application.ScreenUpdating = False
Dim Ws As Worksheet
Dim c As Range
Dim x As String
Dim y As String
Dim z As String
For Each Ws In Worksheets
For Each c In Ws.UsedRange
If c Like "*@*" Then
Randomize
x = Chr(65 + (Rnd * 22))
y = Chr(Asc(x) + 1)
z = Chr(Asc(y) + 3)
c.Value = LCase(x & y & z & ".toto" & x & "@excel.fr")
End If
Next
Next
Application.ScreenUpdating = True
End Sub

 

[francdau]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Bonjour...
Je te joins le fichier XLzippé.
Encore merci d'avance pour ton aide.
@+

 

[Staple1600]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Bonsoir

Fichier non passé


Trop gros peut-être (le fichier zip doit <50Ko)

 

[jeanpierre]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Re,

Ici : Mieux, tu réédites, tu supprimes (mode avancé et supprimé) ton scan écran et tu le remplaces par ton fichier, avec l'USF, en Zippé, STP.

Sinon, c'est du doublon, du triplon,

 

[francdau]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Merci, Jean-Pierre,
Je viens de tenter un nouvel envoi. Pas paasé car le fichier zippé fait 117 Ko.
Autre moyen est par email ou Skype.

 

[jeanpierre]

Re : Récupérer adresse email dans listBox pour lancer Outlook.

Re,

Par mail, ce peut être une solution, mais ici, c'est du commun....

Retires encore quelques données, sinon ce lien : Lien supprimé

Au prix de l'heure, c'est vraiment pas cher, un cent par jour, même moins...

A bientôt.

Jean-Pierre