Für alle die es interessiert:
[Modul ]
Public MyKonfigWin As Window
[Window1]
Public Sub New()
MyKonfigWin = New KonfigWin
Dim MyGridFind As Grid
MyGridFind = MyKonfigWin.FindName("MyGrid")
MyGridFind.Visibility = Windows.Visibility.Hidden
End Sub
Wenn jemand noch eine bessere Lösung hat bin ich dem natürlich nicht
abgeneigt.
Vielen Dank
Und noch einen schönen Freitag.