Cacher is the code snippet organizer for pro developers

 If find_abbr.Visible = True Then
                    find_abbr.Hide
                Else
                    Load find_abbr
                    With find_abbr
                        .StartUpPosition = 0
                        .Top = Application.Top + 25
                        .Left = Application.Left + Application.Width * 0.98 - .Width
                        .Show
                    End With
                End If