Greetings, I am using the following code to open a number of userforms simultaneously in a cascade layout. The first code (cleanroom zone) runs perfectly and the userforms layout just as I want them to. But the second one (grayroom zone) doesn't. The userforms do not start up in the same place, in fact a couple of them are stacked directly on each other. I can't figure out why, the code is exactly the same on each one. Anyone have an idea why they are not launching the same? Thanks,
Code:
Private Sub CleanroomZoneButton_Click()
Unload EmergencyLightArea
With DataEntryEmergencyShowerCr
.Top = 10
.Left = 10
End With
DataEntryEmergencyShowerCr.Show
With DataEntryFeCr
.Top = 50
.Left = 50
End With
DataEntryFeCr.Show
With DataEntryElCr
.Top = 100
.Left = 100
End With
DataEntryElCr.Show
With DataEntryLadder
.Top = 150
.Left = 150
End With
DataEntryLadder.Show
End Sub
Code:
Private Sub GrayroomZoneButton_Click()
Unload EmergencyLightArea
With DataEntryEmergencyShowerGr
.Top = 10
.Left = 10
End With
DataEntryEmergencyShowerGr.Show
With DataEntryFeGr
.Top = 50
.Left = 50
End With
DataEntryFeGr.Show
With DataEntryElGr
.Top = 100
.Left = 100
End With
DataEntryElGr.Show
With DataEntryLadder
.Top = 150
.Left = 150
End With
DataEntryLadder.Show
End Sub