VBA - Counting the number of cells filled in row

Question

VBA - Counting the number of cells filled in row

Navigation

#1 by (3 votes)
#2 by (1 votes)

4

Hello everyone. I'm trying to create a code responsible for reading the number of cells filled in the rows .. I tried this way but I was not successful.

  For b = 1 To rMaior
         contador = Worksheets("1").Range("b:b").Cells.SpecialCells(xlCellTypeConstants).Count
                MsgBox contador
  Next b

Thank you.

vba contador

asked by anonymous 10.11.2015 / 13:55

2 answers

use excel spreadsheet to fill web form [closed] How do I convert an RGB image to grayscale in Python?

score 3 · Answer 1

3

Hello,

I think your formula has a small error ... try using the name of the worksheet as below:

MsgBox Plan1.Range("b:b").Cells.SpecialCells(xlCellTypeConstants).Count

I hope I have helped!

10.11.2015 / 20:58

score 1 · Answer 2

Change your code to this:

  For b = 1 To rMaior
         contador = Worksheets("1").Rows(b).Cells.SpecialCells(xlCellTypeConstants).Count
         MsgBox contador
  Next b

This code assumes that you want to count n lines of the worksheet called 1. In addition, you must have a variable called rMaior declared and specifying the last line to be counted. Thus, the code will go from line 1 to rMore counting the number of non-empty cells per line.