excel

    0热度

    1回答

    我在Excel选项卡中有12个月的数据。我需要使用公式将最大月份数据自动复制到另一个选项卡中。通过使用正在工作的VB脚本。但我想尝试配方。 任何人都可以帮助我这个。 在此先感谢!

    -1热度

    1回答

    我不知道这是否有意义,但可以在没有工作簿或Excel.Application对象的情况下创建/编辑Excel工作表对象?

    1热度

    2回答

    我想写一个简单的Excel VBA函数从给定的单元格中取一个数字并分配一个等级,然后在当前活动单元格中写入该值。 Public Function Grade(rng As Range) Dim number As Double number = rng.Value If number >= 75 Then ActiveCell.Value = "A"

    0热度

    2回答

    我有以下VBA代码复制现有工作表数据到新的工作表,它的正常工作,但它不会复制工作表中的图片文件(eg.jpg),我怎么能复制图片文件好?谢谢。 Set source2 = Worksheets("today").Range("A5:l68") Sheets.Add After:=Sheets(Sheets.Count) Set dest2 = ActiveWorkbook

    1热度

    2回答

    我需要检查列(X:X)中的单元格是否重复,并且如果另一列中的单元格(AB:AB)为0,并且如果条件匹配,则以颜色突出显示相应的行。这是我有什么,但它不工作.. Dim cell1 As Variant, myrngg1 As Range, clr1 As Long Set myrngg1 = Range("X1:X" & Cells(Rows.count, "X").End(xlUp).Row)

    0热度

    2回答

    尝试使用此vlookup时出现此错误1004。我使用一个窗口来选择一个文件,然后在vlookup中使用该文件。我在另一个宏中使用它,我使用了基本相同的代码。但由于某种原因,这一个不工作。任何人都可以看到任何明显的问题?我无法弄清楚我做错了什么。 我上第一VLOOKUP公式错误后右侧的“使​​用WS” Dim iRet As Integer Dim strPrompt As String Dim

    1热度

    1回答

    排序功能的内存分配我最近完成了一些代码,通过我在Excel中的所有图纸循环,然后对其进行排序基于特定的列和 的代码如下所示该列中的值: Sub sortingByLooping() Dim rngName As Range Dim sht As Worksheet Dim LastRow As Long Application.ScreenUpdating

    1热度

    1回答

    编辑:我想出了自己。我觉得非常愚蠢,但用“结束”取代“退出小组”完美。 背景:我有一个使用“调用”函数在一个Sub中运行多个子的Sub(请参见下面的代码#1)。 Option Explicit Sub MIUL_Run_All() Dim StartTime As Double Dim SecondsElapsed As String 'Remember time when macr

    1热度

    1回答

    我想通过RFC连接器将数据从Excel发送到SAP。对于RFC功能模块,我必须填写一个表作为输入参数。与RFC功能模块STFC_DEEP_TABLE相似。 不幸的是,我的VBA代码将停止在有错误的有声明: “Object variable or With block variable not set”. 见下文。 请问,有人可以帮助我吗?哪里不对? Sub RFC_DEEP_TABLE() Di

    0热度

    3回答

    我修改的代码,我用来调用多个工作表,&我想用它来调用网址。 Sub OVR_Office_Listing() Dim i As String 'MsgBox prompt:="1st 6 Months of Reports?", Title:="Referral Workbook - Data Entry" i = MsgBox("Continue to OVR Office Di