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

Страницы: 1
Не отображается сумма в строке состояния
 
здравствуйте, в ex10 видна строка состояния, файл тип: Лист Microsoft Excel 97-2003 (.xls) открываю, нет суммы в строке состояния, хотя в настройках строки стоит галочка сумма. Как отобразить сумму?
Ссылка на поле таблицы
 
Здравствуйте, подкажите как в формуле: Вместо База[1] прописать ссылку на ячейку, где записан номер столбца: А6, Пример: "База[" & A6 & "]"
Код
=СУММЕСЛИМН(База[9];База[2];$C$1;База[1];D$4)

СУММЕСЛИМН с параметрами по части текста
 
Здравствуйте,
Во вложении таблица. Мне необходимо сложить все ячейки с условием: 1. В столбце A выбрать те, которые начинаются с 1. (именно 1точка), т.к. будет привязка к $A2. Условие 2: =$B2

=СУММЕСЛИМН($C$6:$C$17;$A$6:$A$17;НАЧИНАЕТСЯ с $A2;$B$6:$B$17;$B2)
Подскажите Как правильно записать 1 условие?
Выводится на печать только первый лист сводной таблицы
 
Здравствуйте, на листе excel сводная таблица с данными из таблицы access. Все прекрасно формируется, работает. НО если выводишь на печать, выходит только 1 лист. В настройках: печатать активные листы, удалила область печати. Не пойму в чем дело
разделить слово по буквам по столбцам
 
Здравствуйте, существует разделение ячейки на куски, используя разные разделители: ...здесь
А мне часто приходится разделять  слово на буквы. Как это сделать. (См. пример во вложении.)
Ссылки на ячейки в сводных таблицах
 
Здравствуйте, в сводной таблице есть вычисляемое поле СреднемесячнаяСумма=Сумма/на число, которое пользователь выставляет в ячейке "M2". Это число пользователь постоянно меняет. Как правильно записать в формуле?
Вставка формулы циклом
 
При вставке формулы циклом не могу записать формулу, а именно адрес ячейки  Range(Cells(I, J)). Формула должна быть такая: Cells(6, 3) = "=sum('форма:форма (10)'!C6)"

Код
Sub ВставкаФормулы()
Dim a, I, J As Integer  'I-номер строки, J-номер столбца
a = Worksheets.Count
For I = 6 To 10
    For J = 3 To 4
        Cells(I, J) = "=sum('форма:форма (" & a & ")'!" & Range(Cells(I, J)) & ")"
    Next J
Next I


End Sub
Копирование листов из книг в одну
 
Ранее на сайте была тема с кодом:
Dim w As Workbook
   Set w = Application.ActiveWorkbook
   Dim FilesToOpen
   Dim x As Integer
   On Error GoTo ErrHandler
   Application.ScreenUpdating = False
   FilesToOpen = Application.GetOpenFilename _
                 (FileFilter:="Microsoft Excel Files (*.xls), *.xls", _
                  MultiSelect:=True, Title:="Files to Merge")
   If TypeName(FilesToOpen) = "Boolean" Then
       MsgBox "Не выбрано ни одного файла!"
       GoTo ExitHandler
   End If
   x = 1
   While x <= UBound(FilesToOpen)
       Workbooks.Open Filename:=FilesToOpen(x)
       Sheets(2).Move After:=w.Sheets(w.Sheets.Count)
       x = x + 1
   Wend
ExitHandler:
   Application.ScreenUpdating = True
   Set w = Nothing

   Exit Sub
ErrHandler:
   MsgBox Err.Description
   Resume ExitHandler
Я пользуюсь и очень довольна, если в книгах(которые сводишь) 1 лист, то после выполнения процедуры каждая книга закрывается, но если более 2 листов, книги остаются открытыми, а листы (в данном случае Sheets(2)) не копируются, а переносятся в конечный файл. Как это исправить?
как найти слово в ячейке из заглавных букв
 
как найти слово в ячейке из заглавных букв?
обновление листа exel
 
В файле 3 листа, и 1 или несколько листов с бланками на них может меняться. Как реализовать такую идею: Открываем файл, и сравнивается 2 файла с обновлением и старый. Если есть различия, то данные со старого листа удаляются, копируются с нового
Сумма вертикальных ячеек по условию
 
Помогите с решением задачи:  
Условие в примере
Исправление ошибки
 
Помогите, исправить ошибку:  
Function KodStroki(Выражение As Range, КодыНач As Range, n As Integer)  
Application.Volatile  
Dim c As Range, s$  
s = Выражение(1)  
For Each c In Range(КодыНач, КодыНач.End(xlDown))  
   s = Replace$(s, c, Str$(c(1, n)))  
   'Debug.Print c & ": " & s & ": " & Str$(c(1, n))  
Next  
KodStroki = Evaluate(s)  
End Function  
Если выражение=010+011-198, здесь происходит замена: Replace$(s, c, Str$(c(1, n)))  
010 меняет на 10, а не на число в столбце
Слишком длинный текст
 
Здравствуйте, в столбце T необходимо пронумеровать уникальные записи столбца U. Но вот текст очень длинный, и не знаю, как  исправить эту ошибку
[ Закрыто] Создание формул самим оператором [ТЕМА ЗАКРЫТА - повторное нарушение]
 
В приложенном файле есть таблица для оператора, в которую он заносит данные. В таблице контрольные соотношения, изменив строку например:010+020-080 в соответствующей строке Сумма мы должны получить сумму этих строк, но не используя формулы excel:=C3+C4-C10 Т.Е. написать пользовательскую функцию по распознаванию этой комбинации строк 010+020-080. Тогда сам пользователь будет настраивать контрольные соотношения.  
Помогите с советом или ссылкой
Отбор повторяющихся записей
 
Помогите с расчетами в столбце Индекс, считает не правильно, показывает 0 или пусто
Заполнение бланков данными из таблицы
 
Здравствуйте, необходимо из таблицы извлечь данные с параметрами, сложить их и вставить в бланк. Этот бланк прототип 2НДФЛ. Как это сделать
Страницы: 1
Наверх