Søg
Avatar billede s_h_m Nybegynder
18. september 2003 - 12:01 Der er 4 kommentarer og
1 løsning

Tilføjelse til: Starte Outlook med makro

Jeg har fået en makro der åbner Outlook fra et regneark,  www.eksperten.dk/spm/402557

Når makroen køres kommer Outlook med en advarsel om, at et program prøver at benytte adresselisten, her skal man svare ja.
Hvis man svarer nej fås følgende fejlmeddelelse: ”Kørselsfejl 287 Der opstod en programdefineret eller objektdefineret fejl”
Hvis kontakt til Outlook ikke opnås, kan man så indbygge en msgbox og en returnering til den userform man kom fra, så fejlmeddelelsen undgås?
Avatar billede jkrons Professor
18. september 2003 - 14:17 #1
Prøv med noget i denne stil:

Private Sub CommandButton1_Click()
On Error GoTo Fejl:
Dim myOlApp As Object
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olMailItem)
Set myRecipient = myItem.Recipients.Add("dorte.kronsell@dbtu.dk")
myItem.Display
Exit Sub
Fejl:
MsgBox "Outlook kan ikke startes, hvis du ikke giver adgang til adressebogen", vbOKOnly + vbCritical, "Outlookfejl"
Exit Sub
End Sub
Avatar billede s_h_m Nybegynder
18. september 2003 - 14:56 #2
Det ser umiddelbart godt ud, der er dog et lille men...
Makroen startes ved tryk på en knap i en userform, hvis man klikker nej til Outlook kommer fejlmeddelelsen ikke umiddelbart frem, men Excel står og blinker i menulinien.
Klikker man så på Excel kommer fejlmeddelelsen frem.
Det er som om, den ikke vender tilbage til Excel, efter den har prøvet at åbne Outlook.
Kan man komme ud over det, eller er jeg for perfektionistisk?
Avatar billede jkrons Professor
18. september 2003 - 15:24 #3
Hos mig er scenariet at  jeg starter makroen fra en knap på en userform. Hvis jeg svarer nej til at bruge adressebogen, vises Excel fortsat med Userformen i forgrunden og meddelelsesboksen vises "oven på userformen".
Avatar billede s_h_m Nybegynder
18. september 2003 - 15:30 #4
Ja, det gør den også her, men først efter at man har "aktiveret" Excel igen.
På skærmen kan man se regnearket, men menulinien står og blinker.
Hmm...mærkeligt, nå men bortset fra det, så virker dit forslag perfekt.
Tak for hjælpen :O)
Avatar billede jkrons Professor
18. september 2003 - 15:57 #5
Velbekomme!
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Ændre tal i en celle Af xvid i Excel 1 04/09/202616:05 04/09/202616:54
Kan Excel selv beregne alder? Af leahcim i Excel 7 31/08/202610:24 04/09/202602:08
problem med mailbesked Af Pestilensen i Excel 3 24/08/202611:16 28/08/202612:55
Sætte billeder ind i google sheets ark ud fra elev nummer Af lurup i Excel 18 17/08/202615:14 05/09/202622:04
Gemme største værdi Af Lemming@privat.dk i Excel 2 07/08/202622:13 08/08/202609:03
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
18/0919:52 Libre office skriveprogram Af Frank i Office & Kontorpakker
17/0914:55 Hente WordPad til Windows 11 Af Strawberry i Andet software
17/0911:37 Persits.Upload Af bsn i ASP
16/0918:13 oprette et installationsmedie Af Malm i Windows
16/0913:11 Adapterstik stik på ladekabel til USB-C Af ErikHg i Andet software
White papers
Flere white papers »