Keresés

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

  • Delila_1

    veterán

    válasz huan #41266 üzenetére

    Ezt csak makróval tudod megoldani.

    Sub Szinezes()
    Range("2:2,5:5,10:10,15:15").Interior.Color = Range("A1").Interior.Color
    ' Range("A2:L2, A5:L5, A10:L10, A15:L15").Interior.Color = Range("A1").Interior.Color
    End Sub

    Az első sor az A1 cella háttérszínével azonosra színezi a 2; 5; 10 és 15. sor celláit.
    A második sor, ami most megjegyzésbe van téve, a fenti sorokból csak az A:L tartományt színezi.
    Írd át a színezendő területeket a saját igényednek megfelelően, valamint a Range("A1")-et, ha nem az A1 szerint szeretnéd végrehajtani a műveletet.
    Töröld a makróból azt a sort, amelyikre nincs szükséged.

    A makrót kötheted egy billentyű kombinációhoz. Alt+F8-ra bejön a makrókat tartalmazó ablak. Kiválasztod a Szinezes makrót, Egyebek, a Billentyűparancsnál a Ctrl+ -hoz beírsz egy betűt. Ezután erre a kombinációra indul a makró, és színez.

    A füzetet makróbarátként kell elmentened.

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

Hirdetés