Cells(1).Shading.Starting September 1, 2021, classic Sites will not be viewable by others. If ContentControl.Title = "Corrective action for cd" Then Cells(1).Shading.BackgroundPatternColor = wdColorYellow If ContentControl.Title = "Corrective action" Then Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean) Could you please inform me what I have done wrong?
I tried to create two color code drop down lists in one Word template, however, I get an error message saying 'Ambiguous name detected: Document_ContentControON EXIT. Cells(1).Shading.BackgroundPatternColor = wdColorAutomatic Cells(1).Shading.BackgroundPatternColor = wdColorBlue Cells(1).Shading.BackgroundPatternColor = wdColorGreen Cells(1).Shading.BackgroundPatternColor = wdColorRed