Új hozzászólás Aktív témák

• #22210 Mittu88 senior tag

  Új Válasz 2014-07-01 13:56:11 #22210

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Mittu88

  senior tag

  Sziasztok!

  VBA-val szeretnék csoportosítani egy táblázatot úgy, hogy 190 soronként legyen egy csoport (hogy zárható legyen, ezzel segítve az átlátását).

  Nagyon elakadtam vele, pedig úgy érzem közel a megoldás. Jelenleg így néz ki a kód:

  Sub csoportosítás()
  '
  ' csoportosítás Makró
  '

  '
  Dim A As Long
  Dim elozo As Long
  Worksheets("Napi").Activate
  elozo = 1
  For A = 190 To 1900 Step 190
  Range("A1").Select
  Application.CutCopyMode = False
  Range(Cells(elozo, 1), Cells(A, 1)).EntireRow.Select
  Selection.Group
  elozo = A
  Next
  End Sub

  Ez most annyit csinál, hogy minden százkilencvenedik sort csoportosítja, valamint az egész 1900 sort.
  Mi lehet a gond?

Új hozzászólás Aktív témák