エクセルの学校：全文検索：Hyper Estraier： VBA��

Results of 1 - 1 of about 14733 for VBA�� (0.003 sec.)

[[20220423093415]]: #score: 3408; @digest: 0d46cd1fa83aeab0461fecb897cf02fb; @id: 91110; @mdate: 2022-04-23T05:36:55Z; @size: 1171; @type: text/plain; #keywords: 数(. (7748), ーヒ (5592), a2000 (5427), ヒー (5313), のle (4798), 字カ (3296), 角も (2273), 字以 (1255), 字数 (794), 言語 (702), 土) (655), ト関 (600), 2022 (545), len (443), スあ (417), ドバ (405), バイ (355), イス (353), 関数 (334), アド (320), excel2019 (312), 御座 (310), 文字 (306), 詳細 (300), （γ (296), 全角 (294), worksheetfunction (286), （コ (260), は使 (248), カウ (244), を返 (237), クシ (237); 『20文字以上は-を返す』（コーヒー）
おはよう御座います。 VBAでA2からA2000に入っている文字数(.や-や,を含む)場合そのセルに-を返すにはどうしたらよいでしょうか? ＜使用 Excel:Excel2019、使用 OS:Windows10 ＞ ---- 全角も半角も1文字カウントなら、VBAのLen関数が文字数を返しますよ。これを使って20文字以上かどうかを判定してはどうですか? そういう話でなければ、もう少し詳細を説明してください。（γ） 2022/04/23(土) 09:46 ---- エクセルのlen関数で解決できそうです。アドバイスありがとうございました。（コーヒー） 2022/04/23(土) 11:31 ---- ExcelのLen関数とは、ワークシート関数のLenという意味ですか? それは使えません。WorksheetFunction.Lenとかでは使えません。 VBAのVB言語が備えているLen関数というのを使います。 Sub test() Dim v Dim k As Long v = Range("A2:A2000").Value For k = 1 To UBound(v) If Len(v(k, 1)) >= 20 Then v(k, 1) = "-" Next Range("A2:A2000").Value = v End Sub （γ） 2022/04/23(土) 14:25 ---- アドバイスありがとうございます。 VBA希望だったのですが難しそうなので VBAを使わずただエクセルのLEN関数でやりました。紛らわくてすみませんでした。（コーヒー） 2022/04/23(土) 14:36 ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/202204/20220423093415.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ