シーンを変えてみる

　Animationプロパティでどのシーンを表示するか、用意された定数を指定します。同じ動作を続ける定数や動きのない定数もあります。　　　　　　　　　　

　
　Sub 冴子先生表示3()

　　With Assistant
　　　 .Visible = True
　　　 .Sounds = True
　　　 .Reduced = Fales
　　　 .Move xLeft:=450, yTop:=325
　　　 .MoveWhenInTheWay = True
　　　 .Animation = msoAnimationAppear
　　End With

　End Sub

　Sub 変身()

　With Assistant

　　.Visible = True
　　.Reduced = False
　　.MoveWhenInTheWay = True
　　.Animation = msoAnimationGetArtsy 　

　End With

　End Sub

Animationプロパティ

	msoAnimationCheckingSomething
	msoAnimationEmptyTrash
	msoAnimationPrinting