bij gebruik Userform database verbergen

Status
Niet open voor verdere reacties.

Schin02

Gebruiker
Lid geworden
28 dec 2016
Berichten
6
Hallo,

Ik heb een dossier systeem gemaakt maar zodra ik vanuit 1 van het 'overzicht" (userform) het "dossier" (userform) open laat hij ook de datadbase die op de achtergrond draait zien. Dit wil ik niet. Hoe kan ik dit voorkomen.
Ik heb deze code gebruikt:

Set TCOR = Workbooks.Open(ThisWorkbook.Path & "\Dossier 2017.xlsx")
Workbooks("Dossier 2017.xlsx").Worksheets("Blad1").Activate
Application.WindowState = xlMinimized
Dim ws As Worksheet
Dim FindString As String
Dim Rng As Range

Set ws = Workbooks("Dossier 2017.xlsx").Worksheets("Blad1")
 
Wat ben je aan het doen?
Wil je het werkblad niet zichtbaar of userform voor userform en dan de achterste niet zichtbaar?
 
Ik wil het werkblad niet zichtbaar terwijl ik info in Userfrom invul
 
Code:
Private Sub UserForm_Initialize()
Application.Visible = False
End Sub
 
Code:
Private Sub UserForm_Initialize()
 With ActiveWindow
    Me.Width = .PointsToScreenPixelsX(.Width)
    Me.Height = .PointsToScreenPixelsY(.Height)
  End With
End Sub

als ook.
Code:
Private Sub UserForm_Initialize()
  Application.WindowState = xlMaximized
  UserForm1.Height = Application.Height
  UserForm1.Width = Application.Width
End Sub
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan