Range("J“& lastrow).Formula = "=Range"(H & lastrow”/ 4000 &“)语法错误”
这个问答内容涉及到Excel VBA的语法错误。具体来说，Range("J" & lastrow).Formula = "=Range(H" & lastrow & "/ 4000)" 这行代码中存在语法错误。
正确的语法应该是将等号后面的表达式放在双引号内，如下所示： Range("J" & lastrow).Formula = "=(Range(" & "H" & lastrow & ")/ 4000)"
这行代码的作用是将单元格H最后一行的值除以4000，并将结果赋给单元格J最后一行。
关于这个问题，腾讯云并没有直接相关的产品或链接。但是，腾讯云提供了一系列与云计算相关的产品和服务，包括云服务器、云数据库、云存储等。您可以访问腾讯云官方网站（https://cloud.tencent.com/）了解更多信息。
相关·内容
我试着写Range("H“& lastrow) / 4000比方说lastrow = 150，我已经试过H150了，但是我需要这个数字是动态的。所以请帮帮我
Range("J" & lastrow).Formula = "=Range"(H & lastrow"
浏览 21提问于2019-08-01得票数 0
回答已采纳
Sub testing() lastrow = Cells(Rows.Count, 1).End(xlUp).Row 'assume i count therow ActiveCell.Formula = Range("
浏览 2提问于2019-08-01得票数 0
1回答
Cells(Rows.Count, "A").End(xlUp).Row .Range("F" & LastRow + 1).Formula = "=SUM(F5:F" &
浏览 12提问于2022-05-25得票数 0
1回答
= Range("A" & Rows.Count).End(xlUp).Row
Range("K2:K" & LastRow).FillDown
Range("L2:L&q
浏览 9提问于2021-11-16得票数 1
回答已采纳
3回答
这是我的代码：Range("I6:I" & LastRow).Formula = "=DateDif(C6, Today(),""m"")/12"
Range("H6:H"
浏览 2提问于2016-10-24得票数 0
回答已采纳
column b formulasht1.Range("B2").Formula = "=MIDsht1.Range("E2:E" & lastRow)
sht1.Range(&qu
浏览 1提问于2016-12-28得票数 2
回答已采纳
下面是我为之编写的宏 LastRow = .Cells(.Rows.Count, "C").End(xlUp).Row.Range("S6:S" & LastRow).Formula =
浏览 2提问于2018-03-21得票数 0
回答已采纳
("FX").Range("S" & LastRow + 1) = 50
wb.Sheets("FX").Range("U" & LastRow).Formula = "=SUMIF($K$3:$K$" & LastRow - 1 & ",0.2,U$3:U$" & LastRow - 1 & &quo
浏览 5提问于2021-07-22得票数 2
回答已采纳
1回答
正如您从图像中看到的，我希望合并D行中的重复值，并将E、F、G、H、I、J列中的值的平均值打印到与D列中的合并值相同的行上。例如，对于D列中的值"Gebze 6832“，我希望将其作为重复项删除，使其成为目标中的一个单元格，并打印在目标列中合并到它旁边的两行中的E、F、G、H、I、J列的平均值。dic(.Range("M" & i).Value)
.Range("R" & i).Formula = &qu
浏览 9提问于2017-08-25得票数 0
回答已采纳
这一行代码会导致编译错误:语法错误，我不知道要更改什么。它与其他公式都很好，所以我认为它可能是关于公式的一些东西。Range("O2:O" & LastRow).Formula = "=WENN(Q2="";"";WENN(H2*7*Q2<L2;"Möglich";"Prüfen"))"我的全部代码Range("N3&quo
浏览 0提问于2019-04-04得票数 0
回答已采纳
lastrowJ = Cells(Rows.Count, "J").End(xlUp).RowRange(&quo
浏览 4提问于2014-01-06得票数 0
回答已采纳
rangeM As RangeDim pasteRange As Range
Set rangeI = Top15.Range("I" &
浏览 0提问于2018-12-20得票数 1
回答已采纳
1回答
所以我得到的第一个单元格的公式是'=CONCATENATE($F$4，$H$4，$J$4)‘。如果我不理解您的一些基本解释，请提前向您道歉:) 当前代码： Private Sub ParetoButton_Click()
R
浏览 14提问于2019-07-02得票数 1
1回答
'Convert formula to a value
ws.Range("H" & LastRow).Value =
浏览 0提问于2018-04-25得票数 0
回答已采纳
将lastrow调暗为Long lastrow = Range("e“& Rows.Count).End(xlUp).Row Dim x(1到4)作为变量 With ThisWorkbook.Sheets("sheet1")x(2) = Range("g2")x(4) = Range</
浏览 10提问于2019-05-06得票数 1
Sub CopyFormulas()Application.ScreenUpdating = FalseRange("A3:A" & Lastrow).Formula = "=D3&LEFT(C3,10)"
Range("B3:B"
浏览 5提问于2022-05-06得票数 1
1回答
(LastRow + 6, 11) = "H1 & H2" Then我尝试简单地编辑公式，但是当我使用下面的内容时，它会给我一个语法错误。Cells(LastRow + 1, j) = Application.Workshee
浏览 0提问于2019-07-23得票数 0
回答已采纳
("U2:U" & LastRow).Formula = "=L2/86400"Dim LastRow As DoubleRange("A1")
浏览 0提问于2019-02-11得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
