将VBA单元格范围内的字母替换为另一个

将VBA单元格范围内的字母替换为另一个,vba,excel,Vba,Excel,我已将这些公式输入excel中的一系列单元格中。我正试图用VBA编写一些东西,将这些公式粘贴到另一个单元格区域,但其中一个字母发生了变化 例如,我试图将=MIN(CompareInputs!I3:J8)更改为=MIN(CompareInputs!M3:N8)并将=MIN(CompareInputs!K3:K7)更改为=MIN(CompareInputs!O3:O7) 然后,我尝试将新版本复制并粘贴到另一个单元格区域,其中公式相对位置相同 我意识到使用replace函数会改变字母,但是我在循环中遇

我已将这些公式输入excel中的一系列单元格中。我正试图用VBA编写一些东西,将这些公式粘贴到另一个单元格区域,但其中一个字母发生了变化

例如,我试图将=MIN(CompareInputs!I3:J8)更改为=MIN(CompareInputs!M3:N8)并将=MIN(CompareInputs!K3:K7)更改为=MIN(CompareInputs!O3:O7)

然后,我尝试将新版本复制并粘贴到另一个单元格区域,其中公式相对位置相同

我意识到使用replace函数会改变字母,但是我在循环中遇到了问题。有人有什么建议吗


谢谢大家!

用你给我们的一点点,像这样的东西可能可以将A3:A8的范围设置为公式

Worksheets(1).Range("A3:A8").Formula = " =MIN(CompareInputs!M3:N8)"
如果你不想让公式留在单元格中,这样你就可以复制并粘贴数据,你可以使用

With ws.Range("A")
.value = .value
end with 

为什么需要VBA?这不能通过拖动单元格来完成吗?你试过间接功能吗?