Recovery of VBA code

[F.H. van Zelm]

Hi,

Somehow I lost my VBA code from Outlook (2003). Perhaps by adding a digital
signature ...?
I have no idea what happened.

I restored a backup of an earlier Outlook.pst but that didn't help. No
modules inside.

Can anyone tell me if it is possible to recover VBA code from a backup?
What file, how to restore?

 

[Sue Mosher [MVP]]

The file you need to restore is VbaProject.otm; see
http://www.slipstick.com/config/backup.asp for Outlook file locations.

 

[F.H. van Zelm]

Hi Sue,

Thanks for advice.

It became rather stressful because the restored VbaProject.otm was not
accepted, so to say.

Then, first I copied Outlook.pst and Archive.pst and restored all of
D&S\<me>\App Data\...\Outlook
and D&S\<me>\Local Settings\...\Outlook. That worked, I'm só glad. Copied
back the recent
versions of the pst-files.

I still don't know what went wrong: the digital signature or cleaning the
registry to drastically.

So I also have my InsertDate-code back. It used the Redemption add-in to
avoid the warning:
==========================================================================
Sub InvoegenDatum()
'Macro voegt huidige datum in op cursorpositie in body van geopend item
'Gebruikt: -
'Gebruikt door: - [Datum]
'Nog doen: -
' ActiveInspector.CurrentItem.Body = ActiveInspector.CurrentItem.Body &
vbCr & Date
'Simpele Outlook
VBA-oplossing
Dim myInspector As Object 'Objectvar voor Redemption
COM
Set myInspector = CreateObject("Redemption.SafeInspector")
'Objectvar initialiseren
myInspector.Item = Application.ActiveInspector
myInspector.SelText = Date 'Datum invoegen op
cursorpositie
Set myInspector = Nothing 'Objectvar legen
End Sub

==========================================================================

Frans van Zelm
www.fhvzelm.com