Vb- How to return value instead of formula

[Bing005]

Hey dudes/dudettes

I need the K3:K9 range to copy only the value and not the formula for the cells. Ive just started with vb and although im finding it hard to use im finding it incredibly interesting. Any help would be greatly appreciated.

Thanks

Andrew

Below is my script.

Sub Yay()
Dim rng, dest As Range
Worksheets("Calendar").Activate
Set rng = Range("N3:N8")
rng.Copy
Worksheets("Enquiry Sheet").Activate
Set dest = Cells(Rows.Count, "b").End(xlUp).Offset(1, 0)
dest.PasteSpecial Transpose:=True
Application.CutCopyMode = False
Worksheets("Calendar").Activate
Set rng = Range("K3:K9")
rng.Copy
Worksheets("Enquiry Sheet").Activate
Set dest = Cells(Rows.Count, "b").End(xlUp).Offset(0, 5)
dest.PasteSpecial Transpose:=True
Application.CutCopyMode = False
Worksheets("Calendar").Activate
End Sub

[stanleydgromjr]

Bing005,

Try:

Please Login or Register  to view this content.

If the above does not work, then please post your workbook - scroll down and see "Manage Attachments".

[Bing005]

You've probably heard this before, but Stan you are the man!

Thank you very much. It works great. Just need to realign a few cells.

[mudraker]

Bing005

Your Original post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here