Получить номер дня недели, который был за некоторое число дней до текущего дня

@ManiKKK · Регистрация: 29.06.2016

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

Здравствуйте, требуется помощь с заданием: В ячейке В2 получить дату текущего дня, в ячейке В4 — номер дня недели (понедельник — 1, вторник — 2, ..., воскресенье — 7), который был за некоторое число дней до текущего дня (это число будет указано в ячейке ВЗ):

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

Visual Basic

Sub Zadanie_1()
 
Dim Date1 As String, Year As String, Month As String, Day1 As String, Days As String, Result As String
 
Date1 = Date
 
Day1 = Day(Date1)
CurrentDayOfWeek = Weekday(Date, 2)
 
Cells(2, 2).Value = Date1
Days = Range("B3")  
 
End Sub

Нужна помощь.

@Казанский · 25.01.2018, 08:59

ManiKKK,

Visual Basic

1	weekday(date-[B3],2)

@ManiKKK · 25.01.2018, 09:06 **[ТС]**

Казанский, Спасибо!

@ManiKKK 2 / 2 / 0 Регистрация: 29.06.2016 Сообщений: 179
	25.01.2018, 09:06 [ТС]	3
	Казанский, Спасибо! 0

Получить номер дня недели, который был за некоторое число дней до текущего дня

Решение