我继承了一个excel电子表格,它在excel2007上运行得很好。问题是它所在的计算机死机了,新机器只有excel 2003 -电子表格不再正常工作。问题出在一些vba代码中的“排序”函数。
我想知道是否有人知道我是否可以将其更改为在excel 2003中工作?我看过类似的帖子,但我对vba完全是个新手--我只是在寻找一个简单的“复制粘贴”解决方案--用2003位替换2007位。其他的都行。
这是代码-
'Sort by Class then by Entry No
ActiveWorkbook.Worksheets("Competitor & Class Entry
我想将两个excel文件(Book1.xlsx和Book2.xlsx)导入到access数据库表(Table1)中,其中有一个额外的列指示数据源:
1.xlsx
Name Age
Paul 30
2.xlsx
Name Age
John 20
Table1
Name Age Source
Paul 30 Book1
John 20 Book2
通过Access VBA或Excel VBA自动执行此操作的最佳方法是什么?我将有几十个excel文件,每个文件包含约50K行。
是否必须打开每个excel文件才能运行Excel VBA宏,然后使用ADODB
我在excel电子表格中有一个数字数组,我试图使用用户定义的vba函数对这些数字进行排序(所有数字都>60),并且我希望将结果作为一个范围返回到同一个excel表中。
当我运行这个函数时,我会得到一个值错误,我不太确定这个错误是从哪里来的,因为我是VBA.I的新手,我非常希望能在解决这个问题方面提供一些指导。
数组Excel
Column A
200
50
23
789
Function trial(number As Range)
Dim cell As Range
Dim savearray() As Variant
Dim d As Long
F
我使用的是excel 2007。
我有一个任务列表(200-500),我需要分组在不同的类别/部分等(多个过滤器)。整个数据都在excel表格中,所以我可以应用Excel的内置表格过滤器来显示我需要的确切数据。
然而,应用多个过滤器来显示预期数据总是很困难的,特别是因为我需要非常频繁地这样做。为了简单起见,我计划对每条记录进行如下编号
a.b.c.d.e.f
Where a, b, c, d, e, f are simple numbers. List looks like:
1
1.1
1.2
1.2.1
1.2.1.1
1.2.2
1.3
& so on.
问题是,Excel将
我在Excel中有一个表,其中包含与某些数据链接的名称列表。我希望能够创建新的行(使用来自类似表单的数据),并将它们排序到现有的行中。
我不知道如何在Excel中编写VBA代码,也找不到任何根据数据插入行的示例。大多数示例插入新的空白行来设置表的样式。
我要插入输入值为user的新行:
Sub Test_Function()
Dim val As String
val = InputBox("Enter your name", "May I know your Name!")
'Inserting a Row at at Row 2
Range(
我正在尝试将工作表中的日期插入到SQL中的表中。工作表中日期的原始源来自到SQL的连接,并且日期字段已设置为强制转换(Interview_date as date),但是一旦填充了工作表,我就需要插入回sql中的另一个表中。当我这样做时,我在表的日期字段(即日期时间)中得到1900-01-01 00:00:00.000。我提取到excel日期格式是yyyy-mm-dd,这与我插入到的Sql表上的格式相同。
我在VBA中尝试了以下插入,有问题的3个字段是sdate_confirmed、sdate_interview和rundate。
我已经将这些字段声明为
Dim sForename As St
我在Word VBA中有一个宏,它从Word文件中复制一个表并将其粘贴到Excel中。
它把它粘成这样:
我现在的问题是,是否可以将该表格式化为“excel表”,就像在excel中使用word中的vba插入表一样?
要获得最终结果,如下所示:
我的意思是,我知道如何在同一个excel文件中使用宏来实现它,但是如何从单词vba中格式化它呢?
我的问题是,我需要从word vba做它,因为我没有选择在excel vba中这样做。
谢谢大家!
我的代码是:
Dim wrdTbl As Table, c As Long
'Excel Objects
Dim
我需要你的帮助来正确使用CATIA。
我目前的任务是为模具创建一个“支撑”零件,其中必须插入一个封头螺丝(不管其长度),最大长度为15‘m。插入的螺丝的长度取决于位于支承部件上方的板。在Excel中,我已经创建了几个公式来确定必须使用哪个封头螺丝,但我不知道如何在VBA中使用excel公式。有没有办法在VBA中使用excel公式甚至电子表格?
'declaration of X as "Height of Plate 9"
Dim X As Integer
X = length1.Value
'declaration of Y as the result fo
我浏览了许多Excel VBA主题,但是,我没有找到任何关于插入普通值的信息-在本例中是SUM()的结果-而不是公式。有一个方法,PasteSpecial xlPasteValues,但它似乎不是我要找的。
下面的代码示例插入公式,而不仅仅是值:
Sub test()
Range("A4").Value = "=SUM(A1:A3)"
End Sub
如何在Excel VBA中插入不带公式的普通值?
如果在vba中有变量和值,可以从max到min对它们进行排序,但也可以将它们与变量进行匹配。例如,如果您在VBA中使用:
Sub sort()
...
x = 5
y = 3
z = 8
...
End sub
在excel中得到(在A列变量中,在B列值中):
A B
z 8
x 5
y 3
对8,5,3进行排序非常简单,但是如何将z,x,y添加到合适的位置呢?
背景:我正在从格式的API中接收应用程序的数据。在这个问题上,我以字符串的形式接收数值,因为用JSON发送的所有东西自然都是文本格式-- VBA也是这样解释的。由于我位于丹麦,在Excel中使用不同的十进制分隔符(我的丹麦语版本使用,作为分隔符,而不是.)。
大小写:--在将字符串转换为数字时,Excel将其解释为千分隔符,这造成了相当大的麻烦。
为了寻找答案,我发现最好的解决方案,通常是在使用VBA时,利用CDbl(string to convert to number)将字符串转换为double。
这通常是这样的,但在我的例子中,我收到了一个包含大量小数的数字,例如:"9.3000
我是VBA的新手。我正在使用ms-access作为数据库。我有一个原始数据在excel中,我想将数据插入到ms-每日访问基础上。在每个excel中,我有超过100或200行。我的数据库和excel列标题是相同的。现在我正在插入一行时间。插入所有数据所花费的时间太长。我不想在一个insert语句中插入所有行。
当前我是以下方法:
for i = 1 to 100
name = wb.sheets(1).celss(i,1)
job = wb.sheets(1).celss(i,2)
testt = wb.sheets(1).celss(i,3)
ssql="insert into (n
这个问题可能会让人感到困惑,但请让我解释一下。
我有一个有4000行的excel表格,有很多重复的行,如下所示:
Name--------------Grade
Micheal -------------- A
Sarah ---------------- A
Oliver ---------------- B
Micheal -------------- C
Velvet ---------------- A
Micheal -------------- D
我目前正在使用Application.Wo
我最近从Mac2011的Excel升级到了Mac2016的Excel,发现了一个bug。我想知道是VBA Excel for Mac 2016出现了这个问题,还是其他计算机也出现了这个问题。
Dim gg As Range
Set gg = Range("a1:s16000")
gg.Replace What:=ChrW(&H1D48), Replacement:="|d", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
此代码将正确地将heyᵈ更改为hey|d。但它会错误地将dude