Question

我想知道是否可以使用vba来解决我的问题：

有一个名为Time的列，它包含各种时间值，从最早到最晚，就像一个时间表。像这样姓名时间
马克10:20
托尼10:50
亚历克斯12:30
索菲13:35
最高14:30
莎莉14:50

我想在14:00之后插入一行，在这种情况下，在13:35到14:30之间插入一个新行，就像这样姓名时间
马克10:20
托尼10:50
亚历克斯12:30
索菲13:35

最多14:30
莎莉14:50

之后我想在新行中插入特定文本，如下所示姓名时间
马克10:20
托尼10:50
亚历克斯12:30
索菲13:35
XX 16:00
最高14:30
莎莉14:50

另外我需要在新行上方画一条边框线，下面是一张图片，它可以更好地解释我想说的内容

Sample

希望有人能帮我一臂之力

Answer 1

此代码将找到所需的时间（输入：时间），在该时间之上插入一行，将一个寄存器放在插入的行上方，并用新内容填充空白单元格（var：colA，colB，colC）。

这假设您的时间在C列，您要插入的文本位于A到C列，您的边界也从A列到C。

var isiPad = navigator.userAgent.indexOf('iPad') != -1

//or
var ua = navigator.userAgent;
var isiPad = /iPad/i.test(ua)
if (isiPad) {
$(window).on('load orientationchange', function(event) {
    if(window.innerHeight > window.innerWidth){
        console.log("portrait");
    } else {
        console.log("landscape");
    }
});
}

在特定单元格值上方插入行

1 个答案: