2016-05-17 7 views
0

私はExcelの名前のリストを持っていますが、その一部は太字で表示されています。私は太字で書かれた名前の長さの平均を与えるVBAのprogramm(マクロ)を作成する必要があります(太字で平均を与える名前のリストにいくつの文字があるかを数えます)。誰か助けてくれますか?とても感謝しております。Excel VBA、太字で平均を与える文字を数える

これは名前の一覧です。

ハンナ

hannaliisa

ハンナ・マリア

ハンナstina

hannaliisa

ヘルガマリー

helgi-maie

helgi-マレット

helju-レイン

helju・マリー

...このような

+1

ようこそ。要するに、[How to Ask](http://stackoverflow.com/help/how-to-ask)を読んでください。これを解決するためのコードの試行と、最も役立つことができないところを示す必要がありますこのサイトでシートのサンプルのスクリーンショットを投稿すると、より多くのお手伝いをするのに役立ちます。 – Moosli

+0

'Font.Bold'プロパティを見ましたか? [MSDN](https://msdn.microsoft.com/en-us/library/office/ff823025.aspx) – MoondogsMaDawg

+3

太字の各セルのループ、長さ=長さ+ 'len'、最後に1ずつ増分ループの長さ/合計は平均ですか? – findwindow

答えて

0

何かがあなたのためにそれを行う必要があります。

Sub AverageBold() 
i = 1 
j = 1 
    'activate the appropriate sheet 
    Sheets("Sheet1").Activate 
    For Each cell In [A1:A10] 
     j = j + 1 
     If cell.Font.Bold = True Then i = i + 1 
    Next cell 
    MsgBox (i/j) 
End Sub 
関連する問題