FrontPage/Windows のバックアップ差分(No.3)

追加された行はこの色です。
削除された行はこの色です。
[[FrontPage/web]]
** Word　選択画像のサイズを変更 [#y2ca263a]
 Sub Macro5()
 '
 ' Macro5 Macro (Ctrl+r)
 '
 ' 画像の横幅を変更(アスペクト比保持)
 ' 選択した複数の画像ファイルを処理
 '
 ' (2015/12/20) Tomoyuki Nohara
 ' version 1.0
 '
 
     Const MILL As Double = 0.3527           ' mm に変換する定数を宣言
     
     target_width = 40#                      ' 変換後の幅を宣言[mm]
        
  
     With Selection
         '選択されている画像全てにしょり
         For i = 1 To .InlineShapes.Count
         
             w = .InlineShapes(i).Width * MILL       '変換前のサイズ
             h = .InlineShapes(i).Height * MILL      '変換前のサイズ
             
             '横幅の変更比を計算
             ratio = target_width / w
             
             'サイズを設定
             .InlineShapes(i).Height = h * ratio / MILL
             .InlineShapes(i).Width = w * ratio / MILL
             
         Next
     End With
 End Sub


** Windowsファイルツリーコマンド [#seb5ffb6]
 tree /f . > tree.txt

** JavaScriptでMarioを作る [#ycc41141]
http://www.gamecorder.net/mario/#