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

• #20888 Delila_1 veterán gyga #20887

  Új Válasz 2014-03-11 11:39:13 #20888

  Ú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 gyga #20887 üzenetére

  A makró akkor másolja át a 2 cellát, ha mindegyiknek adtál háttérszínt.
  Tegyél ki hozzá egy gombot, vagy adj bill. kombinációt.

  Sub masol()
  If Range("A2").Interior.ColorIndex <> -4142 And Range("B2").Interior.ColorIndex <> -4142 Then
  Range("A2:B2").Copy Sheets(2).Range("A" & Sheets(2).Range("A" & Rows.Count).End(xlUp).Row + 1)
  End If
  End Sub

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