分数計算って、
案外、、、じゃまくさいものです。
Excelの分析ツールを使い、最大公約数、最小公倍数をだして、分数計算しています。
Sub DisplayAlertsSample()
Application.DisplayAlerts = False
Application.Quit
End Sub
Sub 抹消()
Range("b9").Select
Selection.ClearContents
Range("d9").Select
Selection.ClearContents
Range("f9").Select
Selection.ClearContents
Range("h9").Select
Selection.ClearContents
Range("b14").Select
Selection.ClearContents
Range("d14").Select
Selection.ClearContents
Range("b18").Select
Selection.ClearContents
Range("d18").Select
Selection.ClearContents
Range("f6").Select
End Sub