首页 > 解决方案 > 希望将 Excel VBA 宏转换为 Google Sheet 应用程序脚本,该脚本比较日期和自动填充/删除列

问题描述

我正在尝试将这个有效的 Excel 宏脚本转换为 Google Apps 脚本(我也是全新的!):

Sub Booking3Days()

Dim firstDate As Date, secondDate As Date, n As Integer

BookingDate = Cells(1, 2)
TodayDate = Date

n = DateDiff("d", BookingDate, TodayDate)

        If n > 0 Then
        For n = 1 To n
        Range("E1:E90").AutoFill Destination:=Range("E1:F90")
        Range("B1:B90").Delete shift:=xlToLeft
        Next n
        End If
End Sub

它正在做的是我有一张预订单,在 B 到 D 列有连续 3 天,当天的日期在单元格 B1、C1 和 D1 中。我想要发生的是,当打开文件时,宏运行并将今天的日期与单元格 B1 进行比较,如果该日期已过,则将 col D 自动填充到 col E 以在列表中创建第二天,然后删除最旧的日期(Col乙)。然后 FOR 循环每天重复此操作,直到今天的日期位于 Col B 中。

然而,努力让所有元素在 Google Apps Script 中工作!任何帮助将非常感激。

标签: google-apps-scriptgoogle-sheetsgoogle-sheets-macros

解决方案


推荐阅读