Проверить есть ли в заданном числе цифры 2 и 3.

(читать всё…)

Вычислить методом касательных корень уравнения x^3-2x^2+x-3=0. Начальное приближение к корню 2.2. Абсолютная погрешность приближения не должна превышать e(задается преподавателем). e=0.1

(читать всё…)

Макрос транспонирования — как сделать для большего количества строк, больше 260?

Как сделать в этом макросе чтоб он переименовывал лист куда делается транспонирование ? Переименовать лист в «Данные».

(читать всё…)

Есть список файлов, который имеет правильную сортировку (По Имя и По возрастанию). Загружаю их в TStringList, где сортировка не радует. Как исправить положение? Имена файлов числа.

Sort;
Sorted := True

Не помогают

1.txt
10.txt
100.txt
11.txt
12.txt
2.txt
20.txt
200.txt
3.txt
4.txt

(читать всё…)

Есть лист на котором находятся 2 таблицы разделенные несколькими строчками. Нужно скопировать таблицы и вставить на вспомогательный лист «Расход», но так чтобы нижняя оказалась наверху, а верхняя внизу. Мне это необходимо для работы макроса.

(читать всё…)

Нужно удалить лишние пробелы в массиве знаков, то есть вместо идущих подряд нескольких пробелов оставить один.

(читать всё…)

Существует ли какой нибудь способ отсортировать столбцы на листе Ексель макросом по первой строке выделенных столбцов? Записанные действия макрорекордером после подвески его кода на кнопку не выполняются..

(читать всё…)

Есть такая проблема: есть файл с исходными данными, информацию которого необходимо скопировать сразу в несколько книг, а именно:
необходимо скопировать первый лист файла «шаблон» в несколько сотен файлов, все файлы с разными названиями. Хотелось бы сделать это макросом. Возможно?

(читать всё…)

Необходимо выполнить чтение из буфера результата cmd, делаю следующее:

procedure TForm1.Button2Click(Sender: TObject);
var
  s:TStringList;
  i: integer;
begin
  s:=TStringList.Create;
  Clipboard.AsText:='';
  WinExec('cmd /c net user |clip',SW_SHOWNORMAL);
  S.Text:= Clipboard.AsText;
  for I := 0 to s.Count-1 do
    Memo1.Lines.Add(s[ i]);
  s.Free;
end;

В результате Memo пустое, но в буфере есть необходимая инфа, по Ctrl+V выводится. Что делаю не так?

(читать всё…)

Пожалуйста,помогите сделать экспорт из Memo в Word.

(читать всё…)