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

• #31302 Delila_1 veterán gyu84 #31300

  Új Válasz 2016-04-19 14:04:14 #31302

  Ú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

  

  Delila_1

  veterán

  válasz gyu84 #31300 üzenetére

  Egy üres oszlopba beírhatod a képleteket, majd ezt az oszlopot irányítottan, értékként bemásolod az eredeti helyre.

  Sub mm()
  Range("L1:L25") = "=SUBSTITUTE(A1,"" "","""")"
  Range("L:L").Copy
  Range("A1").PasteSpecial xlPasteValues
  End Sub

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