Putting plain text string into clipboard in VBA?

[Don Wiss]

Our pricing program produces a quote letter on a worksheet. All text is in
Column A. Right now I have a button that puts Column A into the clipboard,
then the user pastes it into Notes. The problem is Notes considers this a
picture, so the user has to select Paste Special -> Text from the menu to
paste in. Now the macro behind the button could easily turn the text in
Column A into a delimited text string. But then how would my VBA code put
that string into the clipboard?

Don <www.donwiss.com> (e-mail link at home page bottom).

[Vasant Nanavati]

Look at Chip Pearson's site:

http://www.cpearson.com/excel/clipboar.htm

--

Vasant



"Don Wiss" <donwiss@no_spam.com> wrote in message
news:[email protected]...
> Our pricing program produces a quote letter on a worksheet. All text is in
> Column A. Right now I have a button that puts Column A into the clipboard,
> then the user pastes it into Notes. The problem is Notes considers this a
> picture, so the user has to select Paste Special -> Text from the menu to
> paste in. Now the macro behind the button could easily turn the text in
> Column A into a delimited text string. But then how would my VBA code put
> that string into the clipboard?
>
> Don <www.donwiss.com> (e-mail link at home page bottom).

[Don Wiss]

On Sat, 21 May 2005, "Vasant Nanavati" <vasantn *AT* aol *DOT* com> wrote:

>Don Wiss wrote:
>> Now the macro behind the button could easily turn the text in
>> Column A into a delimited text string. But then how would my VBA code put
>> that string into the clipboard?

>Look at Chip Pearson's site:
>
>http://www.cpearson.com/excel/clipboar.htm

Wonderful. Works like a charm. Now do you have any ideas for giving the
user a visual indication that the text is in the clipboard? When putting
the worksheet range in you have those flashing dashed lines around the
text. With this there will be no visual indication.

Don <www.donwiss.com> (e-mail link at home page bottom).

[Vasant Nanavati]

Sorry, no brilliant ideas. Perhaps a MessageBox?

MsgBox "The data is now in the Clipboard and is ready to be pasted into
Notes.", vbOKOnly

--

Vasant



"Don Wiss" <donwiss@no_spam.com> wrote in message
news:[email protected]...
> On Sat, 21 May 2005, "Vasant Nanavati" <vasantn *AT* aol *DOT* com> wrote:
>
> >Don Wiss wrote:
> >> Now the macro behind the button could easily turn the text in
> >> Column A into a delimited text string. But then how would my VBA code
put
> >> that string into the clipboard?
>
> >Look at Chip Pearson's site:
> >
> >http://www.cpearson.com/excel/clipboar.htm
>
> Wonderful. Works like a charm. Now do you have any ideas for giving the
> user a visual indication that the text is in the clipboard? When putting
> the worksheet range in you have those flashing dashed lines around the
> text. With this there will be no visual indication.
>
> Don <www.donwiss.com> (e-mail link at home page bottom).

[keepITcool]

you could do it via api's but msforms has a databoejct
you could use for this.

make sure you have a reference to msforms in your project

Sub Foo()
Dim s As String
Dim c As Range
Dim cb As MSForms.DataObject
Const DL = ";"

For Each c In Range("a1:a12")
s = s & DL & CStr(c)
Next

Set cb = New DataObject
cb.SetText Mid(s, 2)
cb.PutInClipboard
Set cb = Nothing

End Sub




--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


Don Wiss wrote :

> Our pricing program produces a quote letter on a worksheet. All text
> is in Column A. Right now I have a button that puts Column A into the
> clipboard, then the user pastes it into Notes. The problem is Notes
> considers this a picture, so the user has to select Paste Special ->
> Text from the menu to paste in. Now the macro behind the button could
> easily turn the text in Column A into a delimited text string. But
> then how would my VBA code put that string into the clipboard?
>
> Don <www.donwiss.com> (e-mail link at home page bottom).