• 締切済み

EXCEL内に動く図形を?

EXCEL内に図形を置き、それが動くような仕掛けって出来ますか? カレンダーを作っているのですが、 重要なイベントを忘れないように イベントの日のちょっと前から動かして注意喚起するようにしたいのですが…?

みんなの回答

  • kon555
  • ベストアンサー率51% (1845/3565)
回答No.5

 Excelはアニメーションのような「何かを継続的に実行し続ける」という事が苦手です。  やってやれない事はないのですが、注意喚起するようにしたい、という希望を満たすためにやるにはちょっと労力が見合わないと思います。  注意喚起なら条件付き書式で色を変えたり字体を変えたりで充分だと思いますから、そうした簡単に出来る方法で実現する事をおススメします。

  • masnoske
  • ベストアンサー率35% (67/190)
回答No.4

GIFアニメを表示させてはどうでしょうか. https://ja.computersm.com/85-how-to-insert-animated-gif-files-in-excel-65703 GIFアニメはフリー素材が多数公開されています. 自分で作成することも可能です.

  • imogasi
  • ベストアンサー率27% (4737/17069)
回答No.3

シート上の図形を動かすのは、エクセル関数ではできません。 Excelにそれを臨むのは「お門違いです」。 適当なソフトを探してください。私は不案内ですが。 また質問者にプログラムの力がないとできません。 エクセルで利用されるのはVBAというものですが、質問者は名前も知らないのかも。 質問者が、マニアでなければ、あきらめる方がよい。 VBAはゲーム的な機能は貧弱です。しかし、その不住差を逆手にとって、無理やりゲームを作っている人はいるが。 そもそも、ここに1片の1回の質問で、判るようなものではないよ。 指導者や、プログラムを教える学校での学習が要ると思う。 ーーー ついでだから、最近WEBで目についたVBAの記事を載せておく。 シートにテキストボックスを3つ設ける。標準モジュールに 下記をコピペ。 Sub sugoroku1() Dim dog As Shape, cat As Shape, rabbit As Shape Dim dogName As String, catName As String, rabbitName As String Dim n As Integer '--- ActiveSheet.DrawingObjects.Delete '------- Set myDocument = Worksheets(1) Set shape1 = myDocument.Shapes.AddShape(msoShapeRectangle, 50, 50, 30, 30) shape1.Name = "dog" Set shape2 = myDocument.Shapes.AddShape(msoShapeRectangle, 50, 100, 30, 30) shape1.Name = "cat" Set shape3 = myDocument.Shapes.AddShape(msoShapeRectangle, 50, 150, 30, 30) shape1.Name = "rabbit" '--- Set dog = ActiveSheet.Shapes(1) Set cat = ActiveSheet.Shapes(2) Set rabbit = ActiveSheet.Shapes(3) dogName = "ワンコ" catName = "ニャンコ" rabbitName = "ウサコ" ' ----- For j = 1 To 27 n = Int(Rnd * 3) + 1 'MsgBox dogName & "は" & n & "進みます" dog.IncrementLeft (5 * n) Application.Wait [Now() + "0:00:00.2"] n = Int(Rnd * 3) + 1 ' MsgBox catName & "は" & n & "進みます" cat.IncrementLeft (5 * n) Application.Wait [Now() + "0:00:00.2"] n = Int(Rnd * 3) + 1 ' MsgBox rabbitName & "は" & n & "進みます" rabbit.IncrementLeft (5 * n) Application.Wait [Now() + "0:00:00.2"] Next j End Sub をは張り付ける。 ーーー 実行して、シート画面に切り替えると、3個のボックスが、みかけは独立して、右に動いていくだろう。 本当は、ウサギと猫と犬の「画像が図形に現れた図形」があれば、よりそれらしくなるが。 動かすということは、こういう実行とWaitを微小時間で配分した、面倒なプログラムだ。 もっと、学校でも教えるらしいSCRACHなどという言語でも学んでみたら。図形を動かすことが、機能として前面に出ていいるようだ。

  • f272
  • ベストアンサー率46% (8535/18273)
回答No.2

図形を動かすというのは,図形の位置をA地点からB地点に移動させるということ?それとも図形をアニメーションのように変化させるということ? どちらにせよできますが,どんなことをトリガーにして動かすのかわからなければ実装は不可能です。

  • aokii
  • ベストアンサー率23% (5210/22062)
回答No.1

EXCEL内に図形を置き、それが動くような仕掛けは出来ますが、マクロになります。簡単に作るにはPowerPointのようなアニメーション対応ソフトで出来ます。

関連するQ&A

専門家に質問してみよう