Найти делители числа excel

serega Дата: Пятница, 12.09.2014, 21:31 | Сообщение № 8
Nic70y Дата: Воскресенье, 14.09.2014, 08:11 | Сообщение № 9

serega, я думаю вам к макрописцам или туда:
http://www.excelworld.ru/forum/6

ну или на крайняк см. мой файл.
(косо как-то идет — не варит бошка сегодня)
[moder]А что это название темы у нас такое информативное?
Прозевали мы.
Однако, лучше поздно, чем никогда — serega, меняйте название согласно Правилам форума. Иначе тему закрою и Вам замечание влеплю.
Кстати, вполне возможно, что ответов поэтому и нет.

serega, я думаю вам к макрописцам или туда:
http://www.excelworld.ru/forum/6

ну или на крайняк см. мой файл.
(косо как-то идет — не варит бошка сегодня)
[moder]А что это название темы у нас такое информативное?
Прозевали мы.
Однако, лучше поздно, чем никогда — serega, меняйте название согласно Правилам форума. Иначе тему закрою и Вам замечание влеплю.
Кстати, вполне возможно, что ответов поэтому и нет. Nic70y

Сообщение serega, я думаю вам к макрописцам или туда:
http://www.excelworld.ru/forum/6

ну или на крайняк см. мой файл.
(косо как-то идет — не варит бошка сегодня)
[moder]А что это название темы у нас такое информативное?
Прозевали мы.
Однако, лучше поздно, чем никогда — serega, меняйте название согласно Правилам форума. Иначе тему закрою и Вам замечание влеплю.
Кстати, вполне возможно, что ответов поэтому и нет. Автор — Nic70y
Дата добавления — 14.09.2014 в 08:11

serega Дата: Воскресенье, 14.09.2014, 21:55 | Сообщение № 10
serega Дата: Воскресенье, 14.09.2014, 23:46 | Сообщение № 11
ikki Дата: Понедельник, 15.09.2014, 04:06 | Сообщение № 12
помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

Ответить

ikki Дата: Понедельник, 15.09.2014, 04:31 | Сообщение № 13
помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

Ответить

MCH Дата: Понедельник, 15.09.2014, 09:01 | Сообщение № 14

[/vba]
Саш, память не экономим, избыточное определение массивов

[/vba]
Саш, память не экономим, избыточное определение массивов

[/vba]
Саш, память не экономим, избыточное определение массивов

ikki Дата: Понедельник, 15.09.2014, 09:50 | Сообщение № 15
помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

Ответить

shanemac51 Дата: Понедельник, 15.09.2014, 10:55 | Сообщение № 16

насколько мне помнится, есть еще какое то условие , типа зацепление
на каком то форуме тема решалась

насколько мне помнится, есть еще какое то условие , типа зацепление
на каком то форуме тема решалась shanemac51

насколько мне помнится, есть еще какое то условие , типа зацепление
на каком то форуме тема решалась Автор — shanemac51
Дата добавления — 15.09.2014 в 10:55

Источник

Как проверить делится ли число без остатка в excel

ЧАСТНОЕ (функция ЧАСТНОЕ)

В этой статье описаны синтаксис формулы и использование функции ЧАСТНОЕ в Microsoft Excel.

: Если вы хотите разделить числные значения, используйте оператор /, так как в Excel нет функции DIVIDE. Например, чтобы разделить 5 на 2, введите =5/2 в ячейку, которая возвращает 2,5. Функция QUOTIENT для этих же чисел =QUOTIENT(5;2) возвращает 2, так как функция QUOTIENT не возвращает остаток. Другие способы дележения чисел см. в этой теме.

Описание

Возвращает целую часть результата деления с остатком. Эта функция используется, когда нужно отбросить остаток от деления.

Синтаксис

Аргументы функции ЧАСТНОЕ указаны ниже.

Числитель Обязательный. Делимое.

Знаменатель Обязательный. Делитель.

Замечание

Если один из аргументов не является числом, то quotient возвращает #VALUE! значение ошибки #ЗНАЧ!.

Пример

Скопируйте пример данных из следующей таблицы и вставьте его в ячейку A1 нового листа Excel. Для переключения между формулами и их результатами нажмите клавишу F2. При необходимости измените ширину столбцов, чтобы видеть все данные.

Как проверить делится ли одно число нацело на другое? Функция в Excel

Даны целые числа М и N. Если число М делится нацело на число N,
то вывести в одной из ячеек частное от деления, в противном случае
вывести В ТОЙ же ячейке текст М на N нацело не делится.
Для решения задачи найдите в мастере функций в категории Математические функцию, с помощью которой можно определить делится ли одно число на другое без остатка.

=ЕСЛИ (ОСТАТ (M;N)=0;»делитсч»;»не делится»)

Источник

Применение деления в программе Microsoft Excel

В Microsoft Excel деление можно произвести как при помощи формул, так и используя функции. Делимым и делителем при этом выступают числа и адреса ячеек.

Способ 1: деление числа на число

Лист Эксель можно использовать как своеобразный калькулятор, просто деля одно число на другое. Знаком деления выступает слеш (обратная черта) – «/».

  1. Становимся в любую свободную ячейку листа или в строку формул. Ставим знак «равно»(=). Набираем с клавиатуры делимое число. Ставим знак деления (/). Набираем с клавиатуры делитель. В некоторых случаях делителей бывает больше одного. Тогда, перед каждым делителем ставим слеш (/).
  2. Для того, чтобы произвести расчет и вывести его результат на монитор, делаем клик по кнопке Enter.

После этого Эксель рассчитает формулу и в указанную ячейку выведет результат вычислений.

Если вычисление производится с несколькими знаками, то очередность их выполнения производится программой согласно законам математики. То есть, прежде всего, выполняется деление и умножение, а уже потом – сложение и вычитание.

Как известно, деление на 0 является некорректным действием. Поэтому при такой попытке совершить подобный расчет в Экселе в ячейке появится результат «#ДЕЛ/0!».

Способ 2: деление содержимого ячеек

Также в Excel можно делить данные, находящиеся в ячейках.

  1. Выделяем в ячейку, в которую будет выводиться результат вычисления. Ставим в ней знак «=». Далее кликаем по месту, в котором расположено делимое. За этим её адрес появляется в строке формул после знака «равно». Далее с клавиатуры устанавливаем знак «/». Кликаем по ячейке, в которой размещен делитель. Если делителей несколько, так же как и в предыдущем способе, указываем их все, а перед их адресами ставим знак деления.
  2. Для того, чтобы произвести действие (деление), кликаем по кнопке «Enter».

Можно также комбинировать, в качестве делимого или делителя используя одновременно и адреса ячеек и статические числа.

Способ 3: деление столбца на столбец

Для расчета в таблицах часто требуется значения одного столбца разделить на данные второй колонки. Конечно, можно делить значение каждой ячейки тем способом, который указан выше, но можно эту процедуру сделать гораздо быстрее.

  1. Выделяем первую ячейку в столбце, где должен выводиться результат. Ставим знак «=». Кликаем по ячейке делимого. Набираем знак «/». Кликаем по ячейке делителя.
  2. Жмем на кнопку Enter, чтобы подсчитать результат.
  3. Итак, результат подсчитан, но только для одной строки. Для того, чтобы произвести вычисление в других строках, нужно выполнить указанные выше действия для каждой из них. Но можно значительно сэкономить своё время, просто выполнив одну манипуляцию. Устанавливаем курсор на нижний правый угол ячейки с формулой. Как видим, появляется значок в виде крестика. Его называют маркером заполнения. Зажимаем левую кнопку мыши и тянем маркер заполнения вниз до конца таблицы.

Как видим, после этого действия будет полностью выполнена процедура деления одного столбца на второй, а результат выведен в отдельной колонке. Дело в том, что посредством маркера заполнения производится копирование формулы в нижние ячейки. Но, с учетом того, что по умолчанию все ссылки относительные, а не абсолютные, то в формуле по мере перемещения вниз происходит изменение адресов ячеек относительно первоначальных координат. А именно это нам и нужно для конкретного случая.

Способ 4: деление столбца на константу

Бывают случаи, когда нужно разделить столбец на одно и то же постоянное число – константу, и вывести сумму деления в отдельную колонку.

  1. Ставим знак «равно» в первой ячейке итоговой колонки. Кликаем по делимой ячейке данной строки. Ставим знак деления. Затем вручную с клавиатуры проставляем нужное число.
  2. Кликаем по кнопке Enter. Результат расчета для первой строки выводится на монитор.
  3. Для того, чтобы рассчитать значения для других строк, как и в предыдущий раз, вызываем маркер заполнения. Точно таким же способом протягиваем его вниз.

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

Способ 5: деление столбца на ячейку

Но, что делать, если нужно разделить столбец на содержимое одной ячейки. Ведь по принципу относительности ссылок координаты делимого и делителя будут смещаться. Нам же нужно сделать адрес ячейки с делителем фиксированным.

  1. Устанавливаем курсор в самую верхнюю ячейку столбца для вывода результата. Ставим знак «=». Кликаем по месту размещения делимого, в которой находится переменное значение. Ставим слеш (/). Кликаем по ячейке, в которой размещен постоянный делитель.
  2. Для того, чтобы сделать ссылку на делитель абсолютной, то есть постоянной, ставим знак доллара ($) в формуле перед координатами данной ячейки по вертикали и по горизонтали. Теперь этот адрес останется при копировании маркером заполнения неизменным.
  3. Жмем на кнопку Enter, чтобы вывести результаты расчета по первой строке на экран.
  4. С помощью маркера заполнения копируем формулу в остальные ячейки столбца с общим результатом.

После этого результат по всему столбцу готов. Как видим, в данном случае произошло деление колонки на ячейку с фиксированным адресом.

Способ 6: функция ЧАСТНОЕ

Деление в Экселе можно также выполнить при помощи специальной функции, которая называется ЧАСТНОЕ. Особенность этой функции состоит в том, что она делит, но без остатка. То есть, при использовании данного способа деления итогом всегда будет целое число. При этом, округление производится не по общепринятым математическим правилам к ближайшему целому, а к меньшему по модулю. То есть, число 5,8 функция округлит не до 6, а до 5.

Посмотрим применение данной функции на примере.

  1. Кликаем по ячейке, куда будет выводиться результат расчета. Жмем на кнопку «Вставить функцию» слева от строки формул.
  2. Открывается Мастер функций. В перечне функций, которые он нам предоставляет, ищем элемент «ЧАСТНОЕ». Выделяем его и жмем на кнопку «OK».
  3. Открывается окно аргументов функции ЧАСТНОЕ. Данная функция имеет два аргумента: числитель и знаменатель. Вводятся они в поля с соответствующими названиями. В поле «Числитель» вводим делимое. В поле «Знаменатель» — делитель. Можно вводить как конкретные числа, так и адреса ячеек, в которых расположены данные. После того, как все значения введены, жмем на кнопку «OK».

После этих действий функция ЧАСТНОЕ производит обработку данных и выдает ответ в ячейку, которая была указана в первом шаге данного способа деления.

Эту функцию можно также ввести вручную без использования Мастера. Её синтаксис выглядит следующим образом:

Как видим, основным способом деления в программе Microsoft Office является использование формул. Символом деления в них является слеш – «/». В то же время, для определенных целей можно использовать в процессе деления функцию ЧАСТНОЕ. Но, нужно учесть, что при расчете таким способом разность получается без остатка, целым числом. При этом округление производится не по общепринятым нормам, а к меньшему по модулю целому числу.

Источник

Adblock
detector

 

dalton

Пользователь

Сообщений: 32
Регистрация: 27.01.2013

Здравствуйте!
Нужно извлечь из заданного числа, все его значения целых делителей.
Формулой у меня не получается.

Прикрепленные файлы

  • Книга1.xls (48.5 КБ)

 

Вообще-то, делители — простые числа. Так, для 20 делителями являются 2 и 5, но не являются 4 и 10…

 

dalton

Пользователь

Сообщений: 32
Регистрация: 27.01.2013

Понятно, но нужно именно как в примере, разве что возможно кроме единицы и наибольшего делителя.

 

Первую половину делителей можно как в файле; вторую — получить частные от деления числа на делители.

 

dalton

Пользователь

Сообщений: 32
Регистрация: 27.01.2013

#5

30.06.2013 19:16:17

Спасибо, подкорректирую.

MyExcel_17

Заблокирован

1

27.03.2017, 00:42. Показов 13781. Ответов 5

Метки нет (Все метки)


Студворк — интернет-сервис помощи студентам

Всем доброй ночи!

Прошу помощи. Как правильно показать в ячейках Excel все делители заданного числа? Именно в ячейках Excel!
Пусть число 34, тогда его делители: 1; 2; 17; 34.

Прошу не предлагать: MsgBox и Debug.Print — эти способы мне известны.

На картинке, ниже, код Excel неверно выводит делители у меня: 34; 34; 34; 34. Как исправить?

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub Перечислить_все_делители_в_ячейках()
n = InputBox("N=")
[A1] = n
For i = 1 To n
  If n Mod i = 0 Then s = s + i
Next i
[B1] = s
'где s сумма всех делителей числа 34
Debug.Print s
For i = 1 To n Step 1
    If n Mod i = 0 Then Debug.Print "i ="; i
        'перечисляются все делители числа 34
    Next i
For j = 1 To n Step 1
    If n / j = n  j Then
      Range("C1:C4") = j
    End If
    Next j
End Sub

Миниатюры

Как показать в ячейках Excel все делители заданного числа?
 



0



k61

85 / 82 / 31

Регистрация: 13.10.2014

Сообщений: 167

27.03.2017, 03:16

2

Лучший ответ Сообщение было отмечено MyExcel_17 как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
.......
For j = 1 To n Step 1
  If n / j = n  j Then
  Range("C1").Offset(f) = j
  f = f + 1
  End If
Next j
End Sub



1



MyExcel_17

Заблокирован

27.03.2017, 08:28

 [ТС]

3

Цитата
Сообщение от k61
Посмотреть сообщение

Range(«C1»).Offset(f) = j f = f + 1

k61, спасибо. Ещё вопрос. Как можно сделать, чтобы показывались делители по столбцам (C3:F3), заданное число 34, код ниже. Смотрите строку 21.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Sub Александр9797_делители_числа()
Dim n, i, imax As Integer
n = InputBox("Введите натуральное число? ") + 0
If n < 1 Then
  MsgBox "Плохое число"
  Exit Sub  'досрочный выход из процедуры
End If
imax = Int(n ^ 0.5)
For i = 1 To imax
  If n / i = n  i Then
    koldev = koldev + 2
    sumdev = sumdev + i + n  i
  End If
Next i
If imax = n ^ 0.5 Then 'случай целого значения корня из n
  koldev = koldev - 1
  sumdev = sumdev - imax
End If
Cells(1, 1) = "Число:": Cells(1, 3) = n
Cells(2, 1) = "Кол-во делителей:": Cells(2, 3) = koldev
Cells(3, 1) = "Делители числа:": Cells(3, 3) = "не знаю, как показать для ячеек Excel"
Cells(4, 1) = "Сумма делителей:": Cells(4, 3) = sumdev
End Sub



0



85 / 82 / 31

Регистрация: 13.10.2014

Сообщений: 167

27.03.2017, 09:10

4

Нужны делители не превышающие значения переменной imax ?



0



MyExcel_17

Заблокирован

27.03.2017, 16:05

 [ТС]

5

Цитата
Сообщение от k61
Посмотреть сообщение

Нужны делители не превышающие значения переменной imax ?

k61, наверно Вы ошибаетесь.

Кто понимает, подскажите пожалуйста, как сделать смещение делителей числа 34 не вниз по строкам, а вправо по столбцам (C4:F4). Картинка и код ниже.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Sub Александр9797_делители_числа()
Dim n, i, imax As Integer
n = InputBox("Введите натуральное число? ") + 0
If n < 1 Then
  MsgBox "Плохое число"
  Exit Sub  'досрочный выход из процедуры
End If
imax = Int(n ^ 0.5)
For i = 1 To imax
  If n / i = n  i Then
    koldev = koldev + 2
    sumdev = sumdev + i + n  i
  End If
Next i
If imax = n ^ 0.5 Then 'случай целого значения корня из n
  koldev = koldev - 1
  sumdev = sumdev - imax
End If
For J = 1 To n Step 1
  If n / J = n  J Then
  Range("C4").Offset(f) = J
  f = f + 1
  End If
Next J
Cells(1, 1) = "Число:": Cells(1, 3) = n
Cells(2, 1) = "Кол-во делителей:": Cells(2, 3) = koldev
Cells(3, 1) = "Сумма делителей:": Cells(3, 3) = sumdev
Cells(4, 1) = "Делители числа:": Cells(4, 5) = "не знаю, как задать код для ячеек (C4:F4) Excel"
 
End Sub

Миниатюры

Как показать в ячейках Excel все делители заданного числа?
 



0



k61

85 / 82 / 31

Регистрация: 13.10.2014

Сообщений: 167

28.03.2017, 02:26

6

Лучший ответ Сообщение было отмечено MyExcel_17 как решение

Решение

Добавьте запятую перед счётчиком «f»:

Visual Basic
1
2
3
...
 Range("C4").Offset(, f) = J
...



1



Формулировка задачи:

Всем доброй ночи!
Прошу помощи. Как правильно показать в ячейках Excel все делители заданного числа? Именно в ячейках Excel!
Пусть число 34, тогда его делители: 1; 2; 17; 34.

Прошу не предлагать: MsgBox и Debug.Print — эти способы мне известны.

На картинке, ниже, код Excel неверно выводит делители у меня: 34; 34; 34; 34. Как исправить?

Код к задаче: «Как показать в ячейках Excel все делители заданного числа?»

textual

...
 Range("C4").Offset(, f) = J
...

Полезно ли:

8   голосов , оценка 3.875 из 5

Поиск делимого и делителя для известного частного

serega

Дата: Среда, 10.09.2014, 22:24 |
Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

В общем суть проблемы: есть массив из 210 чисел, полученных путем умножения одних чисел на другие. Нужно, чтобы формула находила в этом массиве искомый результат, путем деления одного числа (раннее полученного путем умножения одних чисел на другие) на другое. Чтобы числитель и знаменатель были переменными и использовала все имеющиеся комбинации в этом массиве из 210 чисел, при поиске заданного результата и выделила этот результат с указанием от каких чисел получен этот результат. Например, формула ищет заданное мной искомое число 0,324, его можно получить, например от: находит в массиве два числа 3888 (получено от умножения 54*72) и 12000 (получено от 100*120), 3888/12000=0,324 и указывает связь от деления какого числа на какое получился искомый результат. Как то так.


лалала

Сообщение отредактировал seregaСреда, 10.09.2014, 22:31

 

Ответить

Nic70y

Дата: Среда, 10.09.2014, 22:30 |
Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 8136


Репутация:

1999

±

Замечаний:
0% ±


Excel 2010

файл покажете?


ЮMoney 41001841029809

 

Ответить

serega

Дата: Среда, 10.09.2014, 22:35 |
Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

Файл приложил.


лалала

 

Ответить

alex1248

Дата: Среда, 10.09.2014, 22:59 |
Сообщение № 4

Группа: Проверенные

Ранг: Обитатель

Сообщений: 384


Репутация:

71

±

Замечаний:
0% ±


Excel 2007, 2010

Мне кажется, без макроса тут не обойтись.
Хотя на форуме есть специалисты, порой такие чудеса формулами творят. :)


skype alex12481632
Qiwi +79276708519

 

Ответить

serega

Дата: Среда, 10.09.2014, 23:39 |
Сообщение № 5

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

Мне важен результат, а какими функциями exel это будет достигнуто — не важно. Так что прошу спецов о помощи


лалала

 

Ответить

Nic70y

Дата: Четверг, 11.09.2014, 08:54 |
Сообщение № 6

Группа: Друзья

Ранг: Экселист

Сообщений: 8136


Репутация:

1999

±

Замечаний:
0% ±


Excel 2010

Куча формул массива и немассива, для начала

изменил файл (так правильнее)

К сообщению приложен файл:

9127.xlsx
(59.9 Kb)


ЮMoney 41001841029809

Сообщение отредактировал Nic70yЧетверг, 11.09.2014, 10:13

 

Ответить

serega

Дата: Четверг, 11.09.2014, 21:46 |
Сообщение № 7

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

Гениально!!! Очень благодарен. Но тяжеловато разобраться со связями. Это в общем расчет подбора сменных шестеренок для нарезки специфических (китайских, американских…) резьб на токарном станке, и мне нужно знать какие для этого нужны шестерни. Первый столбец — это кол-во зубьев шестеренок, используются для этого четыре, искомый результат — это передаточное отношение, оно вычисляется (А*В)/(Б*Г) или (54*72)/(100*120)=0,324 мне нужно было 13 ниток на дюйм, но верное передаточное отношение 0,326 (дюйм 25,4/13ниток =1,954 шаг резьбы, передаточное- 1,954/6 шаг винта = 0,326, по этому из имеющихся, пытаюсь найти приближенное значение. Может быть можно как то цветом помечать в моей таблице, из каких шестерен получился искомый результат, например желтым — первый вариант (два значения, например 3888 и 12000), зеленым — второй… Тогда я буду видеть какие шестерни задействовать. Или рядом чтобы был столбец в котором указывается 3888 это А- 54 В- 72; 12000 это Б- 100 Г- 120. Так возможно?


лалала

 

Ответить

serega

Дата: Пятница, 12.09.2014, 21:31 |
Сообщение № 8

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

Уважаемые специалисты, помогите доработать таблицу, у меня моих знаний exel не достаточно для завершения таблицы.


лалала

 

Ответить

Nic70y

Дата: Воскресенье, 14.09.2014, 08:11 |
Сообщение № 9

Группа: Друзья

Ранг: Экселист

Сообщений: 8136


Репутация:

1999

±

Замечаний:
0% ±


Excel 2010

serega, я думаю вам к макрописцам или туда:
http://www.excelworld.ru/forum/6

ну или на крайняк см. мой файл.
(косо как-то идет — не варит бошка сегодня)
[moder]А что это название темы у нас такое информативное?
Прозевали мы.
Однако, лучше поздно, чем никогда — serega, меняйте название согласно Правилам форума. Иначе тему закрою и Вам замечание влеплю.
Кстати, вполне возможно, что ответов поэтому и нет.

К сообщению приложен файл:

9132.xlsx
(63.7 Kb)


ЮMoney 41001841029809

 

Ответить

serega

Дата: Воскресенье, 14.09.2014, 21:55 |
Сообщение № 10

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

Может быть назвать тему «поиск частного от делимого и делителя»? Строго не судите за название, сам не знал как назвать этот процесс. И как отредактировать название темы — не разберусь, в общем новичок я на форуме. И за решение, еще раз огромное спасибо, сейчас буду разбираться.
[moder]Тогда уж «поиск делимого и делителя для известного частного». Или что-то в этом роде.
Зайдите в редактирование своего первого поста — там можно отредактировать название темы.


лалала

Сообщение отредактировал seregaВоскресенье, 14.09.2014, 22:00

 

Ответить

serega

Дата: Воскресенье, 14.09.2014, 23:46 |
Сообщение № 11

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

Последний текст редактированию подлежит, а первый — нет, возможно у меня не достаточно прав для этого.
[moder]Поменял.
В следующий раз следуйте Правилам форума, договорились?


лалала

 

Ответить

ikki

Дата: Понедельник, 15.09.2014, 04:06 |
Сообщение № 12

Группа: Друзья

Ранг: Старожил

Сообщений: 1906


Репутация:

504

±

Замечаний:
0% ±


Excel 2003, 2010

макросом. на втором листе. (первый не используется, оставлен «просто так»)

К сообщению приложен файл:

4419791.xlsm
(80.1 Kb)


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

 

Ответить

ikki

Дата: Понедельник, 15.09.2014, 04:31 |
Сообщение № 13

Группа: Друзья

Ранг: Старожил

Сообщений: 1906


Репутация:

504

±

Замечаний:
0% ±


Excel 2003, 2010

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

К сообщению приложен файл:

___.xlsm
(23.0 Kb)


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

 

Ответить

MCH

Дата: Понедельник, 15.09.2014, 09:01 |
Сообщение № 14

Группа: Админы

Ранг: Старожил

Сообщений: 2002


Репутация:

751

±

Замечаний:
±


вариант без словаря, только на массивах.

[vba]

Код

ReDim am(1 To (UBound(a) ^ 2) / 2, 1 To 2)

[/vba]
Саш, память не экономим, избыточное определение массивов :)

Можно так:
[vba]

Код

ReDim am(1 To UBound(a) * (UBound(a) — 1) 2, 1 To 2)

[/vba]

 

Ответить

ikki

Дата: Понедельник, 15.09.2014, 09:50 |
Сообщение № 15

Группа: Друзья

Ранг: Старожил

Сообщений: 1906


Репутация:

504

±

Замечаний:
0% ±


Excel 2003, 2010

[offtop]Миш, это называется «в 6 утра после бессонной ночи голова работать отказывалась категорически» :D [/offtop]


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

 

Ответить

shanemac51

Дата: Понедельник, 15.09.2014, 10:55 |
Сообщение № 16

Группа: Проверенные

Ранг: Новичок

Сообщений: 33


Репутация:

4

±

Замечаний:
0% ±


Цитата

его можно получить, например от: находит в массиве два числа 3888 (получено от умножения 54*72) и 12000 (получено от 100*120), 3888/12000=0,324

насколько мне помнится, есть еще какое то условие , типа зацепление
на каком то форуме тема решалась

 

Ответить

serega

Дата: Понедельник, 15.09.2014, 13:34 |
Сообщение № 17

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

Ну Вы даете :o !!! Мы такое в институте не учили. Гениально в квадрате! Очень благодарен за новые открытия!!!


лалала

 

Ответить

Like this post? Please share to your friends:
  • Найти действительный корень уравнения excel
  • Найти данные по диаграмме в excel
  • Найти данные по дате в excel
  • Найти данные в документе word
  • Найти города занявшие первые три места по объемам реализации excel