漢字のカナ変換方法

Excelでかな変換できるんですね。知りませんでした。
試しにInvokeCodeでやってみました

' # Argument
' - in_text
' - out_text
Dim ap As New Microsoft.Office.Interop.Excel.Application
Try
	out_text = ap.GetPhonetic(in_text)
	'Console.writeLine(out_text)
Catch ex As Exception
	If Not(ap Is Nothing) Then ap = Nothing
	Console.writeLine(ex.ToString)
	Throw(ex)
Finally
	If Not(ap Is Nothing) Then ap = Nothing
End Try

xamlはこんな感じです。
GetPhonetic.xaml (8.3 KB)

2 Likes