For ColumnCount = 1 To Selection.Columns.Count
      RowCount = Sheets("sheet1").[b2].CurrentRegion.Rows.Count
nextColumnCount=列数要计算当前列有多少个行,
Sheets("sheet1").[b2].CurrentRegion.Rows.Count,这是计算b2列如何确定当前是第几列?
即:Sheets("sheet1").[?ColumnCount].CurrentRegion.Rows.Count
如何确定?哪个哪个参数?

解决方案 »

  1.   

    如何确定当前是第几列?Sheets("sheet1").columns.column
      

  2.   

    为什么不定义一个变量来确定.
    如C=SHEETS("SHEET1").USERANGE.COLUMNS.COUNT
    用C去循环.
      

  3.   

    晕,刚才少写了一个字母.
    为什么不定义一个变量来确定.
    如C=SHEETS("SHEET1").USEDRANGE.COLUMNS.COUNT
    用C去循环.