在excel

时间:2017-06-14 11:30:02

标签: excel excel-vba vba

我不是程序员。我需要帮助excel。我有excel中的表,它与网站链接并在单元格中实时显示值。我试图保存一个在2分钟后每次都会改变的单元格的值。我希望在下一分钟更改为另一个值之前(在Excel中自动刷新完成之前)自动将单元格的值保存在另一个单元格中。因为小区正在接收实时数据。我想保存旧数据并将其用于计算。我想自动为我做。我如何使用excel做到这一点?非常感谢您的帮助。

1 个答案:

答案 0 :(得分:0)

我会整天将数据附加到文本文件中,然后在at,或者在一天结束时或根据需要进行一些分析。

'Starting the program and sub procedure to write VBA code to write the data to a text file Append.
Sub VBA_to_append_existing_text_file()

'Declaring the strFile_Path variable as String Data Type to store the text file path.
Dim strFile_Path As String

'Assigning the Existing File path to the variable strFile_Path.
strFile_Path = "C:\your_path_here\test.txt"

'Opening the text file for Append with FileNumber as 1.
Open strFile_Path For Append As #1

'Writing to the sample text to the File using FileNumber and Write Command.
YourValue = Worksheets("Sheet1").Range("A1").Value
Write #1, YourValue

'Closing the File using FileNumber.
Close #1

End Sub

每2分钟运行一次宏,或者不经常运行宏。

Sub my_Procedure()
    MsgBox "hello world"        
    Call test ' for starting timer again
End Sub

Sub test()
    Application.OnTime Now + TimeValue("00:02:00"), "my_Procedure"
End Sub

您可以使用Excel或R进行分析。