|
▼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
>
>で出てきます。
>(ただし、単語と単語を区切るスペースは各1つづつ という条件で)
|
|