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

• #32602 Bazs- tag

  Új Válasz 2016-09-07 16:16:05 #32602

  Ú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

  

  Bazs-

  tag

  Sziasztok,

  Neten találtam ezt a makrót, ami egy munkalapról eltávolítja az összes képletet.:

  Sub keplet_helyett_ertek()

  Range("a1").Select
  'Képleteket tartalmazó tartományok kijelölése
  Selection.SpecialCells(xlCellTypeFormulas, 23).Select

  'A keletkezett területek bejárása és képlet-érték csere
  For Each akt_range In Selection.Areas
  akt_range.Formula = akt_range.Value
  Next

  End Sub

  Hogy kellene átalakítani, hogy ne csak egy munkalapról, hanem az összesről eltávolítsa a képleteket ?

  Köszönöm előre is

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