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

• #28748 szatocs1981 aktív tag the radish #28747

  Új Válasz 2015-09-23 10:19:21 #28748

  Ú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

  

  szatocs1981

  aktív tag

  válasz the radish #28747 üzenetére

  Próbáld meg evvel a makróval. Mielött futtatod jelöld ki a cellákat, ahol cserélni akarod a vesszöt pontra!

  Sub Csere()
  
  Dim Zelle As Range
  
  For Each Zelle In Selection.Cells
  Zelle.NumberFormat = "@"
  Zelle.Value = Replace(Zelle.Value, ",", ".")
  Next Zelle
  
  End Sub

  [ Szerkesztve ]

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