FuriganaSiteIcon Kanji to Phoentic(漢字をふりがなに変換)

Tags: Calc Templates

last edited: 2023-05-07

Rating:

CALC用拡張機能です。選択範囲のセルの漢字文字列をふりがなに変換します。 It is an extension for CALC. Converts the kanji character string of the selected cell to phonetic.

kanji to phoentic 6f225b5730923075308a306a306b590963db d1fe3b95 1ae0 4f7a 91c2 f62767ad3763

Description

CALC用拡張機能です。
選択範囲のセルの漢字文字列をふりがなに変換します。
変換するにはセルを選択後、ツール>アドオン>文字列をふりがなに変換 と操作してください。
Yahooのルビ振りAPIを使用しているためネット環境必須です。
1日あたり全ユーザー共有で5万件が上限となっています。その日他のユーザーが49000回変換を行っていたら、あなたが変換できるセル数は1000件。
独自にアプリキーを取得してマクロ内に設定すれば上限いっぱいまで使用できます。
https://e.developer.yahoo.co.jp/register

It is an extension for CALC.
Converts the kanji character string of the selected cell to phonetic.
To convert it, select a cell and then use Tools> Add-ons> Convert Text to Phonetic.
Internet environment is essential because it uses Yahoo's ruby swing API.
The limit is 50,000 for sharing all users per day. If other users convert 49,000 times that day, you can convert 1000 cells.
If you get your own app key and set it in the macro, you can use it up to the upper limit.
https://e.developer.yahoo.co.jp/register

Homepage: https://github.com/parpy/Kanji-to-Phoentic

Release List

  • Release Description Compatibility Operating Systems License Release notes  
  • 2.1.0 セル内改行に対応 2.1.0 セル内改行に対応 3.3 Linux, Windows, macOS CC0 Download
  • 2.1 文章内の数字の扱いを改良 3.3 Linux, Windows, macOS CC0

    文章内の数字が消えてしまう現象を解消しました。

    Download
  • 2.0 Yahooの変換APIバージョン2に対応 3.3 Linux, Windows, macOS CC0 Download
  • 1.2 6.4で動作しない問題の修正 6.1 Linux, Windows, macOS CC0

     6.4で動作しない問題の修正

    Download
  • 1.1 6.2.6,6.3で動作しない問題に対応 6.2 Linux, Windows, macOS MIT

    6.2.6,6.3でhttpsへのアクセスが上手く行かないため、httpでのアクセスに変更しました。

    Download
  • 1.0.1 UI周りの微細な修正 6.2 Linux, Windows, macOS MIT Download
  • 1.0 1.0 6.2 Linux, Windows, macOS MIT Download

Other Extensions

Japan Date Converter(和暦を西暦に変換)

セル内の和暦を西暦に変換します。

163 downloads

03-2023

Kanji to Phoentic(漢字をふりがなに変換)

CALC用拡張機能です。選択範囲のセルの漢字文字列をふりがなに変換します。 It is an extension for CALC. Converts the kanji character string of the selected cell to phonetic.

174 downloads

05-2023

IPAmj Font Charactor Finder

IPAの配布するIPAmjフォントを各種の項目で検索します。

34 downloads

01-2023

Feedback

Post your review

You cannot post reviews until you have logged in. Iniciar sesión aquí.

Reviews

  • Hidemune TANAKA 29 mar. 2023 12:50 (hace 2 meses)

    V2対応できましたー。マージお願いしますね!

    Dim furigana_w As String
    Dim i As Integer
    'On Error GoTo ErrorHandler
    On Error Resume Next
    svc = createUnoService( "com.sun.star.sheet.FunctionAccess" ) 'Create a service to use Calc functions
    IntxtURL = svc.callFunction("ENCODEURL",array(Intxt))

    cells(1,1).value = IntxtURL

    XML_String = svc.callFunction("WEBSERVICE",array("https://jlp.yahooapis.jp/FuriganaService/V2/furigana?appid=" & AppID & "&jsonrpc=2.0&method=jlp.furiganaservice.furigana&grade=1&q=" & IntxtURL))
    if len(XML_String) = 0 Then
    XML_String = svc.callFunction("WEBSERVICE",array("https://jlp.yahooapis.jp/FuriganaService/V2/furigana?appid=" & AppID & "&jsonrpc=2.0&method=jlp.furiganaservice.furigana&grade=1&q=" & IntxtURL))
    End if

    Dim oTextSearch as Object
    Dim oOption as Object
    Dim oResult as Object
    Dim oStartPos as Long

    oSch = "furigana"":"""
    oStrIni = XML_String

    mstr = oStrIni
    Do While True
    idx = instr(mstr,oSch)
    If idx > 0 Then
    lastidx = instr( idx+len(oSch)+1, mstr,"""")
    Lipsum = mid(mstr, idx+len(oSch), lastidx-idx-len(oSch))
    Furigana_w = Furigana_w & Lipsum
    mstr = mid(mstr, lastidx)
    Else
    Exit do
    End If
    loop

    FuriganaCnv = Furigana_w
    End Function

RSS feed for reviews on this page | RSS feed for all reviews