Возможно это не серьездно но хотелось бы внести в работу немного радости при выборе "в архиве" воспроизводился фейвер как в "пасьянс паук". Дело в том что когда сдают документы в архив там прям праздник
У них будет еще больше радости, если при приеме документов оу них будет открываться пасьянс Паук, танчики, Instagram и ВКонтакте, при этом греметь Турецкий марш и с потолка будут сыпаться цветы
Ребят изучил. получилось. но до меня чет все равно не доходит. как сделать данную анимацию прозрачной и чтоб она выходила только при условии. К сожалению файл не получается прикрепить, но оно такого же вида как и по ссылке "Изучайте"
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [A1:A10]) Is Nothing And Target.Count = 1 Then
If Target = "В архив" Then
Me.ShockwaveFlash1.Visible = True
Else
Me.ShockwaveFlash1.Visible = False
End If
End If
End Sub
radmirka666, сделайте рандомную заливку ячеек рандомным цветом на видимой области экрана, порадуйте пользователя и поддержку, в которую пойдут звонки с вопросом, у меня эксель взбесился.