06/08/18 10:55:39
>>72
VB2005+Excel2003でとりあえず動くコンソールアプリのサンプル(多分VB2003でも動くはず）
COMの解放とかやってないけどその辺は気にしないように
Imports Microsoft.Office.Interop
Module Module1
Sub Main()
Dim app As Excel.Application = New Excel.Application()
Dim wbk As Excel.Workbook = app.Workbooks.Add()
Dim wst As Excel.Worksheet = DirectCast(wbk.Worksheets(1), Excel.Worksheet)
Dim r1 As Excel.Range = wst.Range("A1")
r1.Value = "100m3"
r1.Characters(CStr(r1.Value).Length).Font.Superscript = True
Dim r2 As Excel.Range = wst.Range("B1")
r2.Value = "10min-1"
r2.Characters(CStr(r2.Value).Length - 1).Font.Superscript = True
app.Visible = True
End Sub
End Module