verticaal zoeken en gegevens vasthouden na opslaan

[drubbus]

Ik heb heb een bestandje en daar heb ik bij verticaal zoeken ( uit rij X,Y) een medewerker gekoppeld aan het email adres
De medewerker kiest zijn naam uit het dropdown menu en zijn of haar email adres verschijnt onder de naam

Dit werkt allemaal prima enkel na het afsluiten en daarna opnieuw opstarten van het bestand moet de medewerker zijn naam opnieuw uit de dropdown kiezen om zijn email adres weer te voor schijn te laten komen
Dit wordt namelijk niet vastgehouden.
Ik wil dit wel graag

Welke handeling moet ik daarvoor doen

Bestand bijgesloten

gaat dus alleen om het feit dat de naam en email blijven staan na het heropenen van het bestand


******bijlage men prive adressen weggehaald.******

 

[edmoor]

Handig. Een met een wachtwoord beveiligd VBA project zonder het wachtwoord te noemen.

 

[SjonR]

dat houdt het wel spannend.

 

[drubbus]

zonder beveiliging

De beveiliging vergeten er af te halen.
Kan gebeuren Edmoor


*****bericht met prive adressen weggehaald.*******

 

[edmoor]

Tuurlijk

Dit zorgt ervoor dat de naam van de ingelogde gebruiker altijd na het openen van het document in A1 staat en zal dus een evt. andere gekozen naam overschrijven:

Private Sub Workbook_Open()
  Sheets("result").Range("A1").Value = Application.UserName
End Sub

Je kan er bijvoorbeeld dit van maken:

Private Sub Workbook_Open()
  If Sheets("result").Range("A1") = "" Then
    Sheets("result").Range("A1").Value = Application.UserName
  End If
End Sub

 

[drubbus]

SUPER bedankt

SUPER bedankt EDMOOR:thumb:
Hier kan ik mee uit de voeten