Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 След.
Необычная выборка по дате из массива
 
Доброго времени сутокЁк-Мок! Спасибо Вам за макрос + скрытые столбцы. В скрытых столбцах я формулы заменил макросом, т.к. массив очень большой. Все остальное подправил и работает. Всем удачи. Тема закрыта.  
Необычная выборка по дате из массива
 
Доброе время суток! Как выбрать с огромного массива по дате и объединить через запятую удаленные файлы. Заранее спасибо за помощь.
Определенный диапазон через запятую
 
Владимир! Все отлично работает! Спасибо за помощь!
Определенный диапазон через запятую
 
Сергей! Все работает. Пример Hugo я не нашел. Спасибо огромное.
Определенный диапазон через запятую
 
Доброго времени суток! Уважаемые форумчане, как задать диапазон в Коде, что бы в массив через запятую попадали данные с указанного промежутка. Заранее благодарен!
Поиск соответствующего значения и удаление "х"
 
1,2,3,4 - это значения
Поиск соответствующего значения и удаление "х"
 
Kalbasiatka! Спасибо за помощь. Задание никому давать не собирался.
Поиск соответствующего значения и удаление "х"
 
Добрый вечер. Макросом в таблице № 1 найти соответствующее значение из таблицы № 2  Листа "Данные" и удалить "х" в столбце C:C. Всем спасибо
Переимнование из Иванов иван Иванович в Иванов И.И.
 
Добрый день VPA! Вот так.. см. файл.
Макрос сохранения выдает ошибку?
 
Sanja! Добрый день!  Попробовал, но не помогло.
Макрос сохранения выдает ошибку?
 
Доброе время суток "Казанский"!
При использовании всех значений с столбца с именем [Список] - "00123, 000124, 00125".Выдает сообщение" 'Файл C:\00125.xlsb' уже существует в данном месте. Заменить?" При "Да" - вновь это же сообщение и т.д.
При "Нет" выдает сообщение: " Run-Time error '1004" Method 'SaveAs' of object'_Workbook' failes"

Спасибо за помощь!
Макрос сохранения выдает ошибку?
 
Добрый день форумчане и гуру Exel-я! Макрос сохранения книги с разными именами. Все работает, но выдает ошибку. Что изменить в макросе.
Код
Sub Файл()
Dim rCell As Range
For Each rCell In [Список]
If rCell <> "" Then [AA4] = rCell
Workbooks.Open Filename:="C:\Образец.xlsb"
    Windows("Справки").Activate
    Sheets("Файл").Select
    Range("A1:X48").Select
    Selection.Copy
    Windows("Образец.xlsb").Activate
    Sheets("Файл1").Select
    Range("A1").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
     :=False, Transpose:=False
    ActiveWorkbook.SaveAs Filename:=[Y1] & [O9] & ".xlsb"
    ActiveWindow.Close
Next rCell
 End Sub
Заранее огромное спасибо!
Изменено: nwcop - 06.02.2014 19:13:15
Извлечение значений из ячейки
 
Владимир! Спасибо за измененную формулу
Извлечение значений из ячейки
 
Добрый день Dima S! Спасибо огромное, формула работает отлично!  
Извлечение значений из ячейки
 
Добрый день форумчане! Как извлечь цифры с буквами из ячейки макросом.  Цифры - (999) - 3 знака, и может (X) - 1 буква. Последовательность не меняется. Заранее огромное спасибо!
Сумма двух значений при выгрузке с программы - получаем #ЗНАЧ!
 
Pelena и Serg737 Вам ОГРОМНОЕ СПАСИБО!  
Сумма двух значений при выгрузке с программы - получаем #ЗНАЧ!
 
Доброго времени суток! Выгружаем с программы колонки (A:C). При суммировании колонки B+С получаем в колонке D ( #ЗНАЧ!). Если в колонках  B и С значения,  то считает, если пусто то нет. Когда в ячейке "Delete" тогда сумму считает. Подскажите как произвести вычисления? Спасибо за помощь?
Замена значений формулой - макрос не останавливается, Подкорректировать макрос
 
Лист "Справка" в столбце - (Z45:Z103) формула  =ЕСЛИ($AB45=" ";" ";"с" ) - макрос "не останавливается " при нажатии на кнопку продолжает печать, когда в столбце (Z45:Z103) значения "с" внесены вручную в ячейки Z45,Z46,Z47 - макрос работает.
Замена значений формулой - макрос не останавливается, Подкорректировать макрос
 
Добрый день форумчане! Кто может подкорректировать  макрос.
1. В столбце - (Z45:Z103) значения "с" внесены вручную - макрос работает,   при замене значений "с" на формулы  макрос "не останавливается ".
2. При нажатии кнопки "Печать" выполняется  макрос  - значения "п" удаляются  в столбце (AC45:AC103) в ячейке (AB11) меняются значения и печатается бланк - как организовать печать всех бланков когда в столбце (AA45:AA103)  имеются "Фамилии".
Заранее огромное спасибо!
Макросом убрать зеленые треугольники!, Преобразование ячеек с текстового формата в числовой
 
Добрый вечер Hugo! Огромное Вам спасибо, что откликнулись и помогли. Все ОК! Тема закрыта.
Макросом убрать зеленые треугольники!, Преобразование ячеек с текстового формата в числовой
 
Доброго времени суток уважаемые форумчане! При выгрузке с программы появляются зеленые треугольники. При преобразование ячеек с текстового формата  в числовой руками ничего не дает. Зеленые треугольники не исчезают.

[img]file:///C:/Users/Nwcop/AppData/Local/Temp/msohtmlclip1/01/clip_image001.png[/img]

[img]file:///C:/Users/Nwcop/AppData/Local/Temp/msohtmlclip1/01/clip_image002.png[/img]

В столбцах C и K,L,M,N,O  числа меняются и их постоянно необходимо преобразовывать в число.
Как макросом убрать зеленые треугольники в столбцах C и K,L,M,N,O чтобы преобразовать ячейки с текстового формата  в числовой.
Макрос1 побывал, но значения меняются.
Всем огромное спасибо.
Макрос печати с удалением ячеек
 
Sergei_A! Прошу прощения, я поменял диапазон печати (A101:F152) и изменил другие диапазоны. Изменял в макросе, но не получается. Подправить как то макрос!! :)
Макрос печати с удалением ячеек
 
Добрый день Sergei_A! Вы правильно поняли. Спасибо вам огромное, все работает.
Макрос печати с удалением ячеек
 
Доброе время суток! При нажатии кнопки "Печать":
Код
Range("L3:L15" ;) .PrintOut Copies:=1, Collate:=True
 Range("E3" ;) .Select
 Application.CutCopyMode = False
 Selection.ClearContents
 
Как доработать макрос, что бы при повторном нажатии кнопки "Печать": Макрос должен напечатать диапазон (L3:L15) и удалить ячейку (E4) и т.д. в зависимости сколько заполненных ячеек в столбце (C3:C15).

Количество заполненных ячеек в столбце (C3:C15) меняется. 

По окончании печати восстанавливаем "х" в столбце (E3:E15).
 Range("E2" ;) .Select
 Selection.Copy
 Range("E3:E52" ;) .Select
 Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
 :=False, Transpose:=False

Заранее всем огромное спасибо!
Макросом заполнить таблицу с общим доступом, Каждому оператору по "кнопке"
 
vikttur! Вы правы общий доступ к книге не годится. Тогда по очереди операторам вносить данные и выгружать. Но как Макросом?
Макросом заполнить таблицу с общим доступом, Каждому оператору по "кнопке"
 
Добрый день vikttur! Общий доступ к книге возможен. Оператор «застолбил» порядковые номера в столбце А:А вбил свой номер в ячейки и сохранил. На другой машине видны изменения.
       Если Excel не поддерживает одновременную работу, то операторы будут по очереди вносить данные. Как каждому оператору макросом внести данные к конкретному номеру? Спасибо за отзывчивость!
Макросом заполнить таблицу с общим доступом, Каждому оператору по "кнопке"
 
Доброго времени суток!

Книга имеет общий доступ - все операторы (из около -20) работают одновременно
1. Оператор в вкладке "База",  столбец А:А «застолбил» порядковые номера в столбце А:А
2. Порядковые номера в вкладках 011, 012, …………….039 выбраны с помощью формул.
3. Операторы вносят данные в таблицу.
Вопрос: Как  с помощью макроса, заполненные данные таблиц от разных операторов  перенести в вкладку "База" и которые  будут соответствовать номерам.

Каждому оператору по «КНОПКЕ»
Сбор долгов в одну ячейку.
 
Владимир! Спасибо за упрощение формулы! :)
Сбор долгов в одну ячейку.
 
LVL огромное Вам человеческое спасибо! Все работает, базу приведу в порядок. :)
Сбор долгов в одну ячейку.
 
А если с одной базы, но как учитывать "долги" по Фамилии? Выборка идет пустых, но фамилию не учитывает?
Страницы: 1 2 3 След.
Наверх