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

• #16463 csferke senior tag

  Új Válasz 2013-01-24 07:52:06 #16463

  Ú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

  

  csferke

  senior tag

  Elnézést az imént lejárt a szerkesztési időm ezért most kénytelen vagyok ismételni.

  Sziasztok!

  Először szeretném megköszönni Mutt és Delila segítségét a legördülő listák makróban-i használatával kapcsolatban.

  És mindjárt kérdeznék is.
  Dim Prompt, Title, Default, MyValue
  ...
  ...
  ActiveCell.Offset(0, 6).Select
  Default = ActiveCell.Value
  Prompt = "jed.cena / kom"
  MyValue = InputBox(Prompt, Title, Default, xpos, ypos)
  ActiveCell = MyValue

  Meghatározom a változókat (Dim), a cella formátuma number xxx,xxx.xx (ezres vessző, tizedes pont). A kódban bevitt MyValue értéket viszont xxx.xxx,xx (ezres pont, tizedes vessző) formában teszi be és ezzel az értékkel nem tud számolni.
  Ha csak direkt a cellába írok értéket akkor viszont megfelelően értelmezi a pontot/vesszőt.
  A Dim sorban, feltételezem, string változók vannak definiálva. Több cellába is viszek értéket (szöveget, számot) ezzel a módszerrel. Ez addig jó is amíg szöveget vagy egész számot adok be.
  A Dim-et lehet így is?
  Dim Prompt
  Dim Title
  Dim Default
  Dim MyValue
  Dim MyValueSzám As ???
  Ha igen, mit írjak a kérdőjelek helyett, hogy megfelelően tizedes szám legyen?

  köszi

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