2014-02-06 113 views
2

首先,道歉,如果这是一个愚蠢的问题。我是VBA新手。我在网上搜索这个答案,但无法找到它。使用VBA转换公式列从相对固定参考

我想将公式的一长列从相对引用转换为绝对单元格引用。从本质上讲,我希望VBA通过列,选择一个单元格,“击中F4”,然后移动到下一个单元格。

我记录在VBA这个动作,得到了以下几点:

ActiveCell.FormulaR1C1 = "='Worksheet'!R11C9" 
Range("G5212").Select 

我的问题是在这个命令是什么击中F4的相同呢?我不擅长阅读VBA,我试图理解这一点。当然,如果我以完全错误的方式讨论这个问题,请让我知道。谢谢。

+2

对不起,我迷路了,但你能进一步简化你想达到的目标吗? – L42

+0

@ L42虽然我肯定可能是错误的,但他明确地*似乎*表示他试图模拟在单元格中按'F4',绝对单元格引用的相对引用('A1'到'$ A $ 1'),但为整个列。 – user2140261

+0

是的,正是user214所说的! – sockah

回答

3
Dim LastCell As Range 

Set LastCell = Range("G" & Rows.Count).End(xlUp) 
Range("G1", LastCell).Formula = Application.ConvertFormula _ 
(Formula:=Range("G1", LastCell).Formula, FromReferenceStyle:=xlA1, _ 
ToReferenceStyle:=xlA1, ToAbsolute:=xlAbsolute) 

根据需要更改您的列。我根据问题假设了G

+0

只需写入即可确认工作。谢谢用户214。 – sockah