Hi. An Introduction/Timeline

Hi! I am a retired civil engineer . I just poke my nose in once in a while to learn as I have not coded before and I'm trying to get an interactive timeline done while I still can. My goal is to make a timeline that will be useful to others and keep my mind busy.
I have run the timeline past my neurologist and she definitely want's to see it when it is done and she has given me a deadline of 12/2018. I will attach a copy of it and will take any comments or suggestions that anyone has to offer. Any help would be much appreciated.

So far I have the file opening on the correct page (Opening Page). I couldn't get the attachment to work however I have included the code for the command buttons.

Private Sub CommandButton1_Click()
BrthFrm6.Show
End Sub

Private Sub Doctors_Click()
DrFrm5.Show

End Sub

Private Sub Mediccations_Click()
 MedFrm7.Show
End Sub

Private Sub Milestone_Click()
EvntFrm7.Show
End Sub


Dim ws As Worksheet
Set ws = Worksheets("Opening Page")

'find first empty row in database
iRow = ws.Cells.Find(What:="*", SearchOrder:=xlRows, _
    SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1
'copy the data to the database
With ws
'  .Unprotect Password:="passwordTextBox2"
  Cells(iRow, 2).Value = Me.TextBox2.Value
  Cells(iRow, 3).Value = Me.TextBox6.Value
  Cells(iRow, 4).Value = Me.TextBox7.Value
'  .Protect Password:="password"
End With

'clear the data
Me.TextBox2.Value = ""
Me.TextBox6.Value = ""
Me.TextBox7.Value = ""
Me.TextBox2.SetFocus
Me.Hide

End Sub