Интересные и полезные статьи по работе с Excel и VBA
можно найти в разделе ХИТРОСТИ
With wsSh
If Range("A3").EntireRow.Hidden = True And Range("A26").EntireRow.Hidden = True Then Set iBeginRange = Range("A58:k73")
If Range("A26").EntireRow.Hidden = True And Range("A58").EntireRow.Hidden = True Then Set iBeginRange = Range("A3:k18")
If Range("A3").EntireRow.Hidden = True And Range("A58").EntireRow.Hidden = True Then Set iBeginRange = Range("A26:k47")
работает, но только с первым файлом. На втором выдает ошибку "object requred" по строке "sCopyAddress = iBeginRange.Address"Цитата: Difaz2006 от 10.03.2025, 13:47:26если в ячейке С10 есть любой текст.именно текст? А если будет записано число?
Цитата: Difaz2006 от 10.03.2025, 13:47:263. Если в ячейку F10 вбить числа, то она перестает выделяться.Уточните условие: если вбить число, но при этом С10 пустая - что должно произойти?