copying cell text to non-Microsoft application
the link to Chip's site gave me what i needed; tks ...
Sub CopyTextToClipboard()
Dim DataObject As New DataObject
DataObject.SetText ActiveCell.Text
DataObject.PutInClipboard
End Sub
"Gord Dibben" <gorddibbATshawDOTca wrote in message
...
John
If you copy the contents from the formula bar you will get the formula.
If you copy the cell you will get the concatenated result.
Which do you want? Seems you're asking for both.
Gord Dibben XL2002
On Sun, 30 Nov 2003 21:24:06 +0000 (UTC), "John C"
wrote:
Hi - i'm trying to copy the contents of a cell to the clipboard (so that
I
can then paste it into a non-Microsoft program). When doing it manually,
selecting and copying the cell itself doesn't work - instead I need to
'go
into the cell' and select the text and copy it. How can I do this with
VBA?
As an added twist, the cell contains a formula that concatenates text
from a
number of other cells (to create a unique code). I actually need to copy
the result of the concatenation to the clipboard.
TIA, John
|