| |
▼kanabun さん：
早々のご回答をありがとうございました。
> Const ss = "Tian-P Song-XM Li-Y Duan-JD Liang-ZD Zhang-H"
この" "内の文字をセルに置き換え（複数行チェックをしたいため）
結果の数字もセルに表示させたくて、以下のようなコードを書きましたが、
定数式が必用です というエラーメッセージが出てしまいます。
Const ss = の続きには何をどうしたらよいでしょうか。
Sub 人数()
Dim Ninzu As String
Ninzu = Cells(3, "L").Value
Const ss =
Cells(3, "S").Value = UBound(Split(ss)) + 1
End Sub
ご回答をお願いいたします。
>▼けい さん：
>>
>>Tian-P Song-XM Li-Y Duan-JD Liang-ZD Zhang-H
>>
>>これらの文字列内の名前をカウントしたいのですが
>
>単語の数を数えるなら
>
> Const ss = "Tian-P Song-XM Li-Y Duan-JD Liang-ZD Zhang-H"
> MsgBox UBound(Split(ss)) + 1
>
>で出てきます。
>（ただし、単語と単語を区切るスペースは各１つづつ という条件で）
|
|
けい
- 10/8/6(金) 18:18 -
