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

• #30619 Delila_1 veterán opzozi #30617

  Új Válasz 2016-02-17 10:20:48 #30619

  Ú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 opzozi #30617 üzenetére

  Azt egy kis makróval, amit modulban helyezel el.

  Sub Csere()
  Dim CV As Object
  
  For Each CV In Selection
  If CV > 5 Then Range(CV.Address) = 10
  Next
  End Sub

  Kijelölöd a területet, ahol cserélni akarsz, és indítod a makrót.

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