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

• #6864 Fire/SOUL/CD félisten Delila_1 #6862

  Új Válasz 2010-04-12 21:09:05 #6864

  Ú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

  

  Fire/SOUL/CD

  félisten

  válasz Delila_1 #6862 üzenetére

  Hali!

  Pedig elég egyszerű és szerintem már Te is használtad korábban ezt a megoldást, nevezetesen hogy le kell tiltani az eseményeket. Vagy rosszul tévedek?

  Private Sub Worksheet_Change(ByVal Target As Range)
  Application.EnableEvents = False
  MsgBox "Ez a cella módosult: " & Target.Address
  MsgBox (Range(Target.Address))
  Range(Target.Address) = Range(Target.Address) * 0.05
  Application.EnableEvents = True
  End Sub

  Fire.

  UI: Persze most hibakezelés nincs, nem nézem meg hogy üres-e az adott cella, vagy ha nem üres, akkor lehet-e értelmezni számként stb stb, de a lényeg benne van...

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