代码之家 › 专栏 › 技术社区 › John Wilson

使用单元格值在vba中创建公式

excel-formula vba excel

John Wilson · 技术社区 · 2 年前

很确定这是可以实现的,但已经尝试了各种语法,但都无法使其工作

我在单元格“A1”中有以下公式:

='Z:\DataFiles[MyData.xlsm]数据'$A 1美元

它是用这行代码创建的:

Sheets("MySheet").Range("A1") = "='Z:\DataFiles\[MyData.xlsm]Data'!$A$1"

在MySheet的单元格“B1”中是“Z:\DataFiles”

在MySheet的单元格“C1”中是“MyData.xlsm”

我的问题是如何编写VBA来使用单元格“B1”中的文本;“C1”在“A1”中创建公式?

1 回复 | 直到 2 年前

Peter Constable 2 年前

这应该奏效:

Sub setFormula()
    With Sheets("MySheet")
        Range("A1").Formula = "='" & Range("B1").Value & "\[" & Range("C1").Value & "]Data'!$A$1"
    End With
End Sub

推荐文章

Kram Kramer · 通过vba自动调整文本大小以适应形状

1 年前

Swapnil Supekar · 将二维阵列转换为一维阵列,并将一维阵列粘贴到另一张图纸上

1 年前

Eric · 我有邮政编码替换问题Excel VBA

1 年前

Chasester · VBA使用嵌套的DIV抓取URL

1 年前

jkp · 特殊字符复选标记

1 年前

Iron Man · 代码插入和复制到错误的工作表

1 年前

NoFafo · 将文本框放入数组进行格式化

1 年前

Smokestack · 过滤器范围C3:G3并粘贴到其他单元格

1 年前

Julie S. · Excel VBA for循环的代码帮助,用于检查多个ListBoxes是否有值?

1 年前

Kram Kramer · 如何通过vba代码将Chart xAxes字体颜色从黑色更改为红色?

1 年前