Disk Cleaner can Speed Up Your Windows: Troubleshoot:Copy Formula range to row after worksheet row

2016년 9월 23일 금요일

Troubleshoot:Copy Formula range to row after worksheet row_change

Copy Formula range to row after worksheet row_change

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Me.Columns(8)) Is Nothing Then
        Me.Range("I" & Target.Row).Value = Now
        End If

ws_exit:
    Application.EnableEvents = True
    On Error GoTo 0
End Sub

After the time stamp above, I need to copy formulas in A2:F2 and paste on same row that was changed.
After calculating, leave values only.

Keys to the Problem Copy Formula range to row after worksheet row_change

Download SmartPCFixer for Free Now

You changed the first 8 to 7 but omitted to adjust the rest.
I have used constants in the following version to make it easier to modify it

Private Sub Worksheet_Change(ByVal Target As Range)
    Const lngCol = 7 ' look at column G
    Const lngCopyCols = 6 ' copy 6 columns
    Dim rngCell As Range
    Dim rngAtoF As Range
    If Not Intersect(Target, Me.Columns(lngCol)) Is Nothing Then
        Application.EnableEvents = False
        For Each rngCell In Intersect(Target, Me.Columns(lngCol))
            rngCell.Offset(0, 1).Value = Now
            Set rngAtoF = rngCell.Offset(0, -(lngCol - 1)).Resize(1, lngCopyCols)
            Range("A2").Resize(1, lngCopyCols).Copy Destination:=rngAtoF
            rngAtoF.Value = rngAtoF.Value
        Next rngCell
        Application.EnableEvents = True
    End If
ws_exit:
    Application.EnableEvents = True
    On Error GoTo 0
End Sub

Manually editing the Windows registry

Caution: Unless you an advanced PC user, please do not edit the Windows registry manually.

Because of this risk, we highly recommend using a trusted registry cleaner such as SmartPCFixer Using a registry cleaner automates the process of finding invalid registry entries, missing file references (like the one causing your MACHINE_CHECK_EXCEPTION error), and broken links within the registry. A backup is automatically created before each scan, with the ability to undo any changes in a single click, protecting you against the possibility of PC damage. The best part is that repairing registry errors can also dramatically improve system speed and performance.

Click the Start button.
Type "command" in the search box... DO NOT hit ENTER yet!
While holding CTRL-Shift on your keyboard, hit ENTER.
You will be prompted with a permission dialog box.
Click Yes.
A black box will open with a blinking cursor.
Type "regedit" and hit ENTER.
In the Registry Editor, select the Error 0x9C-related key (eg. Windows Operating System) you want to back up.
From the File menu, choose Export.
In the Save In list, select the folder where you want to save the Windows Operating System backup key.
In the File Name box, type a name for your backup file, such as "Windows Operating System Backup".
In the Export Range box, be sure that "Selected branch" is selected.
Click Save.
The file is then saved with a .reg file extension.
You now have a backup of your MACHINE_CHECK_EXCEPTION-related registry entry.

The next steps in manually editing your registry will not be discussed in this article due to the high risk of damaging your system. If you would like to learn more about manual registry editing, please see the links below.

Recommended Method to Fix the Problem: Copy Formula range to row after worksheet row_change:

How to Fix Copy Formula range to row after worksheet row_change with SmartPCFixer?

1. Download Error Fixer. Install it on your computer.

2. After the scan is done, you can see the errors and problems need to be repaired. Click Fix All.

3. The Repair part is finished, the speed of your computer will be much higher than before and the errors have been removed. You can also use other functions in SmartPCFixer. Like dll downloading, junk file cleaning and print spooler error repair.

Disk Cleaner can Speed Up Your Windows