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

• #8671 m.zmrzlina senior tag iwu #8670

  Új Válasz 2010-11-18 09:53:21 #8671

  Ú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

  

  m.zmrzlina

  senior tag

  válasz iwu #8670 üzenetére

  Az én megoldásomban a

  Columns("A:B").EntireColumn.AutoFit

  helyett ezt:

  With Columns("A:B")
  .Select
  .EntireColumn.AutoFit
  .HorizontalAlignment = xlLeft
  End With

  betenni.

  Ja és a

  activerow = Range("A" & sorsz + 1, "I" & sorsz + 1).Value

  sort törölni. Nem létező változónak ad értéket majd nem használja semmire.
  Mire észrevettem, hogy benne maradt már nem volt szerkeszthető a hsz.

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