Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12718 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【9046】カウントについて まつ 03/11/16(日) 0:18 質問
【9047】Re:カウントについて ハマゾウ 03/11/16(日) 0:43 回答
【9048】Re:カウントについて まつ 03/11/16(日) 1:16 お礼
【9046】カウントについて
質問  まつ  - 03/11/16(日) 0:18 -
引用なし
パスワード
   セルA1からH1の中で入力してあるセルの数を取得したいのですが・・・
関数式をそのまま使ってみたのですがエラーがでます


Sub Sample()
A = Count("A1:H1")
MsgBox A
End Sub

過去の履歴を検索してみたのですがヒットするものがありませんでした　宜しくお願いします
【9047】Re:カウントについて
回答  ハマゾウ E-MAIL  - 03/11/16(日) 0:43 -
引用なし
パスワード
   ▼まつ さん：

VBAでExcelワークシート関数を使うときはWorksheetFunctionオブジェクトを利用します。

Sub Sample()
　　Dim A As Integer
　　
　　A = Application.WorksheetFunction.Count(Sheets("sheet1").Range("A1:H1"))
　　MsgBox A
End Sub

なお、VBAでは使えないワークシート関数もありますのでご注意ください。
詳細は、ヘルプの「Visual Basic で使用できるワークシート関数一覧」を参照してください。
【9048】Re:カウントについて
お礼  まつ  - 03/11/16(日) 1:16 -
引用なし
パスワード
   ハマゾウさん　ありがとうございました　成功しました！

他の関数を使った時も同じエラーが出て悩んでいましたWorksheetFunctionを使って再チャレンジしてみます
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12718 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free