powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Формула для поля в табеле
9 сообщений из 34, страница 2 из 2
Формула для поля в табеле
    #39900969
Фотография Лапух
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Игортан
...Вот это поворот!?...

Не удивительно, ИБО Велик и Могуч - Access в Блеске своей Славы и Великолепия.

Хорошо, если Начальство понос не пробил от страха, ужаса и не понимания, и они приняли решение всего лишь только назад в Эксель откатиться, а не сразу в Ворде бросились работать со Счетами или на крайняк с Калькуляторами.
...
Рейтинг: 0 / 0
Формула для поля в табеле
    #39903329
Медет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
застрял с небольшим макросом в VB ексель. Задача следующая - в табеле есть столбцы числа 29, 30, 31 с адресами AH5, AI5, AJ5 соответственно и столбцы с этими числами должны скрываться при отсутствии чисел и показываться при появлении цифр. Я написал макрос для кнопки, сделал для этих же ячеек, но макрос не работает так как ячейка является вычисляемой. Как сделать макрос работоспособной при изменении вычисляемой ячейки?
Sub скрытие()

If Range("AJ5") = "" Then
Columns("AJ:AJ").Select
Selection.EntireColumn.Hidden = True
Else
Selection.EntireColumn.Hidden = False

End If
End Sub
...
Рейтинг: 0 / 0
Формула для поля в табеле
    #39903391
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Медет,
Форум по ACCESS (excel анапогично)
В нем так: к дате прибавляете месяц и отнимаете дату,получаете число дней в месяце
Код: vbnet
1.
2.
3.
Private Sub myDate_AfterUpdate()
Me.dn = DateAdd("m", 1, Me.myDate) - Me.myDate
End Sub


в зависимости от полученной цифры управляете Visible полей(столбцов)
...
Рейтинг: 0 / 0
Формула для поля в табеле
    #39903551
Медет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
я использовал такой код
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim cell As Range
    Application.ScreenUpdating = False                             
    For Each cell In ActiveSheet.UsedRange.Rows(5).Cells           
        If cell.Value = "" Then cell.EntireColumn.Hidden = True    
    Next
    
    Application.ScreenUpdating = True
End Sub


но у меня работает когда я сам вношу в эти ячейки изменения. У меня ячейка вычисляемая и это не работает.
что надо изменить в коде чтобы сработало?
...
Рейтинг: 0 / 0
Формула для поля в табеле
    #39903666
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Формула для поля в табеле
    #39903669
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пардоньте-не тот файл
...
Рейтинг: 0 / 0
Формула для поля в табеле
    #39913014
Медет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Игортан,
Вы были правы! По поводу того, что захочу вставить и отпуска и т.д.
Теперь задача - вставить цифру 1 или 0 в формулу в зависимости от видимости столбцов
Код: vbnet
1.
2.
3.
Public Function vvv() As String
    vvv = IIf(Columns("A").Hidden = False, 1, 0)
End Function


но кажется мне, что это не правильно
...
Рейтинг: 0 / 0
Формула для поля в табеле
    #39914490
Медет
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
всем привет!

подскажите пожалуйста как правильно вставить в екселе
=5
в формулу ЕСЛИ(E5=5;4;8)
то есть в одном случае =5 в формуле, а в другом нет
к примеру так ЕСЛИ(E5&ЕСЛИ(E6=1;"=5";"")&;4;8) но синтаксис не верный
...
Рейтинг: 0 / 0
Формула для поля в табеле
    #39914822
Игортан
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Медет,

если я правильно понимаю вашу конечную цель
то некий аналог акса можно сделать в экселе.
Таблицы, запросы == листам в экселе
в основном листе собираете итоговые данные
какой нибудь ВПР вам в руки
или нечно подобное
иначе, думаю, потонете в хотелках
т.к. каждая следующая будет ломать сделанное
и при этом все равно замучаетесь ссылки добавлять/править

С уважением.
...
Рейтинг: 0 / 0
9 сообщений из 34, страница 2 из 2
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Формула для поля в табеле
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]