Excel VBA質問箱 IV

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

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


26868 / 76732 ←次へ | 前へ→

【55190】Re:Count関数のエラー値について。。。
発言  りん E-MAIL  - 08/4/22(火) 7:40 -

引用なし
パスワード
   (。。j) さん、おはようございます。
>関数の計算式ではできないということでしょうか??
配列数式でできなくはないかもしれませんが、ここはVBAのQ&Aですし。

編集→ジャンプ→セル選択→定数&数値
で選択されたセル範囲で平均を出すマクロにしてみました。

Sub test()
  Dim r1 As Range
  '念のためスキップを入れる
  On Error Resume Next
  Set r1 = Application.ActiveSheet.Range("G2:IV2").SpecialCells(xlCellTypeConstants, xlNumbers)
  On Error GoTo 0
  '
  If Not r1 Is Nothing Then
   With Application.WorksheetFunction
     MsgBox .Average(r1), vbInformation
   End With
  Else
   MsgBox "G2:IV2に定数なし", vbExclamation
  End If
End Sub

こんな感じです。
0 hits

【55185】Count関数のエラー値について。。。 (。。j) 08/4/21(月) 16:55 質問
【55186】Re:Count関数のエラー値について。。。 Jaka 08/4/21(月) 17:29 発言
【55187】Re:Count関数のエラー値について。。。 (。。j) 08/4/21(月) 18:41 質問
【55190】Re:Count関数のエラー値について。。。 りん 08/4/22(火) 7:40 発言
【55191】Re:Count関数のエラー値について。。。 VBWASURETA 08/4/22(火) 9:15 発言
【55192】Re:Count関数のエラー値について。。。 Jaka 08/4/22(火) 11:00 発言
【55199】Re:Count関数のエラー値について。。。 \(^^)/ 08/4/22(火) 12:08 お礼

26868 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free