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

• #39769 Delila_1 veterán friccccc #39768

  Új Válasz 2018-12-10 11:07:33 #39769

  Ú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 friccccc #39768 üzenetére

  Kijelölöd a tartományt, és indítod a makrót.

  A For Each CV In Selection sorban a Selection helyett megadhatod a tartományt, pl. Range("A5:C30") módon, ekkor nem kell előre kijelölnöd a tartományt.

  Sub Egyszin()
Dim CV As Range
For Each CV In Selection
If CV.Interior.ColorIndex <> -4142 Then
CV.Interior.Color = vbYellow
End If
Next
End Sub

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