Macro automatisch laten opstarten in Outlook
- Onderwerp starter BerryJan
- Startdatum
- Status
joost verdaasdo
Terugkerende gebruiker
- Lid geworden
- 11 okt 2003
- Berichten
- 2.253
Hai, 
Toest ALT+F11 in Outlook je zit nu in de Editor
Dubbelklik op ThisOutlookSession
Plak deze code (Bron Help Outlook) in het codevenster:
De boel ff-kes saven en gaan!
Succes! :thumb:
Ps..voor Word heet de moedertemplate: "Normal.dot" (niet .doc)
Toest ALT+F11 in Outlook je zit nu in de Editor
Dubbelklik op ThisOutlookSession
Plak deze code (Bron Help Outlook) in het codevenster:
Code:
Private Sub Application_Startup()
MsgBox "Welcome, " & Application.GetNamespace("MAPI").CurrentUser
Application.ActiveExplorer.WindowState = olMaximized
End SubSucces! :thumb:
Ps..voor Word heet de moedertemplate: "Normal.dot" (niet .doc)
joost verdaasdo
Terugkerende gebruiker
- Lid geworden
- 11 okt 2003
- Berichten
- 2.253
Hai,
Iets meer enthousiasme over het reeds gegeven antwoord word absoluut gewaardeerd in de Forumwereld!
Voor een wachtwoordveld zul je met UserForms aan de gang moeten!
Wellicht een goed idee om EXACT uit te leggen wat je probeert te maken? Op die manier kan en wil ik best met jou meedenken hoe verder! :thumb:
Iets meer enthousiasme over het reeds gegeven antwoord word absoluut gewaardeerd in de Forumwereld!
Voor een wachtwoordveld zul je met UserForms aan de gang moeten!
Wellicht een goed idee om EXACT uit te leggen wat je probeert te maken? Op die manier kan en wil ik best met jou meedenken hoe verder! :thumb:
hallo,
ik had idd wel iets enthousiaster kunnen zijn met het gegeven antwoord want het werkt perfect!!! Mijn complimenten hiervoor!
Ik zal even uitleggen wat ik vanplan ben:
In Outlook gaat er bij mij vertrouwelijke mail rond. Nu wil ik niet dat de rest van de gezinsleden in Outlook kan komen. Dit wil ik doen door een vb-progje. (Ik weet dat het heel makkelijk te omzeilen is, maar de rest van het gezin is niet echt handig met computers).
Het is mij grotendeels al gelukt om het te schrijven alleen ben ik nog tegen een paar probleempjes aan gelopen:
- Als het wachtwoord juist ingevoerd is kan het wachtwoord worden gewijzigd, dit lukt allemaal, maar als je outlook opnieuw opstart zijn de wijzigingen weer ongedaan gemaakt:S (Ik heb het wachtwoord opgeslagen in een onzichtbaar tekstBox)
- Het tweede probleem is dat het kruisje bovenin de Userform zichtbaar blijft, terwijl het helpknopje wel verborgen blijft:S
Ik hoop dat jullie nu iets beter snappen wat ik van plan ben en ik zal zeer blij wezen als jullie een oplossing op de vragen kunnen geven
mvg,
Berjan
ik had idd wel iets enthousiaster kunnen zijn met het gegeven antwoord want het werkt perfect!!!
Mijn complimenten hiervoor!Ik zal even uitleggen wat ik vanplan ben:
In Outlook gaat er bij mij vertrouwelijke mail rond. Nu wil ik niet dat de rest van de gezinsleden in Outlook kan komen. Dit wil ik doen door een vb-progje. (Ik weet dat het heel makkelijk te omzeilen is, maar de rest van het gezin is niet echt handig met computers).
Het is mij grotendeels al gelukt om het te schrijven alleen ben ik nog tegen een paar probleempjes aan gelopen:
- Als het wachtwoord juist ingevoerd is kan het wachtwoord worden gewijzigd, dit lukt allemaal, maar als je outlook opnieuw opstart zijn de wijzigingen weer ongedaan gemaakt:S (Ik heb het wachtwoord opgeslagen in een onzichtbaar tekstBox)
- Het tweede probleem is dat het kruisje bovenin de Userform zichtbaar blijft, terwijl het helpknopje wel verborgen blijft:S
Ik hoop dat jullie nu iets beter snappen wat ik van plan ben en ik zal zeer blij wezen als jullie een oplossing op de vragen kunnen geven
mvg,
Berjan
joost verdaasdo
Terugkerende gebruiker
- Lid geworden
- 11 okt 2003
- Berichten
- 2.253
Hai Berjan,
Fijn om te horen dat de oplossing goed bevallen was!
Het is niet mogelijk iets op te slaan in een UserForm…al deze data wordt verwijderd nadat het form uit het geheugen is geladen…
Je kunt dit werkelijk zo moeilijk maken als je zelf wilt…
Zoals je zelf zegt men is niet kundig dus doe dan verder ook lekker simpel..
Zo zou ik het in jou geval doen:
* Verander de opstartcode in:
Dus hij opent geminimaliseerd en toont eerst het Passwordscherm!
Ik Controleer hier continue het aantal tekens in het wachtwoord (wat jij dus ingeeft in de code) zo gauw als er voldoende letters zijn ga ik pas het ww controleren en als het goed is gaan ze verder en anders maak ik het tekstvak leeg!
Sluiten van het Form is niet mogelijk…dit weerhoud ik met deze code:
Nu het formulier even importeren in de VBE:
* Kies rechtermuisknop op het project en kies importeren en blader naar de bijlage welke je nog moet uitpakken en ok..(Formulier staat nu in het project)
* De code van het Form:
Nu denk jij natuurlijk..das leuk Joost maar het wachtwoord staat in de code das lekker handig zo!
Goed gedacht..dus zetten we de VBE gewoon op slot!
Dus rechtermuisknop op het project en kies Eigenschappen tweede tabje ww noteren/OK opslaan en klaar is klara!
Succes!
Fijn om te horen dat de oplossing goed bevallen was!
Het is niet mogelijk iets op te slaan in een UserForm…al deze data wordt verwijderd nadat het form uit het geheugen is geladen…
Je kunt dit werkelijk zo moeilijk maken als je zelf wilt…
Zoals je zelf zegt men is niet kundig dus doe dan verder ook lekker simpel..
Zo zou ik het in jou geval doen:
* Verander de opstartcode in:
Code:
Private Sub Application_Startup()
Application.ActiveExplorer.WindowState = olMinimized
frmPassword.Show
MsgBox "Welcome, " & Application.GetNamespace("MAPI").CurrentUser
Application.ActiveExplorer.WindowState = olMaximized
End SubIk Controleer hier continue het aantal tekens in het wachtwoord (wat jij dus ingeeft in de code) zo gauw als er voldoende letters zijn ga ik pas het ww controleren en als het goed is gaan ze verder en anders maak ik het tekstvak leeg!
Sluiten van het Form is niet mogelijk…dit weerhoud ik met deze code:
Code:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
Me.Caption = "Foei..foei!"
End If
End Sub* Kies rechtermuisknop op het project en kies importeren en blader naar de bijlage welke je nog moet uitpakken en ok..(Formulier staat nu in het project)
* De code van het Form:
Code:
Option Explicit
Const sWW As String = "Joost"
Private Sub TextBox1_Change()
If Len(sWW) <> Len(Me.TextBox1.Text) Then
Exit Sub
Else
If Me.TextBox1.Text <> "Joost" Then
Me.TextBox1.Text = ""
Else
Unload Me
End If
End If
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
Me.Caption = "Foei..foei!"
End If
End SubNu denk jij natuurlijk..das leuk Joost maar het wachtwoord staat in de code das lekker handig zo!
Goed gedacht..dus zetten we de VBE gewoon op slot!
Dus rechtermuisknop op het project en kies Eigenschappen tweede tabje ww noteren/OK opslaan en klaar is klara!
Succes!
joost verdaasdo
Terugkerende gebruiker
- Lid geworden
- 11 okt 2003
- Berichten
- 2.253
Mmzz zie dat mijn Userform niet is meegekomen gisteren..
Nou bij deze dan! :thumb:
Nou bij deze dan! :thumb:
joost verdaasdo
Terugkerende gebruiker
- Lid geworden
- 11 okt 2003
- Berichten
- 2.253
Hai Berjan,
Goed zo blij dat je eruit bent! enne...graag gedaan! :thumb:
Goed zo blij dat je eruit bent! enne...graag gedaan! :thumb:
Gevonden
Beste Joost,
Ik was toevallig op zoek naar een mogelijkheid
om outlook op te starten via een paswoord.
Dit heb ik blijkbaar hier gevonden.
MAAR................................
Ik ben een complete leek op het gebied van Vba in outlook
Ik ben aan het testen en proberen geweest maar ik geraak er niet uit.
Hoe kan ik uw form gaan gebruiken in outlook?
Wil je me dat aub even uit de doeken doen?
Alvast hartelijk bedankt
Benny :
Beste Joost,
Ik was toevallig op zoek naar een mogelijkheid
om outlook op te starten via een paswoord.
Dit heb ik blijkbaar hier gevonden.
MAAR................................
Ik ben een complete leek op het gebied van Vba in outlook
Ik ben aan het testen en proberen geweest maar ik geraak er niet uit.
Hoe kan ik uw form gaan gebruiken in outlook?
Wil je me dat aub even uit de doeken doen?
Alvast hartelijk bedankt
Benny
:Het werkt
Joost,
Bedankt ik ben erachter gekomen,
het werkt fantastisch,
Hoe geweldig is het niet als leek in
VBA op zo'n geweldig hulp te kunnen rekenen
Bedankt Joost en
ook hartelijk dank aan de ontwerpers en initiatiefnemers
van deze helpdesk.
Een zéér tevreden nieuweling :thumb:
Benny
Joost,
Bedankt ik ben erachter gekomen,
het werkt fantastisch,
Hoe geweldig is het niet als leek in
VBA op zo'n geweldig hulp te kunnen rekenen
Bedankt Joost en
ook hartelijk dank aan de ontwerpers en initiatiefnemers
van deze helpdesk.
Een zéér tevreden nieuweling
:thumb: Benny
joost verdaasdo
Terugkerende gebruiker
- Lid geworden
- 11 okt 2003
- Berichten
- 2.253
Hai Benny,
Was er gisteren niet en blij dat je er zelf uit bent gekomen.
Leuk om te zien dat twee mensen hiermee geholpen zijn. (Wellicht meer maar leuk dat twee mensen reageren)
Graag gedaan! :thumb:
Was er gisteren niet en blij dat je er zelf uit bent gekomen.
Leuk om te zien dat twee mensen hiermee geholpen zijn. (Wellicht meer maar leuk dat twee mensen reageren)
Graag gedaan! :thumb:
Beste Joost
Ik heb nog een vraag,
ik wil nog een andere macro maken maar...........
als ik eentje wil maken, wordt er altijd onder
project1(vbaproject.otm) een module bijgemaakt
zal wel normaal zijn, maar hoe krijg ik deze dan onder een knop op een balk en kom ik met andere macro's ook
steeds onde project1 terecht?
Ik heb nog een vraag,
ik wil nog een andere macro maken maar...........
als ik eentje wil maken, wordt er altijd onder
project1(vbaproject.otm) een module bijgemaakt
zal wel normaal zijn, maar hoe krijg ik deze dan onder een knop op een balk en kom ik met andere macro's ook
steeds onde project1 terecht?
pietalcoliek
Nieuwe gebruiker
- Lid geworden
- 15 nov 2007
- Berichten
- 3
macro starten
hallo, zou het ook mogelijk zijn een macro te starten die een excel file opstart als de gebruiker online met zijn outlook werkt. Dus verbinding heeft met het netwerk. Wanneer ofline, wordt het excel filtje niet op gestart?
hallo, zou het ook mogelijk zijn een macro te starten die een excel file opstart als de gebruiker online met zijn outlook werkt. Dus verbinding heeft met het netwerk. Wanneer ofline, wordt het excel filtje niet op gestart?
- Status
