Jul 19 2021 08:43 AM
Sir I have a two different excel file
1.copy.xls(Running in compatibility mode)
2.paste.xlsm
in copy.xls sheet2 having "if" formula in D2. When condition match in D2 get "YES" signal.
And this "YES" signal will keep changing and the name will also keep changing whenever condition match.
it will copy C2 name and paste it to "paste.xlsm" C3 cell
and it will autosave "paste.xlsm" after pasting the data.
Thanks
Jul 19 2021 08:47 AM
How do the values in column B on Sheet2 in copy.xls change? Manually, or through VBA, or other?
Jul 19 2021 08:54 AM
sir,
it is changing with reference from Realtime data
please find attached .I have changes little
Jul 19 2021 09:00 AM
It's dinner time where I live. I'll look at it later.
Jul 19 2021 01:47 PM
Jul 19 2021 09:54 PM
Sir,
tried and working .
but when working in livefeed RTD (actual requirement)
its showing
below error
"subscript out of range"
(my changes signal from >5 to >1)
But both the file is opened.
Jul 19 2021 10:35 PM
Jul 19 2021 11:18 PM
Could you convert copy.xls to copy.xlsm?
Jul 19 2021 11:27 PM
Jul 19 2021 11:33 PM
I'm afraid I don't have a solution for your problem.
Jul 20 2021 11:07 PM
Jul 22 2021 01:01 AM
sir,
i have done some changes.Which may work .I have copy the cell from copy.xls and paste it as link in paste.xlsm in sheet 2
and make reference in C3 cell in sheet 1 from F2 of sheet 2
just help required from you to make it autosave.
whenever C3 value will be changed it will autosave the sheet.
Jul 22 2021 02:01 AM
SolutionRight-click the sheet tab of Sheet1.
Select 'View Code' from the context menu.
Copy the following code into the worksheet module:
Private Sub Worksheet_Calculate()
Static OldVal As Variant
If Range("C3").Value <> OldVal Then
ThisWorkbook.Save
OldVal = Range("C3").Value
End If
End Sub
Jul 27 2021 04:48 AM
Jul 27 2021 05:08 AM
You can simply change "C3" to "C15" in the code.
Jul 27 2021 05:16 AM
I did in that way.But its giving error.
Private Sub Worksheet_Calculate()
Static OldVal As Variant
If Range("C3:C15").Value <> OldVal Then
ThisWorkbook.Save
OldVal = Range("C3:C15").Value
End If
End Sub
Or can u make any changes in sheet 1 will save?
Jul 22 2021 02:01 AM
SolutionRight-click the sheet tab of Sheet1.
Select 'View Code' from the context menu.
Copy the following code into the worksheet module:
Private Sub Worksheet_Calculate()
Static OldVal As Variant
If Range("C3").Value <> OldVal Then
ThisWorkbook.Save
OldVal = Range("C3").Value
End If
End Sub