C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

■95405 / 1階層)  Win10/Pro + EXCEL365 + "IPAmj明
□投稿者/ 魔界の仮面弁士 (2794回)-(2020/07/29(Wed) 10:07:44)
No95400 (S.Kos さん) に返信
> 右隣に「ペケが入った豆腐」が書き出される→左クリックしても数式バーは空欄

結合文字に対して、均等割り付けの実装が追い付いていないように見えますね。
https://hydrocul.github.io/wiki/blog/2015/1025-unicode-grapheme-clusters.html


合成文字や異体字セレクタは分解された上で、代替文字で描画 or 消失。
分解された IVS は文字数 0 としてカウントされ、分解後の描画位置が狂いますし、
サロゲートペアのレンダリングも正しく行われないようです。

なお Excel ではなく Word なら、正しく均等割り付けされるようです。


' Office Professional Plus 2016 の Excel 2016 MSO (16.0.13001.20266) 32 ビット
' バージョン 2006 (ビルド 13001.20384 クイック実行) の VBA で動作確認。
'
Option Explicit

Sub Test()
    With Sheet1.[B2:B7]
        .Font.Name = "IPAmj明朝"
        .Font.Size = 21
        .ColumnWidth = 24#


        '【OK】
        '(中国語の)Ni Hao … [U+4F60],[U+597D]
        '.Value = "「" & ChrW(&H4F60) & "好」"


        '【NG】
        '(つちよし)な吉野家… [U+20BB7],[U+91CE],[U+5BB6]
        'Value = "「" & ChrW(&HD842) & ChrW(&HDFB7) & "野家」"

        '【NG】
        '[MJ021594]の「花」… [U+82B1][U+E0106]
        '[MJ006359]の「丸」… [U+4E38][U+E0102]
        .Value = "「花" & ChrW(&HDB40) & ChrW(&HDD06) & "丸" & ChrW(&HDB40) & ChrW(&HDD02) & "」"

        '【NG】
        '合成カラー絵文字「女性(皮膚色Type-3)と男の子(皮膚色Type-3)」… [U+1F469],[U+1F3FB],[U+200D],[U+1F466],[U+1F3FC]
        '※Word や VSCode はカラー絵文字に対応しているが、Excel では非対応なので単色表示される
        '.Value = "「" & ChrW(&HD83D) & ChrW(&HDC69) & ChrW(&HD83C) & ChrW(&HDFFB) & ChrW(&H200D) & ChrW(&HD83D) & ChrW(&HDC66) & ChrW(&HD83C) & ChrW(&HDFFC) & "」"


        '水平方向の配置
        .Rows(1).HorizontalAlignment = XlHAlign.xlHAlignGeneral     '標準
        .Rows(2).HorizontalAlignment = XlHAlign.xlHAlignDistributed '均等割り付け
        .Rows(3).HorizontalAlignment = XlHAlign.xlHAlignJustify     '両端揃え
        .Rows(4).HorizontalAlignment = XlHAlign.xlHAlignLeft        '左揃え
        .Rows(5).HorizontalAlignment = XlHAlign.xlHAlignCenter      '中央え
        .Rows(6).HorizontalAlignment = XlHAlign.xlHAlignRight       '右揃え
    End With
End Sub

編集キー/

前の記事(元になった記事) 次の記事(この記事の返信)
←Win10/Pro + EXCEL365 + "IPAmj明 /S.Kos →Re[2]: Win10/Pro + EXCEL365 + "IPAmj明 /魔界の仮面弁士
 
上記関連ツリー

Win10/Pro + EXCEL365 + "IPAmj明 / S.Kos (20/07/28(Tue) 21:30) #95400
Win10/Pro + EXCEL365 + "IPAmj明 / 魔界の仮面弁士 (20/07/29(Wed) 10:07) #95405 ←Now
│└ Re[2]: Win10/Pro + EXCEL365 + "IPAmj明 / 魔界の仮面弁士 (20/07/29(Wed) 10:53) #95406
Re[1]: Win10/Pro + EXCEL365 + "IPAmj明 / ぼーちゃん (20/07/29(Wed) 10:02) #95404
  └ Re[2]: Win10/Pro + EXCEL365 + "IPAmj明 / S.Kos (20/07/29(Wed) 14:57) #95411 解決済み

上記ツリーを一括表示 / 上記ツリーをトピック表示
 
上記の記事へ返信