Помогите макросом или по другому как. надо из определенной папки забрать 20 файлов excel ( точнее данный из этих файлов ) файлы брать по времени создания файла от самого младшего по времени до старшего ( время до секунд, так как разница во времени файла 10 секнд ) и данный из этих файлов собрать в 1 книгу по порядку на один лист. Первая строка в файлах игнорируется.
подскажите при экспорте из программы по умолчанию открывается excel но формат ячейки стоит общий и обрезает большие числа как по умолчанию сделать формат ячейки текст
привет помогите с формулой если в a1 значение от 1 то а1*2 если в a1 значение от 2 то а1*1,5 если в a1 значение от 3 то а1*1 если в a1 значение от 4 то а1*0,5 коэфициенты
2 1.5 1 0.5 могуты быть в столбце вот както через если =(ЕСЛИ(a1>=1;a1*2;ЕСЛИ(a1>=2;a2*1,5;ЕСЛ**** так далее
Все привет. Подскажите можно как-то доработать фильтр чтобы он подсветил найденные результаты которые которые были введены в TextBox1
Код
Private Sub TextBox1_Change() If TextBox1.Value <> "" Then
Selection.AutoFilter Field:=6, Criteria1:="*" & TextBox1.Value & "*", Operator:=xlAnd
Else
Selection.AutoFilter Field:=6
End If
End Sub
Добрый день. Подскажите как скрыть столбец в котором к примеру забито слово "скрыть", то есть макрос ищет в листе к примеру во второй строке слово скрыть и скрывает этот столбец таких столбцов может быть много, а также потом открывает скрытые. В книге пример в итоге надо скрыть столбцы b, d, e, f, i, j, k, l, m, p.
Добрый, подскажите как преобразовать ячейку в гиперссылку, к примеру есть столбец данных надо в соседнем столбце сделать гиперссылку с данными из первого столбца. (
подскажите как макросом или формулой отсортировать данные в алфавитном порядке внутри ячейки данные разделены точкой с запятой ( ; ) ? пример данных : abc (1-2);bcd(5-9);zds(20-65);wdddsg(88-99); abq (46-987)
Привет как его запустить на новой версии офиса пишет что то связано с х64 помогите плиз vb подсвечивает первые строки кода
Код
Option Explicit
Public Declare Function GetSysColorDlg Lib "ChColor" (ByVal hWnd As Long, ByVal Flags As Long) As Long
Public Declare Function WhiteColor Lib "ChColor" () As Long
Public Declare Function GrayColor Lib "ChColor" () As Long
Public Const CC_PREVENTFULLOPEN = 4
Public Const CC_FULLOPEN = 2
подскажите пожалуйста как сделать проверку на существование ячейки по имени
есть вот такая формула в ячейке =ГИПЕРССЫЛКА(СЦЕПИТЬ("[T Base.xlsm]_";J51))то-есть надо проверить если в файле T Base.xlsm есть ячейка с именем J51 то ссылка видна если нету ссылки не видно