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

• #31080 tgumis tag bteebi #31075

  Új Válasz 2016-03-21 21:05:34 #31080

  Ú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

  

  tgumis

  tag

  válasz bteebi #31075 üzenetére

  szia
  Most az történik, hogy az egyesített cellákat felosztja és úgy számozza be :S
  Sub szamoz()
  '
  ' szamoz_Makró
  '
  '
  ActiveSheet.UsedRange.UnMerge
  sorsz = 1
  For xx = 2 To 22
  If Not Cells(xx, 1).EntireRow.Hidden Then
  Cells(xx, 1).Value = sorsz
  sorsz = sorsz + 1
  End If

  Next
  End Sub

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