HOMEVBAエキスパート Excel VBA スタンダード WorksheetFunction.CountIf 2026年1月24日 Worksheet.Visible WorksheetFunction.CountIfs