OK thanks
Yes tired your code and no joy
Private Sub CalibrationNeeded_AfterUpdate()
If IsNull(Me.ITSystem) Then
Me.PC_System_Spec.Visible = False
Else
Me.PC_System_Spec.Visible = (Me.ITSystem = True)
End If
If Me.Dirty Then Me.Dirty = False
End Sub
Not sure how to explain it better.......
So I have a form, within that form I have some tab pagers.
By default 2 of the tabs don't appear. To make them appear you have to tick a tickbox, but the only way I can get the tab/s to appear is to move to another record and back again.
What I...
Hi all
I'm in need of some help.
I have a form that has some tabs and by default they are hided. If I then tick a check box and go to the next record and back again the tab appears - This is great
But.......
I was wondering if there is a way for when I click on the tick box, the tab...
Hi Guys
Hopeing someone might be able to help.
I’m wanting to build a database for a Vessel Schedule.
So the idea would be a data entry form with something like the follow details:
Name of Survey
Person in Charge
Date From
Date To
Year
Type – (so if Survey is selected, the colour...
Morning and of course. Let me know how you get on
Private Sub AddAppt_Click()
WriteAppoinment (Me.Email)
WriteAppoinment (Me.Mist_Email)
ClearForm
End Sub
Public Sub WriteAppoinment(ByVal AddressToWrite As String)
Dim objNS As Outlook.NameSpace
Dim objFolder As Outlook.MAPIFolder 'get name...
Hi Darbid
After somemore looking around and help I'm now able to send the appointment to 2 calendars with one click.
Again many many thanks for all your help, would of not got this far without it.