top of page
ワークシート
理科
4年 姿を変える水（テスト） (270k)
4年 金属，水，空気の性質（テスト）(3.6M)
5年 天気の変化（テスト） (1.3M)
5年 植物の発芽（テスト） (500k)
5年 植物の成長（テスト） (560k)
5年 メダカの誕生（テスト） (1M)
5年 けんび鏡（テスト） (5M)
5年 花から実へ（ワークシート） (2.2M)
5年 花から実へ（テスト） (5.3M)
5年 台風と天気の変化（テスト） (1.6M)
5年 物のとけ方（1）～(2)（テスト） (1.6M)
5年 ミョウバンの大結晶を作る (3.6M)
5年 人の誕生（テスト） (3.6M)
5年 電磁石の性質（ワークシート） (7.2M)
5年 電磁石の性質（指導略案） (36K)
5年 クリップモーターを作ろう (0.7M)
5年 電流が生み出す力（テスト） (3.3M)
5年 ふりこのきまり(1)～(2)（テスト） (1.7M)
PowerPoint
マクロでランダム並び替えができます。
Sub 並び替える()
Dim sld As Long
Dim cnt As Long
Dim i As Long
cnt = ActivePresentation.Slides.Count
If cnt < 2 Then Exit Sub
ActiveWindow.ViewType = ppViewSlideSorter
Randomize
For i = 1 To cnt
sld = Int((i * Rnd) + 1)
ActivePresentation.Slides(sld).Select
ActiveWindow.Selection.Cut
ActivePresentation.Slides(cnt - 1).Select
ActiveWindow.View.Paste
Next i
End Sub
bottom of page