I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Hvis vi tager udgangspunkt i en formular i Access, hvor der er følgende tekstbokse: - Dato - formateret til dato via guide - Kl. - formateret til kl. via guide - Aftaletekst samt en knap med følgende VBA-egenskaber v/klik:
Option Compare Database Private Sub Kommandoknap9_Click() 'Opdater i OutLook-kalender opdaterKalender [dato], [kl], [aftale] End Sub Private Sub opdaterKalender(dag, kl, aftale) Dim olApp, Namespace, myCalendar, besøgsaftale Dim f, dagFundet As Boolean
Set olApp = CreateObject("Outlook.Application") Set Namespace = olApp.GetNamespace("MAPI") Set besøgsaftale = Namespace.GetDefaultFolder(olFolderCalendar).Items
Set besøgsaftale = olApp.CreateItem(olAppointmentItem)
besøgsaftale.Start = CStr(dag) + " " + CStr(kl) besøgsaftale.Subject = aftale besøgsaftale.ReminderSet = False besøgsaftale.Save End Sub
OBS: Desuden skal der sættes en reference til MS Outlook - i VBA-koden Tools|References - er anført i alfabetisk orden.
Kunne godt tænke mig et stykke VBA-kode der fra Access kan tilgå Outlook kalenderen og omvendt + de begreber som jeg skal bruge såsom søge, slette, oprette og redigere.
plaf -> har du prøvet i ACCESS under filer/hent eksterne data at linke til fx. outlook-kalenderen. (vælg exchange i filtype) På denne måde har du hele outlook-kalendere (eller andre outlook-ting) lige ved hånden og kan både ændre, slette og oprette nye poster
bak -> Tak for dit udemærkede svar. Der skal også enkelte tjek på eksisterende data inden man poster recorden i ACCESS og derefter oprettes den i OUTLOOK også, er det muligt. evt. hvordan?
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.