Excel VBA質問箱 IV

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

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


37084 / 76732 ←次へ | 前へ→

【44822】Re:行の高さ調整
回答  Kein  - 06/12/2(土) 1:19 -

引用なし
パスワード
   >セルの中の何バイト目で改行
しているかを知る条件として、バイト数は
>半角1byte/全角2byte
で勘定するとしたら、仮にアクティブセルの値でテストするとして・・

Sub Test_Len()
  Dim V As Variant
  Dim i As Long
 
  If InStr(1, ActiveCell.Value, vbLf) > 0 Then
   For Each V In Split(ActiveCell.Value, vbLf)
     i = i + LenB(StrConv(V, 128))
     Debug.Print i & " バイト目"
   Next
  End If
End Sub

0 hits

【44802】行の高さ調整 apple 06/12/1(金) 17:08 質問
【44811】Re:行の高さ調整 inoue 06/12/1(金) 18:39 発言
【44819】Re:行の高さ調整 Apple 06/12/1(金) 22:29 質問
【44821】Re:行の高さ調整 maverick 06/12/2(土) 0:55 回答
【44822】Re:行の高さ調整 Kein 06/12/2(土) 1:19 回答
【44826】Re:行の高さ調整 ichinose 06/12/2(土) 14:20 発言
【44842】Re:行の高さ調整 Apple 06/12/3(日) 12:40 お礼

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