• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

controle e-mailadres

Status
Niet open voor verdere reacties.
S

SUVERMO

Gebruiker
Lid geworden
22 dec 2019
Berichten
478
Hallo

is het mogelijk dat een macro het standaard e-mailadres van de computer in cel Blad1!A2 plaatst?
enkel als Blad1!A1=Blad1!A2 mogen de maco's uitgevoerd kunnen worden
 

Bijlagen

  • controle e-mailadres.xlsm
    17,3 KB · Weergaven: 30
Wat bedoel je met het standaard e-mailadres van de computer?
 
Volgens mij heeft een computer geen mailadres
Een computer gebruiker heeft een mailadres
 
Vandaar mijn vraag ;)
 
Een gebruiker kan 1001 e-mail adressen hebben.
Er is niet een "standaard" e-mail adres.
 
Beste,

Het is misschien inderdaad wat onduidelijk wat je probeert te bereiken, maar hier is alvast een mogelijke oplossing voor je probleem.
Toch ook nog wat verduidelijking voor wat ik gedaan heb:
Op blad 2 staat een lijst van mogelijke mailadressen.
Deze lijst heeft een dynamische naam gekregen (naam = Mailadressen) Je moet maar 's kijken naar namen beheren, om te zien welke formule ik hiervoor gebruik.
Het voordeel van zulk een dynamische naam is dat het bereik zich automatisch aanpast als je er mailadressen aan zou toevoegen.

Vervolgens heb ik in cel A2 een formule geplaatst (VERT.ZOEKEN), die indien het mailadres uit cel A1 zich in de lijst Mailadressen voorkomt, deze ook in cel A2 zet.
Indien dit mailadres zich niet in de lijst bevindt, dan zal er in cel A2 een foutmelding komen.

Vervolgens ga je naar de programmacode van blad 1, en je ziet daar dat een macro wordt uitgevoerd indien:
-1 In cel A2 geen foutmelding staat.
-2 Cel A1 gelijk is aan cel A2

Doe er je voordeel mee :).

Groetjes,
Luc
 

Bijlagen

  • controle e-mailadres.xlsm
    17,7 KB · Weergaven: 20
Het is de klassieke beginnersfout in Excel en VBA: de paradoxale poging om met Excel en VBA zoveel mogelijk van Excel en VBA uit te schakelen.
Richt je liever op procedurele ergonomie en informationele logistiek om het te automatiseren informatieverwerkende proces robuust te maken.
 
Hallo

LucHeyndrickx heeft deze excel verbeterd

Is het mogelijk dat een macro deze lijst vult met de mogelijk 1001 e-mail adressen van de gebruiker
 

Bijlagen

  • controle e-mailadres test.xlsm
    20,6 KB · Weergaven: 20
Tuurlijk.
Als je laat weten waar die e-mail adressen dan vandaan moeten komen en leesbaar is door Excel/VBA.
 
Ed,

is het mogelijk dat Excel/VBA een lijst maakt van de e-mail adressen waarmee de uitgaande e-mails verzonden worden?
 
Jet kan het adres dat je in .To gebruikt gewoon naar een gewenste plek schrijven.
Als dat is wat je bedoelt.
 
edmoor zei:
Een gebruiker kan 1001 e-mail adressen hebben.
Er is niet een "standaard" e-mail adres.
Klik om te vergroten...

Dat is natuurlijk wel zo ingesteld. In het profiel van je mail (Control Panel -> Mail) wordt ingesteld welk mailadres en bijhorend databestand als afzender op een PC door een gebruiker wordt standaard gebruikt (zie bijlage).
Eén daarvan is wel degelijk als standaard voorzien...

TS wil dit ophalen en gebruiken in zijn VBA procedure, maar hoe en of dat kan weet ik niet... is bij mijn weten geen 'omgevingsvariabele' van Windows, dus zou niet weten hoe het uit te lezen !
 

Bijlagen

  • 2020-11-22 17_35_16-Window.jpg
    2020-11-22 17_35_16-Window.jpg
    38,2 KB · Weergaven: 37
Dat is helemaal afhankelijk van het gebruikte e-mail programma.
 
Mailprogramma's kunnen verschillen van elkaar, dat klopt ... maar elk programma heeft uiteraard een 'standaard'-mailadres waaruit mails worden verstuurd. Kan niet anders...
Wou dat ik wist hoe dat op te halen vanuit VBA ...
 
Niet vanuit VBA, maar met VBA:
Code: 
    MsgBox CreateObject("outlook.application").Session.CurrentUser.Address
 
Als alternatief misschien iets proberen met de inlog naam van windows (eviron) deze kan excel wel opvragen.
Via een lijst met windowsnamen met bijbehorende e-mail adressen en dan de vert.zoeken functie
De exacte uitvoer laat ik over aan de vba specialisten.
 
Iedereen alvast bedankt.

het lijkt te werken, kunnen jullie ook even testen?
nog een vraag
Waarom kan de MsgBox niet gesloten worden
 

Bijlagen

  • controle e-mailadres.xlsm
    18,2 KB · Weergaven: 25
Je komt in een oneindige loop met jouw code. Kijk daar eerst eens naar.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan