Word VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


39 / 877 ←次へ | 前へ→

【864】Re:vba range.words コレクションのバグ?
発言  めめ  - 18/9/13(木) 13:46 -

引用なし
パスワード
   コレクションの先頭にだけ発生するようなので、wordのバグだった場合の対策

Sub test2()
  With Selection
    .Text = "マザー ファーザー チャイルド"
    Debug.Print "6:" & .Words(1) & ";" & .Words(2); ";" & .Words(3) & ";2番目以降の音引きはOK"
    If .Words(1) = "ー " Then
      Debug.Print "対策:" & Left(.Text, InStr(.Text, "ー"))
    End If
  End With
End Sub

結果
6:ー ;ファーザー ;チャイルド;2番目以降の音引きはOK
対策:マザー

Words(2)の末尾に半角ブランクがついていることに注意

346 hits

【863】vba range.words コレクションのバグ? めめ 18/9/13(木) 12:28 質問[未読]
【864】Re:vba range.words コレクションのバグ? めめ 18/9/13(木) 13:46 発言[未読]
【865】Re:vba range.words コレクションのバグ? めめ 18/9/13(木) 14:39 発言[未読]

39 / 877 ←次へ | 前へ→
ページ:  ┃  記事番号:
206455
(SS)C-BOARD v3.8 is Free