руководствуюсь одним из правил вашего форума: "одна тема = один вопрос"
в одной из тем на этом форуме мне помогли с макросом, представленным чуть ниже.
суть его работы такова:
сравнивает ячейки таблиц из "лист1" и "лист2" и если на "лист1" отсутствует какая либо ячейка из "лист2", вставляется сначала строка на "лист1" а затем копируется значение отсутствующей ячейки с "лист2".
нужно:
чтоб по тому же самому принципу макрос сравнивал ячейки в колонках вкладок "лист1" и "лист2" но уже по цвету заливки ячейки
и если одна и та же ячейка закрашена по разному на двух вкладках, макрос бы брал цвет ячейки с "лист2" и закрашивал им ячейку с "лист1"
Option Explicit
Sub Vstavka112()
Dim Tabl1 As Range, Tabl2 As Range
Dim Row2&, i As Integer
With Sheets("Лист1")
Set Tabl1 = .UsedRange
End With
With Sheets("Лист2")
Set Tabl2 = .UsedRange
End With
Row2 = Tabl2.Rows.Count
Application.ScreenUpdating = False
For i = 1 To Row2
If Tabl1.Cells(i, 1) <> Tabl2.Cells(i, 1) Then
Tabl1.Rows(i & ":" & i).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Tabl2.Cells(i, 1).Copy _
Destination:=Tabl1.Cells(i, 1)
End If
Next
Application.ScreenUpdating = True
End Sub
Как можно реализовать подобное?
спасибо!