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

• #16474 poffsoft veterán csferke #16470

  Új Válasz 2013-01-24 13:26:04 #16474

  Ú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

  

  poffsoft

  veterán

  válasz csferke #16470 üzenetére

  esetleg:
  MyValue= Replace(MyValue, ",", "")
  MyValue= Replace(MyValue, ".", ",")

• #16473 Delila_1 veterán csferke #16470

  Új Válasz 2013-01-24 13:21:40 #16473

  Ú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 csferke #16470 üzenetére

  Sikerült az előző hozzászólásodhoz berakni a kérdésedet.

  if MyValueNum=int(MyValueNum) then msgbox "egész szám" else msgbox "tört"

• #16472 poffsoft veterán csferke #16470

  Új Válasz 2013-01-24 13:17:16 #16472

  Ú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

  

  poffsoft

  veterán

  válasz csferke #16470 üzenetére

  esetleg az int() ?
  Sub test()
  If IsNumeric(ActiveCell) Then
  If ActiveCell.Value - Int(ActiveCell.Value) <> 0 Then
  MsgBox "no"
  Else
  MsgBox "yes"
  End If
  End If
  End Sub

  "Ha nem egész szám a bevitt szám (pl. 1,23) akkor nem jó a bevitt érték =>123.00"
  Valószínűleg az a gondod, hogy a VBA csak "angolul" tudja a formátumokat...

• #16471 Delila_1 veterán csferke #16470

  Új Válasz 2013-01-24 13:01:16 #16471

  Ú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 csferke #16470 üzenetére

  Mi a kérdés?

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