Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/26.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vba :_Vba_Excel - Fatal编程技术网

Vba :

Vba :,vba,excel,Vba,Excel,2b)A1未发生变化: 3a)如果我们现在在A2中输入=macropastec1(): 3b)我们看到新值,而第一个值保持不变: 您可以使用以下功能: Function macropastec1() As Variant macropastec1 = Range("C1").Value End Function Function macropastec1() As Variant macropastec1 = Sheets("SheetName").Range("C1").

2b)A1未发生变化:

3a)如果我们现在在A2中输入
=macropastec1()

3b)我们看到新值,而第一个值保持不变:


您可以使用以下功能:

Function macropastec1() As Variant
    macropastec1 = Range("C1").Value
End Function
Function macropastec1() As Variant
    macropastec1 = Sheets("SheetName").Range("C1").Value
End Function
如果需要指定特定的工作表,可以在函数中添加:

Function macropastec1() As Variant
    macropastec1 = Range("C1").Value
End Function
Function macropastec1() As Variant
    macropastec1 = Sheets("SheetName").Range("C1").Value
End Function
VBA模块应如下所示:

当您更改
C1
时,此函数将不更新单元格值

您可以通过调用以下命令在任何单元格中使用它:

=macropastec1()
演示: 1) 在单元格A1中输入
=macropastec1()

2a)如果我们更改C1:

2b)A1未发生变化:

3a)如果我们现在在A2中输入
=macropastec1()

3b)我们看到新值,而第一个值保持不变:


您可以使用以下功能:

Function macropastec1() As Variant
    macropastec1 = Range("C1").Value
End Function
Function macropastec1() As Variant
    macropastec1 = Sheets("SheetName").Range("C1").Value
End Function
如果需要指定特定的工作表,可以在函数中添加:

Function macropastec1() As Variant
    macropastec1 = Range("C1").Value
End Function
Function macropastec1() As Variant
    macropastec1 = Sheets("SheetName").Range("C1").Value
End Function
VBA模块应如下所示:

当您更改
C1
时,此函数将不更新单元格值

您可以通过调用以下命令在任何单元格中使用它:

=macropastec1()
演示: 1) 在单元格A1中输入
=macropastec1()

2a)如果我们更改C1:

2b)A1未发生变化:

3a)如果我们现在在A2中输入
=macropastec1()

3b)我们看到新值,而第一个值保持不变:



如果您想通过在单元格中写入来调用子过程,则需要使用
工作表\u Change
事件,并让该宏查找所选单元格中的文本。我不知道如何在没有几个小时的研究的情况下执行此操作,但我想您不明白。所选单元格中不会有文本-在写入=macropastec1时,等待粘贴$C$1单元格时,该单元格为空。我将只选择要写入的单元格=macropastec1-感谢您的回复。任何原因您都不能只将单元格的公式设置为
=$C$1
?是的,它有点复杂-我需要指定一个一直在更改的单元格,如果在特定的时间段(即当另一个单元格从非空更改时),我需要进行复制。然后,一旦单元格粘贴其值,原始单元格将继续更改,我将在特定时间粘贴它的版本。有问题的单元格来自我发现的另一个vba-min_cell(C3)min_cell max_cell在网上的某个地方,但如果Google是一个类似于我试图在active Celle中实现的概念(即函数frm a maco),那么您只需寻找类似于
函数macrostec1()的变量.Value
结束函数
如果要从单元格中写入调用子过程,则需要使用
工作表\u Change
事件,并让该宏在所选单元格中查找文本。如果不进行数小时的研究,我不知道如何执行该操作,但我认为您不理解。所选单元格中不会有文本-在写入=macropastec1时,等待粘贴$C$1单元格时,该单元格为空。我将只选择要写入的单元格=macropastec1-感谢您的回复。任何原因您都不能只将单元格的公式设置为
=$C$1
?是的,它有点复杂-我需要指定一个一直在更改的单元格,如果在特定的时间段(即当另一个单元格从非空更改时),我需要进行复制。然后,一旦单元格粘贴其值,原始单元格将继续更改,我将在特定时间粘贴它的版本。有问题的单元格来自我发现的另一个vba-min_cell(C3)min_cell max_cell在网上的某个地方,但如果Google是一个类似于我试图在active Celle中实现的概念(即函数frm a maco),那么您只需寻找类似于
函数macrostec1()的变量.Value
结束函数
如果要从单元格中写入调用子过程,则需要使用
工作表\u Change
事件,并让该宏在所选单元格中查找文本。如果不进行数小时的研究,我不知道如何执行该操作,但我认为您不理解。所选单元格中不会有文本-在写入=macropastec1时,等待粘贴$C$1单元格时,该单元格为空。我将只选择要写入的单元格=macropastec1-感谢您的回复。任何原因您都不能只将单元格的公式设置为
=$C$1
?是的,它有点复杂-我需要指定一个一直在更改的单元格,如果在特定的时间段(即当另一个单元格从非空更改时),我需要进行复制。然后,一旦单元格粘贴其值,原始单元格将继续更改,我将在特定时间粘贴它的版本。有问题的单元格来自我发现的另一个vba-min_cell(C3)min_cell max_cell在网上的某个地方,但如果Google是一个类似于我试图在active Celle中实现的概念(即函数frm a maco),那么您只需寻找类似于
函数macrostec1()的变量.Value
结束函数
如果要从单元格中写入调用子过程,则需要使用
工作表\u Change
事件,并让该宏在所选单元格中查找文本。如果不进行数小时的研究,我不知道如何执行该操作,但我认为您不理解。所选单元格中不会有文本-在写入=macropastec1时,等待粘贴$C$1单元格时,该单元格为空。我将只选择要写入的单元格=macropastec1-感谢您的回复。任何原因您都不能只将单元格的公式设置为
=$C$1
?是的,它有点复杂-我需要指定一个一直在更改的单元格,如果在特定的时间段(即当另一个单元格从非空更改时),我需要进行复制。然后,一旦单元格粘贴其值,原始单元格将继续更改,我将在特定时间粘贴它的版本。行政长官
Function macropastec1() As Variant
    macropastec1 = Sheets("SheetName").Range("C1").Value
End Function
=macropastec1()