Пікірлер

• 
  @user-db4mw3fj7e7 ай бұрын

  Молодец. Все бы так научились выполнять упражнения в школе.

• 
  @angelicabrailova89599 ай бұрын

  Отлично!!! Спасибо большое!

• 
  @user-kc3ki5zc7u10 ай бұрын

  Добрый день. А можно этот макрос адаптировать под поле со списком activex? или тут есть другая функция для подобного?

• 
  @Queen_of_quad2 жыл бұрын

  На руках стоит, а с мостика встать не может👍😂 а вообще и я на руках стоять могу

• 
  @SEVcity742 жыл бұрын

  Option Explicit Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim myShp As Shape, Drp As Single Dim wks As Worksheet Dim elmDic As Object Dim elmShp As Shape Dim drpShp As Shape Dim objDic As Object Dim a As Integer Set wks = Target.Parent 'cells holding drop downs If Intersect(Target, [A1:A5]) Is Nothing Then Exit Sub On Error GoTo endfind If Target.Validation.InCellDropdown Then Set objDic = CreateObject("Scripting.Dictionary") For Each elmDic In wks.DrawingObjects objDic.Add elmDic.Name, elmDic.Name Next For Each elmShp In wks.Shapes If elmShp.Name Like "Drop Down *" Then If Not objDic.Exists(elmShp.Name) Then Set myShp = elmShp Exit For End If End If Next End If endfind: If myShp Is Nothing Then Exit Sub If myShp.Visible = msoTrue Then Drp = myShp.Width - Target.Width 'Column holding list, sized appropriately myShp.Width = 150 myShp.Left = Target.Left - myShp.Width / 2 + Drp * 2 ' SendKeys "%{down}" End If Set myShp = Nothing End Sub

• 
  @user-so5ur4uc5m2 жыл бұрын

  Скажите пожалуйста название акробатических элементов. Очень нужно

• 
  @user-mw3ho5vx5i2 жыл бұрын

  На руках это как то сильно для девочек

• 
  @user-je8ph2nt7c Жыл бұрын

  Я девочка и с 8 лет точно так же стою на руках и мне не трудно 🤷

• 
  @_itseve_5812Ай бұрын

  Некоторые вообще с рождения умеют на руках стоять(если баланс хороший).Но я думаю что девочка сама научилась)

• 
  @user-on6hd9ct6m2 жыл бұрын

  Мне очень нравится

• 
  @GovnoEdkaEcenia2 жыл бұрын

  Дя

• 
  @user-jm1np9vk2y2 жыл бұрын

  Где скопировать текст макроса? Переписывать с экрана?

• 
  @monsi67052 жыл бұрын

  какие элементы тут есть?

• 
  @NekS-zl7bn2 жыл бұрын

  Я хз

• 
  @black_eye87282 жыл бұрын

  Тоже хз

• 
  @monsi67052 жыл бұрын

  @@NekS-zl7bn жаль

• 
  @BYT-jl5bf2 жыл бұрын

  хз

• 
  @coachrussia13492 жыл бұрын

  Ошибка компиляции в скрытом модуле: Защищенный модуль содержит ошибку компиляции. Так как эта ошибка находится в защищенном модуле, ее нельзя отобразить. Эта ошибка обычно возникает в случае несовместимости кода с версией или архитектурой данного приложения (например, код в документе рассчитан на 32-разрядные приложения Microsoft Office, однако предпринимается попытка его запуска в 64-разрядной версии Office). Эта ошибка имеет следующие причину и решение: Причина ошибки: Ошибка возникает при наличии ошибки компиляции в коде VBA внутри защищенного (скрытого) модуля. Эта ошибка компиляции не отображается, так как модуль является защищенным. Возможные решения: Если у вас есть доступ к коду VBA в документе или проекте, отмените защиту модуля, а затем запустите код еще раз для просмотра сведений об ошибке. Если доступ к коду VBA в документе отсутствует, обратитесь к автору документа, чтобы он обновил код вскрытом модуле.

• 
  @user-dr6me5ue4t2 жыл бұрын

  Анатолий Васильевич, здравствуйте! Как с вами можно связаться? Вы есть в каких либо соц сетях?

• 
  @user-nv5cb6nc2d3 жыл бұрын

  Вот чёрт, нам задали такое зделать... А я даже с кровати встать не могу...

• 
  @amphibian___20433 жыл бұрын

  Как называются все движения по порядку?

• 
  @albertismailov863 жыл бұрын

  Научите ее хотя бы какому нибудь сальто, эт не акробатика а клоунада

• 
  @xleg1tbtw7793 жыл бұрын

  Слитые

• 
  @xleg1tbtw7793 жыл бұрын

  А что не пацан?

• 
  @user-vq1wk9yj2q2 жыл бұрын

  У девочек гибкость развита лучше чем у мальчиков от природы

• 
  @xleg1tbtw7792 жыл бұрын

  @@user-vq1wk9yj2q у тебя шире чем пацанов рот открывается от природы

• 
  @mmmmm-cf2if2 жыл бұрын

  @@xleg1tbtw779 да по твоим словам видимо у тебя:)

• 
  @xleg1tbtw7792 жыл бұрын

  @@mmmmm-cf2if у твоей мамы

• 
  @user-so5ur4uc5m2 жыл бұрын

  @@xleg1tbtw779 смешная шутка))

• 
  @xuisosipibr3 жыл бұрын

  Чо

• 
  @gulnaraakushekova30673 жыл бұрын

  Не видно

• 
  @user-td7sd2yl5v4 жыл бұрын

  А у меня вообще ошибку выдаёт при вставке надстройки и не работает. Жаль

• 
  @rus.m4 жыл бұрын

  Не нашел ссылку на файл

• 
  @JacksonStorm184 жыл бұрын

  Хм в конце прес держала, а после выдоха пузо такое упало.😀😀😀

• 
  @user-pd2nx6jq8k4 жыл бұрын

  А выполняет девочка🤣🤣🤣🤣

• 
  @2972594 жыл бұрын

  Спасибо!

• 
  @2972594 жыл бұрын

  Видео топ!

• 
  @user-gh4kl7ef1n5 жыл бұрын

  Private Sub worksheet_change(ByVal target As Range) On Error Resume Next If Not Intersect(target, Range("JN4:JN6")) Is Nothing And target.Cells.Count = 1 Then Application.EnableEvents = False newval = target Application.Undo oldval = target If Len(oldval) <> 0 And oldval <> newval Then target = target & ", " & newval Else target = newval End If If Len(newval) = 0 Then target.ClearContents Application.EnableEvents = True End If End Sub

• 
  @eugenefedoryachenko87935 жыл бұрын

  Странно, что тут 2 дизлайка) За что?) Спасибо большое, смог разобраться благодаря этому видео)

• 
  @rus.m4 жыл бұрын

  То же удивляюсь дизам)) Конечно, не то, что я искал. Но тут и не о том, что я искал))

• 
  @allesgute25102 жыл бұрын

  @@rus.m, удивляюсь подобным учителям-диарейщикам, как автор видео.

• 
  @ameliecampbell22135 жыл бұрын

  Здрaвcтвуйте! Бывaло ли у Ваc так: Вы сняли xopoшее видeo, потратили кучу врeмeни нa мoнтаж, влoжили душу, нo пpoсмотров oнo не набиpaет? Вcе дело в тoм, чтo для нaбoра пpосмотpов cрaзу пocлe публикaции рoлика eму нeобхoдимo дать cтартoвый "толчoк" в виде нeскoлькиx тыcяч проcмoтpoв. Для этoгo oтличнo подxoдит cервис "Вибум", в котopом зa паpу кликoв мoжнo pазмеcтить вашe видeо на coтняx плoщaдoк. C Сеpвиcом Вы получаетe: - Живыe просмотры на Ваши видеорoлики - Пpирoст подписчикoв на кaнал - Cтартoвый "тoлчoк" для вaшегo видеo, пoслe котоpoгo онo aктивнee пoдхватывaетcя алгоpитмaми KZread и начинает пpинoсить проcмoтры ужe нa aвтoматe - Никакиx ботoв и нaкpуток, тoлько pеальныe пoльзователи, котоpым интepеceн Ваш кoнтeнт - Cервиc нe нарушает прaвила KZread *Оцeнить рaботу cepвиca можно тут:* *vibuum.ru/1/6ctkhijip3*

• 
  @kikai0taku5 жыл бұрын

  Большое спасибо, всё отлично =) .. Какие недоразвитые @#%^& заминусовали видео о_О

• 
  @user-pt2qc3hp1g6 жыл бұрын

  Добрый день, Понравился ваш метод вставки календаря. Прошел по ссылке, а ссылка не работает. (

• 
  @user-uu5rw1km2p6 жыл бұрын

  kandratblog.blogspot.ru/p/blog - это ссылка на блог. Чтобы увидеть ссылку на календарь, пройдите по ссылке: kandratblog.blogspot.ru/p/blog-page_83.html

• 
  @maksimpankratov28967 жыл бұрын

  Большое спасибо!

• 
  @user-ru2rc1hc3x7 жыл бұрын

  не работает((

• 
  @Aleksey807 жыл бұрын

  что вы копируюете в начале видео?

• 
  @user-uu5rw1km2p7 жыл бұрын

  В начале видео я копирую со своего рабочего стола надстройку для Excel "Календарь". Надстройку можно скачать на той странице: kandratblog.blogspot.ru/p/blog-page_83.html

• 
  @Aleksey807 жыл бұрын

  спасибо!

• 
  @2972594 жыл бұрын

  @@user-uu5rw1km2p Вставьте под видео эту ссылку. Наверное из-за этого ставят дизлайки. Огромное спасибо! Очень помогли!

• 
  @anastasiya38058 жыл бұрын

  о спасибо большое!

• 
  @user-uu5rw1km2p9 жыл бұрын