redspanna
Wellknown Member
 Joined
 Jul 27, 2005
 Messages
 1,493
 Office Version

 2016
 Platform

 Windows
Hi all
I'm trying to paste the value of B3 in weekly perf sheet into next available row in column x of graphs sheet.
The pasted value should also be pasted with the following formula
but not being any good at VB I am stuck!
The code I have tried to write so far is as follows, but it doesn't do the job..
any help to fix this would be apreciated
thanks
I'm trying to paste the value of B3 in weekly perf sheet into next available row in column x of graphs sheet.
The pasted value should also be pasted with the following formula
Code:
=RIGHT('weekly perf'!B3,FIND("",'weekly perf'!B3)2)
The code I have tried to write so far is as follows, but it doesn't do the job..
Code:
Sub Ant()
Sheets("weekly perf").Select
Range("B3").Select
Sheets("graphs").Select
' Find the last row of data
FinalRow = Range("X65536").End(xlUp).Row
Selection.Formula "=RIGHT('weekly perf'!B3,FIND("  ",'weekly perf'!B3)2)"
End Sub
any help to fix this would be apreciated
thanks