Skip to content

Commit

Permalink
fix: ColorPicker position in multi display environment
Browse files Browse the repository at this point in the history
  • Loading branch information
sha5010 committed Apr 9, 2024
1 parent 418ad40 commit b27e954
Showing 1 changed file with 6 additions and 0 deletions.
6 changes: 6 additions & 0 deletions src/userforms/ColorPicker.frm
Original file line number Diff line number Diff line change
Expand Up @@ -167,6 +167,12 @@ Private Sub UserForm_Activate()
' Clear command buffer and result color
cCmdBuf = ""
Set cResultColor = Nothing

' Set the position to the center of the active window
With ActiveWindow
Me.Top = .Top + (.Height - Me.Height) / 2
Me.Left = .Left + (.Width - Me.Width) / 2
End With
End Sub

'/*
Expand Down

0 comments on commit b27e954

Please sign in to comment.