diff --git a/Projects/SAMufasaGUI/framescript.pas b/Projects/SAMufasaGUI/framescript.pas
index 9429dc2..b9c3c2d 100644
--- a/Projects/SAMufasaGUI/framescript.pas
+++ b/Projects/SAMufasaGUI/framescript.pas
@@ -152,6 +152,7 @@ procedure TScriptFrame.MakeActiveScriptFrame;
 var
   i : integer;
 begin
+  if Form1.Visible then
   for i := 0 to OwnerPage.PageCount - 1 do
     if OwnerPage.Pages[i] = OwnerSheet then
     begin;